永发信息网

vb在文本框输入一个字符,发生什么事件

答案:3  悬赏:0  手机版
解决时间 2021-03-05 22:44
vb在文本框输入一个字符,发生什么事件
最佳答案
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
全部回答
changed和keyup、keydown等事件
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 可以按此方法扩充字符类型
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
路由器的密码忘了,用手机怎么操作
极品飞车8存档问题
中国石油皮山固鲁克加油站地址有知道的么?有
15款宝马gt3281现全价购车多少钱?
为了防止雷电波侵入,一级防雷建筑要求进入建
遁字怎么读
我昨天晚上梦到癞蛤蟆追我好不好?
自行车是绿色出行的重要交通工具,请你用物理
流浪在山头谜语打一字
cfa每年的样题和mock有什么区别
友盛汽车养护中心这个地址在什么地方,我要处
【知识改变命运】如何理解知识改变命运?
对于因欲求不满而生气的男友,该哄吗
我看到别人的性格给我带来坎坷与痛苦,于是我
爬山步水的近义词
推荐资讯
丙辛汽修怎么去啊,有知道地址的么
如何自慰(自我安慰)
我想知道个人信息等资料填错了,天翼云盘可以
嘉华购物(平安店)我想知道这个在什么地方
30道不要很难.答案要算式的.不要结论.
怎样才能小学生使脾气不暴躁?
翻译英文: 大声唱出,让世界都听见。
众诚环保科技这个地址在什么地方,我要处理点
两只脚,分别站在同样的秤上,那么秤的视数是体
物理近地卫星 是用万有引力与向心力相等计算
snow rain 的罗马拼音
三星a7000手机怎么设置高清语音
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?