vb文本框如何禁止输入特定字符
答案:3 悬赏:30 手机版
解决时间 2021-01-07 14:44
- 提问者网友:浪荡绅士
- 2021-01-06 14:54
vb文本框如何禁止输入特定字符
最佳答案
- 五星知识达人网友:梦中风几里
- 2021-01-06 15:44
VB文本框可通过文本框的KeyPress事件来判断输入字符的KeyAscii值来禁止输入特定字符。
代码实例,禁止输入大写A字符:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 65 Then
KeyAscii = 0
End If
End SubKeyPress 事件,此事件当用户按下和松开一个 ANSI 键时发生。
KeyAscii
整数,包含引发 AccessKeyPress 事件的按键(除 ALT 键外)的 Ascii 值,与标准的 KeyPress事件采用的方法相同。
代码实例,禁止输入大写A字符:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 65 Then
KeyAscii = 0
End If
End SubKeyPress 事件,此事件当用户按下和松开一个 ANSI 键时发生。
KeyAscii
整数,包含引发 AccessKeyPress 事件的按键(除 ALT 键外)的 Ascii 值,与标准的 KeyPress事件采用的方法相同。
全部回答
- 1楼网友:大漠
- 2021-01-06 16:40
if text1.text="
- 2楼网友:痴妹与他
- 2021-01-06 16:25
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < 48 Or KeyAscii > 57 Then
KeyAscii = 0
End If
End Sub 可以禁止输入字母
private sub text1_change()
if text1=”" then exit sub
if not isletter(text1) then
msgbox “only a-z A-Z letters allowed”
end if
end sub 这个是禁止输入算字和特殊符号
应该是可以的,只要你把自己想禁止的字母,符号等的ASCLL码的值知道了,,就可以了…
If KeyAscii < 48 Or KeyAscii > 57 Then
KeyAscii = 0
End If
End Sub 可以禁止输入字母
private sub text1_change()
if text1=”" then exit sub
if not isletter(text1) then
msgbox “only a-z A-Z letters allowed”
end if
end sub 这个是禁止输入算字和特殊符号
应该是可以的,只要你把自己想禁止的字母,符号等的ASCLL码的值知道了,,就可以了…
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯