Repeat
  ...
Until <expression> [или Forever] 

Описание

Эта функция повторяет цикл до тех пор, пока <expression> не станет истинным. Количество циклов неограниченно. Если нужен бесконечный цикл, используйте ключевое слово Forever вместо Until. Команда Break даёт возможность, выйти из цикла Repeat: Until в любой момент, а команда Continue позволяет пропустить остаток текущей итерации.
Цикл Repeat всегда выполняется минимум один раз, так как проверка условий выполняется после каждой итерации. Если вам необходим цикл с проверкой условий до итераций - используйте конструкцию While : Wend.

Примечание: В цикле Repeat: Until вычисление выражения <expression> происходит в каждой итерации, поэтому старайтесь не включать множество медленных команд в это выражение, так как это скажется на производительности. Например, Until a>b/c/d будет работать очень медленно.

Пример

a=0
Repeat
    a=a+1
Until a>100

Этот цикл повторяется, пока "a" не примет значение > 100, (он повторится 101 раз).