vb在文本框输入一个字符,发生什么事件
答案:3 悬赏:0 手机版
解决时间 2021-03-05 22:44
- 提问者网友:美人性情
- 2021-03-05 10:03
vb在文本框输入一个字符,发生什么事件
最佳答案
- 五星知识达人网友:大漠
- 2021-03-05 10:25
Change、KeyPress、KeyDown和KeyUp,常用的是前两个,后两个用的相对较少。触发(即执行代码)的顺序为:KeyDown、KeyPress、Change、KeyUp。
KeyPress:当按键时触发,常用于限制/修改输入的内容,如:
1、仅限于输入数字:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0
End Sub
2、转换为大写字母:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii > 96 And KeyAscii < 122 Then KeyAscii = KeyAscii - 32
End Sub
Change:当内容改变时触发。
Private Sub Text1_Change()
用法较多,比如:
你在医院交费划价时会发现,当划价员输入代码时,会出现一批药品名称,当代码变化时,药品名称会跟着变化,用的就是Change事件(也可能是KeyPress事件或两者的结合,当数据库中记录量很大时,这种方法不可取)。
在Form1窗口中操作时,给Form2窗口的Text1赋值,此时将触发From2窗口的Text1_Change。
End Sub
KeyPress:当按键时触发,常用于限制/修改输入的内容,如:
1、仅限于输入数字:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0
End Sub
2、转换为大写字母:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii > 96 And KeyAscii < 122 Then KeyAscii = KeyAscii - 32
End Sub
Change:当内容改变时触发。
Private Sub Text1_Change()
用法较多,比如:
你在医院交费划价时会发现,当划价员输入代码时,会出现一批药品名称,当代码变化时,药品名称会跟着变化,用的就是Change事件(也可能是KeyPress事件或两者的结合,当数据库中记录量很大时,这种方法不可取)。
在Form1窗口中操作时,给Form2窗口的Text1赋值,此时将触发From2窗口的Text1_Change。
End Sub
全部回答
- 1楼网友:爱难随人意
- 2021-03-05 12:20
changed和keyup、keydown等事件
- 2楼网友:千杯敬自由
- 2021-03-05 10:59
private sub text1_change()
dim s$
s=text1.text
select case s
case is>=asc("a") and is<=asc("z"):msgbox "小写字母"
case is>=asc("a") and is<=asc("z"):msgbox "大写字母"
case is>=asc("0") and is<=asc("9"): msgbox "数字"
case else:msgbox "其他字符"
end select
end sub
可以按此方法扩充字符类型
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯