Question

如何在按键精灵中设置当某个键按下时，每隔10秒连续按次键，当抬起改键时终止按键

如题

Answer 1

Declare Function GetAsyncKeyState Lib "user32" Alias "GetAsyncKeyState" (ByVal vKey As Long) As Integer
//这一段是一行的
While True
Key = GetAsyncKeyState(65) //65是A的ASCII码，你可以改成其他
If Key <> 0 Then //不等于0表示按下，等于0表示弹起
//这里写你要执行的代码
Else
Delay 5 //适当延时减轻CPU负担
End If
Wend

追问

如果我要持续按A 这个测试了是没法实现的
即：
//这里写你要执行的代码
KeyPress "1", 1

追答

按A是不行的，因为KeyPress 65,1 就是和你自己按键盘效果一样，程序就一直认为A键已经按下，所以就会循环执行KeyPress 65,1

Answer 2

Delay 2000 ------------【运气脚本后，2秒内在需要的窗口单击，
Dim hwnd
hwnd=Plugin.Window.MousePoint()
for 10000 -----------[循环10000次]
Call Plugin.Bkgnd.KeyPress(hwnd, 32)
Delay 60000
endfor
也许 do loop 更适合 ，不会用

追问

需要窗口，还是多谢！

Answer 3

没有，不可能的。采纳一下谢谢