Question

按键精灵设置按下F1，则执行每0.2秒按一次F1，执行次数不定，直到弹起F1，终止按F1

如题
按键精灵设置按下F1，则执行每0.2秒按一次F1，执行次数不定，直到弹起F1，终止按F1
再次按下F1，执行命令同上

Answer 1

这个要调用系统API才能实现，实现代码如下

Declare Function GetAsyncKeyState Lib "user32" Alias "GetAsyncKeyState" (ByVal vKey As Long) As Integer
Dim key, n
key = 112//F1的按键码=112
WaitKey
Do
n = GetAsyncKeyState(key)
If n < 0 Then
KeyPress "F1", 1
Delay 200
RestartScript
Else
RestartScript
End If
Delay 500
Loop