关于TextBox的问题。

Question

Form1上有一个TextBox1控件，怎样使TextBox1只能输入文字，数字，而不能输入空格，标点符号呢？

Answer 1

Private Sub Text1_KeyPress(KeyAscii As Integer)
  If Asc(Chr(KeyAscii)) < 48 Or Asc(Chr(KeyAscii)) > 57 Then
     MsgBox "error"
  End If
End Sub同理,文字(中文和英文)只要找出范围就可以实现

Answer 2

思路：
捕捉從鍵盤輸入到TextBox的消息，如果是空格及標點符號的給予攔截。
需要三個API Funtion
CallWindowProc
SetWindowLong
GetWindowLong
(不建議使用API實現，該功能完全可以在KeyPress事件中實現)自己先看看MSDN關於這三個函數的說明，思考一下
如要詳細的方法可與我聯系([email protected])

Answer 3

Private Sub Text1_KeyPress(KeyAscii As Integer)     
If (KeyAscii = vbKeyDelete) And (KeyAscii =vbKeyBack) And (KeyAscii = 13)Then
           KeyAscii = 0
    End If
end sub