• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Restricting text boxes to numeric text only

Restricting text boxes to numeric text only

Restricting text boxes to numeric text only

API Declarations


I found that the "backspace" method froze my program quiet often, so I modified it to read a little differently.
How this works is quiet simple. It states that if a non-numeric text is entered, then the text box will read as whatever is in the quotations(""). So if the quotations("") are left empty as shown, then the text box will read as as if the text box were cleared. It has the same effect as the "backspace" method, just more addaptable. You could enter a phrase or comment in the quotations to advice the user to use numeric text only, ie.("numeric text only").



Rate Restricting text boxes to numeric text only

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

  If Not IsNumeric(Text1.Text) Then Text1.Text = ""
End Sub