第1个回答 2011-02-23
hwnd = Plugin.Window.Find(0,"窗口名字")
While i < 1200
Call Plugin.Bkgnd.KeyPress(hwnd, 72)
Delay 500
i = i + 1
Wend
Call Plugin.Bkgnd.KeyDown(hwnd, 70)
Delay 8000
Call Plugin.Bkgnd.KeyUp(hwnd, 70)
Delay 100
Call Plugin.Bkgnd.KeyPress(hwnd, 48)
Delay 3000
Call Plugin.Bkgnd.KeyPress(hwnd, 55)
Delay 3000
Call Plugin.Bkgnd.KeyPress(hwnd, 56)
Delay 3000
Call Plugin.Bkgnd.KeyPress(hwnd, 57)
Delay 3000
Call Plugin.Bkgnd.KeyPress(hwnd, 49)
Delay 3000
Call Plugin.Bkgnd.KeyPress(hwnd, 53)
Delay 200
Call Plugin.Bkgnd.KeyDown(hwnd, 82)
Delay 8000
Call Plugin.Bkgnd.KeyUp(hwnd, 82)
Delay 100
Call Plugin.Bkgnd.KeyPress(hwnd, 112)