既然你可以輸入英文,只要系統(tǒng)切換到中文輸入方式下,例如“谷歌拼音”,不就可以輸入中文了
創(chuàng)新互聯(lián)公司專注于根河企業(yè)網站建設,成都響應式網站建設公司,商城網站建設。根河網站建設公司,為根河等地區(qū)提供建站服務。全流程按需制作,專業(yè)設計,全程項目跟蹤,創(chuàng)新互聯(lián)公司專業(yè)和態(tài)度為您提供的服務
定義一個字符串變量例:dim s as strings=text1.text這樣就可以把文本框中輸入的文本賦給變量s了,在VB中使用變量S即可
每個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謝謝