Что делает ON в QBasic?

Я работаю над проектом, в котором я беру старую программу и создаю ее новую версию .... Дело в том, что она написана на Quick Basic и содержит строку кода, которую я не понимаю.

ON FLAG% GOTO 1730, 1900

Кто-нибудь может мне сказать, что это ??? Кстати я работаю над VisualBasic


person sheach    schedule 04.07.2016    source источник
comment
Оператор gotos 1730, если Flag равен 1, и gotos 1900, если Flag равен 2, иначе тоже.   -  person eoredson    schedule 05.02.2019


Ответы (2)


По сути, это сокращенный синтаксис для этого типа оператора:

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

Дополнительную информацию см. В этой статье.

Для получения дополнительных опций вы, вероятно, обратитесь к выражению switch на более современных языках.

person Lasse V. Karlsen    schedule 04.07.2016

Это более структурированный пример использования оператора GOTO:

SELECT CASE FLAG%
    CASE 1
        GOTO 1730
    CASE 2
        GOTO 1900
END SELECT
person eoredson    schedule 06.08.2016
comment
Более структурированный пример использования оператора GOTO. - person eoredson; 06.08.2016