按键精灵 我想让下面的A每循环一次加一 应该怎么写

rem p
For 45
Delay 1000
IfColor 599,559,"0D1534",1 Then
A = 0 + i
i=1
End If
If A=45 Then
Goto p
Else
Goto r
End If
Next
Rem r
本人新手。。。 这个好像有问题

有问题，你这里的A值，似乎没作用，如果你单纯想某段程序循环45次，你可以这样做
for i=1 To 45
//你的程序
Next

vbs dim a,b vbscall a=inputbox("输入起始号码") vbscall b=inputbox("输入结束号码") vbs a=cint(a) vbs b=cint(b) while a<=b waitkey c //按“→”键，执行一次循环，加1 if c=39 sayexpression a vbs a=a+1 endif endfor //起始号码：输123456；结束号码：可以输999999，大于123456就行

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息