修改个按键精灵代码，后台循环次数的

Question

Dim hwnd
VBSCall GetCursorPos(x,y)
Plugin hwnd=Window.MousePoint()
Plugin s = Window.GetClientRect(hwnd)
XYArray = Split(s, "|", -1, 1)
dx = XYArray(0)
dy = XYarray(1)
MessageBox 现在可以把游戏的窗口放在后台，或者是最小化
Rem 开始
Plugin Bkgnd.LeftClick(hwnd,x-dx,y-dy)
Delay 1000
Goto 开始

这段代码是一直执行这些操作，我想执行十次结束，请问怎么修改？
我的按键精灵是 7.20.5292版的

Answer 1

Dim hwnd
VBSCall GetCursorPos(x,y)
Plugin hwnd=Window.MousePoint()
Plugin s = Window.GetClientRect(hwnd)
XYArray = Split(s, "|", -1, 1)
dx = XYArray(0)
dy = XYarray(1)
MessageBox 现在可以把游戏的窗口放在后台，或者是最小化
For 10
Plugin Bkgnd.LeftClick(hwnd,x-dx,y-dy)
Delay 1000
Next追问

我的按键精灵是 7.20.5292版的
我试了下这段脚本，只执行一次的。是不是哪里还有问题？？？

追答

我用的是8.0的我也不知道7.20.5292版本的循环语句是什么。。。。你一下载一个8.0的来用

Answer 2

Dim hwnd,n
VBSCall GetCursorPos(x,y)
Plugin hwnd=Window.MousePoint()
Plugin s = Window.GetClientRect(hwnd)
XYArray = Split(s, "|", -1, 1)
dx = XYArray(0)
dy = XYarray(1)
n=0
MessageBox 现在可以把游戏的窗口放在后台，或者是最小化
Rem 开始
if n<10
Plugin Bkgnd.LeftClick(hwnd,x-dx,y-dy)
n=n+1
Delay 1000
Goto 开始
else
end if

Answer 3

Dim hwnd
VBSCall GetCursorPos(x,y)
Plugin hwnd=Window.MousePoint()
Plugin s = Window.GetClientRect(hwnd)
XYArray = Split(s, "|", -1, 1)
dx = XYArray(0)
dy = XYarray(1)
MessageBox
For 10
Plugin Bkgnd.LeftClick(hwnd,x-dx,y-dy)
Delay 1000
Next追问

我的按键精灵是 7.20.5292版的
我试了下这段脚本，只执行一次的。是不是哪里还有问题？？？