Операторы цикла

Цикл используется для неоднократного повторения одной или несколь­ких инструкций. Количество повторений цикла связано с некоторым усло­вием. В VBA предусмотрено несколько разновидностей циклов. Простейшим примером использования циклической конструкции — так называемого цикла по счетчику — может служить следующая процедура:

Sub For_цикл() Dim Счетчик As Integer

For Счетчик = 1 To 10 Print Счетчик Next Счетчик End Sub

Цикл по счетчику ограничивается ключевыми словами For и Next. После ключевого слова For указывается имя переменной, которая будет выполнять роль счетчика, после знака равенства — начальное значение счетчика, а после ключевого слова То — конечное значение счетчика.

Еще одна разновидность цикла — While-цикл. Условие выполнения команд внутри такого цикла определяется некоторым условным оператором:

Sub Цикл ()

Dim Счетчик as Integer

Счетчик= 1

Do While Счетчик<>10

Print Счетчик

Счетчик=Счетчик+1

Loop

End Sub

В данном случае последовательность операторов между строками Do While и Loop выполняется девять раз, что определяется истинностью услов­ного выражения, которое следует за ключевым словом While, Выполнение цикла продолжается, пока значение переменной Счетчик не станет рав­ным 10. В общем случае цикл Do While выполняется, пока истинно условное выражение, которое следует за ключевым словом While. Разновидностью цикла Do является Until-цикл, который выполняется, пока условное выраже­ние ложно:

Do Until Счетчик=10 Print Счетчик Счетчик=Счетчик+1

Loop

В этом случае результат тот же, что и в предыдущем примере, но цикл повторяется до тех пор, пока счетчик не достигнет жестко установленного значения — 10.