PDA

View Full Version : getinterger with value predetermined



jandres
16th Aug 2005, 04:27 pm
Hello all!!
find a method for obtain a value interger:
interger=ThisDrawing.Utility.GetInteger("Input a value")

I need when the user not input value, I assign a default value. thanx!!

SpeedCAD
16th Aug 2005, 08:11 pm
Hello all!!
find a method for obtain a value interger:
interger=ThisDrawing.Utility.GetInteger("Input a value")

I need when the user not input value, I assign a default value. thanx!!

Hi...

You can do it:
Public ValorDef As Integer

Public Sub Valor()
Dim Valor As Integer
On Error Resume Next
Valor = ThisDrawing.Utility.GetInteger&#40;"Input a value <50>&#58; "&#41;
If Err.Description = "User input is a keyword" Then
ValorDef = 50
MsgBox ValorDef
Else
ValorDef = Valor
MsgBox ValorDef
End If
End Sub

jandres
19th Aug 2005, 12:53 am
Gracias compadre!! :lol: