integer

[harry5568]

hello...can anybody tell me how to find out if a certain text is an Integer
..of course
If IsInt(TextBox1.Text)=True Then...

is not working..Thanx:sign0085:

 

[Erel]

Sub App_Start
    Msgbox(IsInt(214))
End Sub

Sub IsInt (value)
    If IsNumber(value) AND value = Int(value) Then Return True Else Return False
End Sub

 

[harry5568]

Awrite..Basically
If IsNumber(TextBox1.Text) AND TextBox1.Text = Int(TextBox1.Text) Then...
Works perfectly:sign0060:...Thanks again Erel....Harry