Método GetKeyword

AutoCAD ActiveX

 
Método GetKeyword
 
 
 

El método GetKeyword pide al usuario la introducción de una palabra clave en la solicitud de comando de AutoCAD. Este método admite sólo un parámetro: la cadena de la solicitud. Las palabras clave y los parámetros de entrada se definen con una llamada al método InitializeUserInput

Obtención de una palabra clave introducida por el usuario en la línea de comando de AutoCAD

En el ejemplo siguiente se insta al usuario a escribir una palabra clave, estableciendo el primer parámetro de InitializeUserInput en 1, lo que desactiva la entrada NULL (al pulsar INTRO). El segundo parámetro establece la lista de palabras clave válidas.

Sub Ch3_KeyWord()
    Dim keyWord As String
    ThisDrawing.Utility.InitializeUserInput 1, "Line Circle Arc"
    keyWord = ThisDrawing.Utility.GetKeyword _
              (vbCrLf & "Enter an option (Line/Circle/Arc): ")
    MsgBox keyWord, , "GetKeyword Example"
End Sub

Una solicitud de palabra clave más sencilla para los usuarios proporciona un valor por defecto cuando el usuario pulse INTRO (entrada NULL). Observe las pequeñas modificaciones realizadas en el siguiente ejemplo:

Sub Ch3_KeyWord2()
    Dim keyWord As String
    ThisDrawing.Utility.InitializeUserInput 0, "Line Circle Arc"
    keyWord = ThisDrawing.Utility.GetKeyword _
              (vbCrLf & "Enter an option (Line/Circle/<Arc>): ")
    If keyWord = "" Then keyWord = "Arc"
    MsgBox keyWord, , "GetKeyword Example"
End Sub