Code:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii <> 8 Then
If KeyAscii <> 9 Then
If KeyAscii < 48 Then KeyAscii = 0
If KeyAscii > 57 Then KeyAscii = 0
Else: Exit Sub
End If: End If
End Sub Allows the following:
Numbers 0-9, backspace key, tab key.
I know this is
really simple but I thought...
Hey why can't I post this?