PrivateSubText1_KeyPress(KeyAsciiAsInteger)If((KeyAscii=48AndKeyAscii=65AndKeyAscii=97AndKeyAscii=122))=FalseThenKeyAscii=0EndSub
站在用户的角度思考问题，与客户深入沟通，找到高港网站设计与高港网站推广的解决方案，凭借多年的经验，让设计与互联网技术结合，创造个性化、用户体验好的作品，建站类型包括：成都做网站、成都网站建设、企业官网、英文网站、手机端网站、网站推广、国际域名空间、网站空间、企业邮箱。业务覆盖高港地区。
你是用输入法的吧，这个是.Net Framework的Bug吧，用输入法的步骤如下：
1、首先保证文本框有焦点
2、按下2次Ctrl+空格
3、切换到自己要用的输入法
这样一般都可以了
这些文字存在于输入法所占用的内存段里。除非你HOOK输入法。
本答案不确定。
每个textbox都有KeyPress事件（event），每次用户输入一个字符时检测，如不满足则清空
我现在不在vs下，你可以找到这个面板，绑定相应的函数
比如只能显示数字
Private Sub NumBox_KeyPress(KeyAscii As Integer)
If Not IsNumeric(NumBox.Text) Then
NumBox.Text = ""
End If
End Sub
只能显示英语（a-z 97-122； A-Z 65-90； 8（退格）和13（换行））
Private Sub EngBox_KeyPress(KeyAscii As Integer)
If Not (KeyAscii = 97 And KeyAscii=122) Or (KeyAscii = 90 And KeyAscii=65) Or = 8 Then
EngBox.Text = ""
End If
End Sub
只能显示汉字（汉字的ASCII值要么小于0，要么是8（退格）和13（换行））
Private Sub ChineseBox_KeyPress(KeyAscii As Integer)
If Not KeyAscii 0 Or KeyAscii = 8 Or KeyAscii = 13 Then
ChineseBox.Text=""
End If
End Sub
做了一些小修改，不明白请及时追问，满意敬请采纳，O(∩_∩)O谢谢
