Displays a dialog box prompting the user to enter a whole number.
Rhino.IntegerBox ([strMessage [, intNumber [, strTitle [, intMin [, intMax [, arrPos]]]]]])
strMessage |
Optional. String. A prompt or message. |
intNumber |
Optional. Number. A default whole number. |
strTitle |
Optional. String. A dialog box title. |
intMin |
Optional. Number. A minimum allowable value. |
intMax |
Optional. Number. A maximum allowable value. |
arrPos |
Optional. Array. A 2-D screen point that identifies the upper left corner of the dialog's initial position. |
Number |
The whole number if successful. |
Null |
If not successful, or on error. |
Dim lngColor
lngColor = Rhino.LayerColor("Default")
lngColor = Rhino.IntegerBox("Enter an RGB color value", lngColor )
If Not IsNull(lngColor) Then
Rhino.LayerColor "Default", lngColor
End If