按键精灵GOTO使用方法(新旧对比).doc

按键精灵GOTO使用方法（新旧对比） 【第一种】无限往前跳，可改成无限循环写法 原写法 Rem 开始 //中间可能有很多很多代码 Goto 开始 新写法 Do //中间可能有很多很多代码 Loop 【第二种】满足i 1条件时往前跳，可改成多加一层循环 原写法 Dim i Rem 开始 //中间可能有很多很多代码 If i 1 Then Goto 开始 End If 新写法 Dim i Do //中间可能有很多很多代码 If i 1 Then Exit do End If Loop 【第三种】满足i 1条件时往后跳，可改成多加一层循环 原写法 Dim i If i 1 Then Goto 结束 End If //中间可能有很多很多代码 Rem 结束 新写法 Dim i Do If i 1 Then Exit do End If //中间可能有很多很多代码 Exit do Loop 【第四种】循环内往前跳到循环外，可多设置一层循环利用一个判断变量连续跳出 原写法 Dim intX,intY rem 从头开始 //中间可能有很多很多代码 For 3 FindPic 0,0,1080,1920,Attachment:1.png,0,0.9,intX,intY If intX -1 Then goto 从头开始 End If Delay 1000 Next 新写法 Dim intX,intY,判断变量 Do //中间可能有很多很多代码 判断变量 0 For 3 FindPic 0,0,1080,1920,Attachment:1.png,0,0.9,intX,intY If intX -1 Then 判断变量 1 Exit For End If Delay 1000 Next If 判断变量 0 Then Exit Do Loop 【第五种】循环内往后跳到循环外，可多设置一层循环利用一个判断变量连续跳出 原写法 Dim intX,intY For 3 FindPic 0,0,1080,1920,Attachment:1.png,0,0.9,intX,intY If intX -1 Then Goto 找完了 End If Delay 1000 Next //中间可能有很多很多代码 Rem 找完了 新写法 Dim intX,intY,判断变量 判断变量 0 Do For 3 FindPic 0,0,1080,1920,Attachment:1.png,0,0.9,intX,intY If intX -1 Then 判断变量 1 Exit For End If Delay 1000 Next If 判断变量 1 Then Exit Do //中间可能有很多很多代码 Exit Do Loop