VB代码:判断用户是否同时按下了几个按键,由此启动下一步

4,098 人次阅读
没有评论

共计 449 个字符,预计需要花费 2 分钟才能阅读完成。

有时候我们用VB,需要判断键盘动作,比如用户是否按下了某个我们预想定义的快捷键,但是这个好不属于目录菜单的内容,那么我们就需要捕捉键盘按键动作了。这里给出一种方法,用于判断用户是否同时按下Ctrl+Alt+T键,如果确定是,那么执行某个动作。
代码比较简洁,有看不懂的朋友,请留言。

[php]
‘判断是否同时按下了Ctrl、Alt和T键,进入调试模式
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Dim ShiftDown, AltDown, CtrlDown, Txt
ShiftDown = (Shift And vbShiftMask) > 0
AltDown = (Shift And vbAltMask) > 0
CtrlDown = (Shift And vbCtrlMask) > 0

If KeyCode = vbKeyT And CtrlDown And AltDown Then
Do something
End If
End Sub
[/php]

这里请把Do something换成你需要执行的动作。

正文完
 0