qbasic - ON 在 QBasic 中做什么？

Question

我一直在做一个项目，在这个项目中我采用了一个旧程序并创建了一个新版本....问题是它是用 Quick Basic 编写的，并且它有一行我不明白的代码

ON FLAG% GOTO 1730, 1900

谁能告诉我这是什么？？？顺便说一句，我正在研究 VisualBasic

score 6 · Accepted Answer

它基本上是这种类型语句的简写语法：

IF FLAG% = 1 THEN GOTO 1730 ELSE IF FLAG% = 2 THEN GOTO 1900

有关更多信息，请参阅本文。

对于更多选项，您可能会求助于switch更现代语言的声明。

score 4 · Accepted Answer

这是使用 GOTO 语句的更结构化示例：

SELECT CASE FLAG%
    CASE 1
        GOTO 1730
    CASE 2
        GOTO 1900
END SELECT

2 回答 2