直接判断就可以了
自己写个函数IsValidInput(text As String)
然后逐个判断String中的每个字符是否满足如下条件:
 (text(i)>"A" And text(i)<"Z")
Or (text(i)>"a" And text(i)<"x")
Or (text(i)>"0" And text(i)<"9")

解决方案 »

  1.   

    在TEXT的KeyPress事件中,可以加入以下代码来实现:
        if not ((keyascii>=48 and keyascii<=57) or (keyascii>=97 and    keyascii<=122) or (keyascii>=65 and keyascii<=90)) then
        '48-57是数字0-9的ASCII码,97-122是a的ASCII码,65-90是A-Z的ASCII码
         如果上面条件成立,则说明不是正常字符,你可以加入你自己的代码。
    希望这能让你满意!
      

  2.   

    见下面的代码,加在输入的KeyPress事件中,并且能检查是不是按下退格键
    Private Sub Text1_KeyPress(KeyAscii As Integer)
        If Chr(KeyAscii) Like "[!0-9A-Za-z]" And KeyAscii <> 8 Then KeyAscii = 0
    End Sub