lzth.net
当前位置:首页 >> vB键盘事件代码 >>

vB键盘事件代码

顺序为 keydown keyup keypress 例:在窗体上建立一个文本框TextBox1,然后增加以下的事件处理代码;Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) Print 1 End Sub Private Sub

鼠标事件是由鼠标键的单击、双击、移动等操作时发生,键盘事件则是在键盘的某个键按下去时触发.除了鼠标事件外,通常需要对键盘事件进行编程.键盘事件主要有以下几种:(1)KeyDown:当键盘上某键被按下去时发生.(2)KeyUp:键

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) if keycode=82 then msgbox "你按下了r键" End Sub

在Form1中加入代码:Private Sub Form_KeyPress(KeyAscii As Integer)If KeyAscii = 122 Then Form2.ShowEnd IfEnd Sub

Select Case keyas Case 70 keyname = "F1" '增加你的执行代码,例如:Text1.ForeColor= Hff '文本框字体颜色,每个判断下面都应该有执行代码的'或文本框显示内容,下同.Text1.Text ="F1" Case 71 keyname = "F2" Case 72 keyname

每个键对应的是 ascii值 例如a为97,b为98 得到ascii值方法: private sub form_keypress(keyascii as integer)msgbox keyasciiend sub 输入有ascii码的键都会得出键位的ascii码 如backspace之类没有ascii码的键可以用键盘码代替 改建工具 如果是原有按键还是能用的话 可以用sendkeys实现 private sub form_keypress(keyascii as integer)if keyascii = 97 then sendkeys ("b") end ifend sub

private sub form_keydown(keycode as integer, shift as integer)'keydown为键盘按下事件if keycode = vbkeycapital then'按键为vbkeycapital(caps lock)时'过程end ifend sub百分之百正确!vbkeycapital也可以是144,他是caps lock键的代码,其实vbkeycapital是一个vb定义的一个常数,它的值就是144.

先编辑一个窗体或文本框的键盘事件,在过程中,用 if 语句来判断输入的是不是h键,键盘上的每个健都有一个ascii 码来对应,大写h 是72小写h 是104,如果是的话就让它调用回车键的事件过程就搞定啦!回车键的事件代码你自己想实现什么功能就编辑什么就是了!

GetKeyState()如果小于0就是按下,并不会触发两次的 比如GetKeyState(65)<0这样就是按下.>=0就是弹起 如果是你触发两次一定是用了<>0,但实际上用<0就可以

是case 2

lyhk.net | tongrenche.com | jamiekid.net | zxpr.net | bestwu.net | 网站首页 | 网站地图
All rights reserved Powered by www.lzth.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com