按键精灵设置按下F1，则执行每0.2秒按一次F1，执行次数不定，直到弹起F1，终止按F1
答案:1 悬赏:20 手机版
解决时间 2021-01-17 05:00
- 提问者网友：棒棒糖
- 2021-01-16 23:57
按键精灵设置按下F1，则执行每0.2秒按一次F1，执行次数不定，直到弹起F1，终止按F1
最佳答案
- 五星知识达人网友：山有枢
- 2021-01-17 01:02
这个要调用系统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
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
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯