• Home
 · 
• String Manipulation
 · 
• Allow only numbers to be entered in a text box

Allow only numbers to be entered in a text box

Allow only numbers to be entered in a text box

Rate Allow only numbers to be entered in a text box

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Private Sub Command1_Click()
'validate data for numbers only
If Not IsNumeric(Text1) Then
    MsgBox "Only numbers are allowed", vbExclamation, "Invalid Data"
    Text1 = ""
    Text1.SetFocus
Else
    MsgBox "The data enter was valid, you may continue", vbInformation + vbOKOnly, "Valid Data"
End If
End Sub