新人求助
要达到的目的是 当按下键盘 上 D、W、S、A键时 对应鼠标移到 摸个位置单击一下并可循环使用 请高手指点
BeginThread Thread1
DimEnv Key
While 1
While key=68
MoveTo 95, 540
LeftClick 1
Wend
Delay 20
Wend
While 1
While key=87
MoveTo 62, 518
LeftClick 1
Wend
Delay 20
Wend
While 1
While key=65
MoveTo 44, 539
LeftClick 1
Wend
Delay 20
Wend
While 1
While key=83
MoveTo 73, 518
LeftClick 1
Wend
Delay 20
Wend
Sub Thread1()
SubWhile True
Key = GetLastKey()
Delay 20
Wend
End Sub