Setting a TextBox to allow only numeric values.

Question:

How can I set up a TextBox object to allow only numeric values?

Solution:

To do so, you must write a script in the TextObject’s Change event. For example:

If Not IsNumeric(Value) Then
Set WshShell = CreateObject(“WScript.Shell”)
WshShell.SendKeys “{BACKSPACE}”
End If