准备加装一个汽车手柄，现在就差程序了，
Declare Function GetAsyncKeyState Lib "user32" Alias "GetAsyncKeyState" (ByVal vKey As Long) As Integer//取键状态
Do
If GetAsyncKeyState(49) <> 0 and 状态 = 0 Then
状态 = 1
ElseIf GetAsyncKeyState(49) = 0 and 状态 = 1 Then
状态 = 0
KeyPress "1", 1
End If
Loop
____________________________________________________________________________________________
如果我把倒数第三行的，1改为2可以就可以，在文本上表现为12，后面的2是放开1后输出的。
我的目的是按下1后输出1，放开1键后弹起最输出一个1（注意是弹起后只输出一个1），以上的脚本应该是不停循环了，运行后不断输出1，就算放开1后还是不断输出1，
高手帮我修改下，谢谢了。