按键精灵 循环问题 for 内 嵌套 if

Posted 2023-03-24

没问题的代码
cm=10
ys=10
for i =1 to cm
KeyPress "Enter", 1
for b = 1 to ys
if i=cm and b=ys then
KeyPress "Tab", 2
else
KeyPress "Tab", 3
end if
next
next
---------------------------------
有问题的代码，只是cm和ys这两个变量，从界面输入框获取值后，在if i=cm and b=ys then这里出问题，就是敲Tab3下，不知道是什么情况！！
cm=Form1.InputBox1.Text
ys=Form1.InputBox2.Text
for i =1 to cm
KeyPress "Enter", 1
for b = 1 to ys
if i=cm and b=ys then
KeyPress "Tab", 2
else
KeyPress "Tab", 3
end if
next
next

While 1 IfColor 100,100,"0",0 Then MoveTo 100, 100 Delay 50 LeftClick 1 Delay 50 End if IfColor 200,200,"1",0 Then MoveTo 200, 200 Delay 50 LeftClick 1 Delay 50 End If Wend //按键8写法 //你要是不会写循环语句，你可以编辑脚本时在右边有个"脚本属性"，里面有个选项叫“脚本循环”，你设置成“循环到按中止键为止”就行了。 参考技术A '你这个是界面触发事件吧?为什么不是按钮触发事件?
'你用这个按钮点击事件看一看,
'1能不能读到内容,是否是数字
'2读到的数字周围是否有东西

Event Form1.Button1.Click
MessageBox "@"&Form1.InputBox1.Text&"@"&vbcrlf&"@"&Form1.InputBox2.Text&"@"
End Event 参考技术B cm=Cint(Form1.InputBox1.Text)
ys=Cint(Form1.InputBox2.Text)