Использование цикла DO

Открывает структуру бесконечного цикла, ограниченного инструкциями DO ... LOOP.

DO

тело цикла

LOOP

Если задано WHILE, цикл завершается, когда условие (логическое выражение) становится ложно (false). Если условие ложно в начале цикла, цикл не выполняется совсем.

DO [WHILE] [условие]

тело цикла

LOOP

Если задано WHILE, цикл завершается, когда Expression (логическое выражение) становится ложно (false). Если Expression ложно в начале цикла, цикл не выполняется совсем.

Пример:

PUBLIC SUB Main()
DIM a AS Integer
a = 1
DO WHILE a <= 10
PRINT "Hello World"; a
INC a
LOOP
END SUB