这是我好不容易找到的,但是的修改下..............
Do
ks = WaitKey
Select Case ks
Case 56
Call aj
Case 57
Call dj
End Select
Loop
Sub aj()
KeyDown "A", 1
Delay 100
KeyDown "J", 1
Delay 100
KeyUp "A", 1
KeyUp "J", 1
End Sub
Sub dj()
KeyDown "D", 1
Delay 100
KeyDown "J", 1
Delay 100
KeyUp "D", 1
KeyUp "J", 1
End Sub
意思是说:按8就等于同时按A+J,按9就等于按D+J
我想把我想把8换成Q,9换成E,求大神解答..........
拜托了........![](https://tb2.bdstatic.com/tb/editor/images/face/i_f09.png?t=20140803)
Do
ks = WaitKey
Select Case ks
Case 56
Call aj
Case 57
Call dj
End Select
Loop
Sub aj()
KeyDown "A", 1
Delay 100
KeyDown "J", 1
Delay 100
KeyUp "A", 1
KeyUp "J", 1
End Sub
Sub dj()
KeyDown "D", 1
Delay 100
KeyDown "J", 1
Delay 100
KeyUp "D", 1
KeyUp "J", 1
End Sub
意思是说:按8就等于同时按A+J,按9就等于按D+J
我想把我想把8换成Q,9换成E,求大神解答..........
拜托了........
![](https://tb2.bdstatic.com/tb/editor/images/face/i_f09.png?t=20140803)
![](https://imgsa.baidu.com/album/s%3D900%3Bq%3D90/sign=cbc05a467f1ed21b7dc922e59d55acf9/0d338744ebf81a4c1d5b277dd52a6059252da61d.jpg?v=tbs)