ON 在 QBasic 中做什么？

Question

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

ON FLAG% GOTO 1730, 1900

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

Answer 1

对于这种类型的语句，它基本上是一种 shorthand 语法：

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

有关详细信息，请参阅 this article。

要获得更多选项，您可能会求助于更现代语言的 switch 语句。

Answer 2

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

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

What does ON do in QBasic?