文章/答案/技术大牛

发布

社区首页 >问答首页 >如何跳转到For..Next循环中的下一个i？

问如何跳转到For..Next循环中的下一个i？
EN

Stack Overflow用户

提问于 2012-10-27 11:59:57

回答 1查看 1.5K关注 0票数 0

我在QuickBasic中进行逆向工程，我的代码如下：

FOR i = star TO fin
   IF a < 1 THEN 
    CALL clrbot
    COLOR 15
    PRINT force$(side); " army in "; city$(armyloc(i)); " is CUT OFF !";
    TICK turbo!
    GOTO alone
   END IF
   size = size + 1
   max = 11: IF LEN(armyname$(i)) < 11 THEN max = LEN(armyname$(i))
   mtx$(size) = LEFT$(armyname$(i), max)
   array(size) = i
alone:
NEXT i

我想(单独)去掉line标签，而是做一些类似的事情：

   IF a < 1 THEN 
     CALL clrbot
    COLOR 15
    PRINT force$(side); " army in "; city$(armyloc(i)); " is CUT OFF !";
    TICK turbo!
    NEXT i
   END IF

vb.net

quickbasic

回答 1

Stack Overflow用户

回答已采纳

发布于 2012-10-27 12:19:34

您可以将GOTO替换为Else：

For i = star To Fin
    If a < 1 Then
        ' Do something
    Else
        ' Do Something else
    End If
Next

这将遵循相同的逻辑- Else代替GOTO alone语句。

在原始代码(QuickBASIC)中，如果输入了If块，则GOTO alone语句之后的所有内容都将被忽略。

如果没有输入If块(即>= 1)，则执行If块之后的所有内容。

VB.NET代码中的Else语句将产生相同的行为。如果< 1，第一个块将被执行，Else块将被忽略，循环将前进到i的下一个增量。

如果>=为1，则将执行Else块，然后循环将前进到i的下一个增量。

以上假设QuickBASIC中的标签类似于DOS批处理文件中的标签。

票数 1

页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持

原文链接：

https://stackoverflow.com/questions/13097118

复制

相似问题

问如何跳转到For..Next循环中的下一个i？
EN

回答 1

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问如何跳转到For..Next循环中的下一个i？EN

回答 1

Stack Overflow用户

社区

活动

圈层

关于

腾讯云开发者

热门产品

热门推荐

更多推荐

问如何跳转到For..Next循环中的下一个i？
EN