VB键盘事件

来源:百度知道 编辑:UC知道 时间:2024/05/14 06:59:03
用键盘capslock触发VB事件,
要是有代码就最好了,谢谢

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)'KeyDown为键盘按下事件
If KeyCode = vbKeyCapital Then'按键为vbKeyCapital(Caps Lock)时
......'过程
End If
End Sub
百分之百正确!
vbKeyCapital也可以是144,他是Caps Lock键的代码,其实vbKeyCapital是一个VB定义的一个常数,它的值就是144。

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)'KeyDown为键盘按下事件
If KeyCode = 144 Then'144为Caps Lock的键控代码
......'过程
End If
End Sub