qbasic - QBASIC 中中断/停止程序的命令和语法是什么？

Question

我目前正在编写一个运行无限循环（while 循环）的 QBASIC 程序。但是，如果满足某个条件，我想退出程序。我使用什么命令，以及语法是什么。

谢谢

Answer 1

END退出程序，并清除所有变量，从而释放内存。 STOP退出程序，但保留所有变量的值，这使得（在某些版本的 QB 中）可以通过Set next statement从Debug菜单中选择，然后Start从Run菜单中继续执行另一点。程序终止后，与+从菜单中选择END具有相同的效果。STOPRestartRun

如果你有一个循环，并且想从里面退出程序，你可以使用

DO IF condition THEN EXIT DO LOOP END

或者

DO IF condition THEN END LOOP

Answer 2

您正在寻找ENDorSYSTEM语句。例如：

PRINT "Hello World!"
END
PRINT "This won't be printed."

如果您使用的是常规的旧 QBASIC/QuickBASIC，那么您可以忽略链接页面上的所有 QB64 详细信息，只需使用SYSTEM或END. 在大多数情况下，两者都会做同样的事情。¹

如果您使用的是 FreeBASIC，建议使用END，SYSTEM因为当您使用SYSTEM. SYSTEM如果您使用的是 FreeBASIC，请参阅有关 FreeBASIC 的更多信息。

---

¹运行程序时的END语句 usingQB.EXE /RUN PROGRAM.BAS将在退出 QB/QBASIC 环境之前打印“Press any key to continue”。以相同方式运行的SYSTEM语句将简单地将您返回到 DOS shell，而无需任何按键。此外，在 QB/QBASIC 环境的“立即窗口”中键入SYSTEM将退出环境并返回到 DOS shell。否则，这两个语句在 QB/QBASIC 中的行为完全相同，无论是对于独立（编译）程序还是.BAS模块。

Answer 3

您可以根据程序的需要保留任何条件。例如：

CLS
LET a = 5
WHILE a > 0
      PRINT a;
      a = a - 1
WEND
END

在这里，在程序中，while wends 会自行执行，直到 a = 0。这不会运行无限循环。

Answer 4

答案是

exit();

退出程序。