• Home
 · 
• Miscellaneous
 · 
• 'This code will not allow the user to enter any character data, only numbers.

'This code will not allow the user to enter any character data, only numbers.

'This code will not allow the user to enter any character data, only numbers.

Rate 'This code will not allow the user to enter any character data, only numbers.

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Private Sub txt1_KeyPress(KeyAscii As Integer)
     If KeyAscii > 31 And KeyAscii < Asc("0") or KeyAscii > Asc("9") Then
          Let KeyAscii = 0
     End If
End Sub