//键盘等待任意键得到键值给予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
菜鸟水平,理解一下就明白了。
界面上放一个按钮,一个热键组件
key = GetLastKey
if key=???
then
或者使用暂停键。一段代码结束后暂停,回到起始。
多来几个脚本就可以了。