Limiting the information entered into a text box

[Gimpster]

I want to be able to keep all other information other than numbers from being entered into a text box. How can I do this?

------------------
Ryan
[email protected]
ICQ# 47799046

[Aaron Young]

Try this:

Private Sub Text1_KeyPress(KeyAscii As Integer)
    If Not IsNumeric(Chr(KeyAscii)) And KeyAscii <> vbKeyBack Then KeyAscii = 0
End Sub

------------------
Aaron Young
Analyst Programmer
[email protected]
[email protected]

[Gimpster]

Yup, that does it! Thanks.

------------------
Ryan
[email protected]
ICQ# 47799046

[Juan Carlos Rey]

You can also use a Masked Edit Box with its Mask property set to "########" , up to the number of digits you want.