按键精灵8中,代码无法执行,求人看原因,给个正解啊

[复制链接]
查看11 | 回复1 | 2011-3-27 11:26:13 | 显示全部楼层 |阅读模式
hwnd = Plugin.Window.GetKeyFocusWnd()
Rem start
Call Plugin.Window.SendKeyPress(hwnd,104)
Delay 2000
Call Plugin.Window.SendKeyPress(hwnd,105)
For 3000

Call Plugin.Window.SendKeyPress(hwnd,97)

Delay 500

Call Plugin.Window.SendKeyPress(hwnd,98)
Next
Call Plugin.Window.SendKeyPress(hwnd,104)
Delay 2000
Call Plugin.Window.SendKeyPress(hwnd,105)
For 1800

Call Plugin.Window.SendKeyPress(hwnd,97)

Delay 500

Call Plugin.Window.SendKeyPress(hwnd,98)
Next

Delay 1000

Call Plugin.Window.SendKeyPress(hwnd,112)
For 1200

Call Plugin.Window.SendKeyPress(hwnd,97)

Delay 500

Call Plugin.Window.SendKeyPress(hwnd,98)
Next

Delay 2000

Call Plugin.Window.SendKeyPress(hwnd,104)

Delay 2000

Call Plugin.Window.SendKeyPress(hwnd,105)
For 3000

Call Plugin.Window.SendKeyPress(hwnd,97)

Delay 500

Call Plugin.Window.SendKeyPress(hwnd,98)
Next

Delay 2000

Call Plugin.Window.SendKeyPress(hwnd,104)

Delay 2000

Call Plugin.Window.SendKeyPress(hwnd,105)
For 600

Call Plugin.Window.SendKeyPress(hwnd,97)

Delay 500

Call Plugin.Window.SendKeyPress(hwnd,98)
Next

Delay 1000

Call Plugin.Window.SendKeyPress(hwnd,113)
For 1200

Call Plugin.Window.SendKeyPress(hwnd,97)

Delay 500

Call Plugin.Window.SendKeyPress(hwnd,98)
Next
Delay 2000

Call Plugin.Window.SendKeyPress(hwnd,114)
Delay 2000

Call Plugin.Window.SendKeyPress(hwnd,114)
Delay 1000

Call Plugin.Window.SendKeyPress(hwnd,115)
Delay 1000

Call Plugin.Window.SendKeyPress(hwnd,27)
Goto start

回复

使用道具 举报

千问 | 2011-3-27 11:26:13 | 显示全部楼层
前面加上二试试:SetSimMode 1Dim hwnd
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行