Need a little help here. I'm using an input box. I only want a numerical input. No letters. How do I make sure it only accepts numbers? Is this possible?
Here's the script:
Sub object_onscriptenter
object.Text= object.PersistStorage("newtext")
End Sub
Sub Object_OnLbuttonup(x,y,dragged)
Dim Input
If Not dragged Then
Input = InputBox("Enter seconds 1-5")
If Input < 6 Then
If Input > 0 Then
object.PersistStorage("newtext")= Input
Object.Text= object.PersistStorage("newtext")
End If
End If
End If
End Sub
Thanks.
