按键精灵脚本怎么加上按下1开始,弹起1结束

2025-02-25 06:30:11
推荐回答(1个)
回答1:

Private Declare Function GetKeyState Lib"user32"(ByVal nVirtKey As Long) As Integer
Do
    If GetKeyState(49)=-127 or GetKeyState(49)=-128
        KeyDown "Shift", 1
        LeftDown 1
        Do
        Loop Until GetKeyState(49) >= 0
        LeftUp 1
        KeyUp "Shift", 1
    End If
Loop