按键精灵启动热键,如何设置为按下Q开始脚本运行,松开Q结束脚本运行
3个回答
展开全部
源码如下,个人原创,先启动脚本,然后才能按Q启动你要执行的代码。
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As any) As Integer
Do
Key = WaitKey()
If key = 81 Then
Exit do
End If
Loop
TracePrint "你按下q已经启动脚本"
BeginThread 执行脚本
BeginThread 判断
Sub 判断
Do
If GetAsyncKeyState(81) = 0 Then
TracePrint "你松开q已经关闭脚本"
exitScript
End if
Loop
End Sub
Sub 执行脚本
TracePrint "执行成功"
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询