按键精灵怎么给按钮设置快捷键或者用快捷键触发按钮事件

就是按下键盘上一个键延迟0.1秒触发一个已经设置成按钮事件的事件要怎么设置

//键盘等待任意键得到键值给予a
a = WaitKey()
If a = Form1.Hotkey1.VirtualKey Then //判断,如果a等于界面上热键组件设置的按键码,那么就执行
Call 弹窗()


RestartScript 
Else 
RestartScript 
End If

Sub 弹窗()
MessageBox now
End Sub
Event Form1.Button1.Click
Call 弹窗()

End Event

菜鸟水平,理解一下就明白了。

界面上放一个按钮,一个热键组件

追问

小白还是不理解,比如我要设置按下Q就触发按钮1,那么“Q”是要在哪里设置呢

追答

温馨提示:答案为网友推荐,仅供参考
第1个回答  推荐于2017-08-10
key = GetLastKey
if key=???
then
或者使用暂停键。一段代码结束后暂停,回到起始。
多来几个脚本就可以了。本回答被网友采纳
相似回答