Allow only numbers in a textbox!
This program won't allow any other characters in a textbox then numbers and it allows you to use your Backspace key.
AI
AI Summary: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
Source Code
Private Sub text1_KeyPress(KeyAscii As Integer)
Dim Numbers As Integer
Dim Msg As String
Numbers = KeyAscii
If ((Numbers < 48 Or Numbers > 57) And Numbers <> 8) Then
Msg = MsgBox("Only Numbers are aloud in this Textbox", vbCritical, "Error Number")
KeyAscii = 0
End If
End Sub
Original Comments (3)
Recovered from Wayback Machine