UNTIL Expression
Заканчивает структуру цикла, ограниченную инструкциями REPEAT ... UNTIL . Цикл повторяется пока Expression станет истинным.
PUBLIC SUB Form_Open()
DIM I AS Integer
REPEAT
PRINT Timer
UNTIL Timer > 10
END
BREAK, CONTINUE, DO, FOR, FOR EACH, LOOP, REPEAT, WHILE, WITH