README.md
December 4, 2022 ยท View on GitHub
Description
Create a text box that only allows Numbers in it, no letters great for Numeric Applications!
More Info
Textbox: Name:Text1
| Submitted On | |
| By | Ryan Hartman |
| Level | Unknown |
| User Rating | 3.7 (11 globes from 3 users) |
| Compatibility | VB 4.0 (32-bit), VB 5.0, VB 6.0 |
| Category | String Manipulation |
| World | Visual Basic |
| Archive File |
Source Code
Private Sub Text1_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 48 To 57
Case 8
Case Else
Beep
MsgBox "Visit:http://members.xoom.com/RYANMP5/ for more code!"
KeyAscii = 0
End Select