qbasic - QBASIC でプログラムを中断/停止するためのコマンドと構文は何ですか?

Question

現在、無限ループ (while ループ) を実行する QBASIC プログラムを作成しています。しかし、ある条件を満たせばプログラムを終了したい。使用するコマンドと構文は何ですか。

ありがとう

Answer 1

ENDプログラムを終了し、すべての変数をクリアしてメモリを解放します。 プログラムを終了しますが、すべての変数の値を保持します。これにより、(QB の特定のバージョンでは) メニューから選択してからメニューからSTOP選択することにより、別の時点で実行を継続できます。+は、プログラムが終了した後にメニューから選択するのと同じ効果があります。Set next statementDebugStartRunENDSTOPRestartRun

ループがあり、その中からプログラムを終了したい場合は、次のいずれかを使用できます

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. SYSTEMFreeBASIC を使用している場合は、FreeBASIC に関する詳細を参照してください。

---

¹ENDプログラムを実行する際のステートメントQB.EXE /RUN PROGRAM.BASは、QB/QBASIC 環境に戻る前に「Press any key to continue」を出力します。同じ方法でSYSTEMステートメントを実行すると、キーを押す必要なく、単に DOS シェルに戻ります。また、SYSTEMQB/QBASIC 環境の「イミディエイト ウィンドウ」に入力すると、環境が終了し、DOS シェルに戻ります。.BASそれ以外の場合、2 つのステートメントは、スタンドアロン (コンパイル済み) プログラムまたはモジュールのいずれであっても、QB/QBASIC でまったく同じように動作します。

Answer 3

プログラムの必要に応じて、任意の条件を保持できます。例：

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

ここで、プログラム内で while wends は a = 0 になるまで実行されます。これは無限ループを実行しません。

Answer 4

答えは

exit();

プログラムを終了します。