Verifies that a command exists in Rhino. The function is useful when scripting commands found in 3rd party plug-ins.
Rhino.IsCommand (strCommandName])
|
strCommandName |
Required. String. The command name to test. |
|
Boolean |
True if successful, otherwise False. |
|
Null |
On error. |
Dim strCommandName, blnResult
strCommandName = Rhino.GetString("Command name to test")
If VarType(strCommandName) = vbString Then
blnResult = Rhino.IsCommand(strCommandName)
If blnResult = True Then
Rhino.Print "The " & strCommandName & " command exists."
Else
Rhino.Print "The " & strCommandName & " command does not exist."
End If
End If