Question

按键精灵，代码循环求解（用while导致脚本被锁死，不能停止）

设置界面，添加按钮，我想要：
当点击按钮时，循环一段代码，当按下F12时，停止所有脚本。
我的方法会卡死脚本界面。

Event Form1.Button1.Click
While true
xxxxx
xxxxx
Delay 10000
Wend
End Event

我觉得应该条件改成i=0,判断F12被按下时i=1，但我不知道怎么判断F12被按下。代码是什么？或者说还有更好的方法？求解

Answer 1

分析问题原因：如果控件直接触发循环命令，是会卡死的，因为控件本身就是线程，

所以解决办法是：用控件，触发线程，再在线程里面执行事件

理想代码

Event Form1.Button1.Click
BeginThread 我是一个线程子程序'这边是调用线程
End Event

Sub 我是一个线程子程序
//这边写线程要执行的命令
While true
xxxxx
xxxxx
Delay 10000
Wend

End Sub

记得采纳

------------------追加部分-----------

这个代码只能做到启动线程，如果你想F12停止脚本，这个得用监控键盘按键的方式，过于复杂，就不回答了，电脑也没装按键精灵

Answer 2

开一个计时器,计时器里面判断按键码