11. Использование циклов
Циклы типа For 1
Циклы типа do-LOOP 2
Циклы типа Do While – Loop 2
Циклы типа Do – Loop While 2
Циклы типа Do Until 3
Циклы типа While-Wend 4
Перечислимые циклы 4
Еще одним важным элементом программы является оператор цикла. Он используется для выполнения повторяющихся действий в программе. В Visual Basic существует три разновидности операторов цикла – с использованием счетчика, условный оператор цикла и перечислимый оператор цикла. К первому типу относится оператор For. Он выполняет указанную последовательность команд заданное число раз. Ко второму типу относится операторы Do While и Do Until. Циклы типа Do выполняются до тех пор, пока некоторое условие истинно. Перечислимые операторы цикла используются для выполнения некоторых действий над каждым элементом группы объектов. Все указанные типы циклов будут описаны ниже.
Ц иклы типа For
Циклы со счетчиком называют также циклами типа For/Next, поскольку операторы, выполняемые в цикле, размещаются между ключевыми словами For и Next. При указании цикла данного типа программист определяет переменную цикла, которая служит счетчиком, а также ее начальное и конечное значения. В качестве дополнительного параметра цикла можно указать приращение – величину, которая прибавляется к счетчику или вычитается из него после завершения очередного шага цикла. Приращение указывается в операторе For после ключевого слова Step. При выполнении первого шага цикла, счетчик устанавливается в исходное состояние. После выполнения очередного шага, к переменной цикла прибавляется величина (она может быть отрицательной), указанная после ключевого слова Step. Затем счетчик сравнивается с конечным значением переменной цикла. Если он больше, чем конечное значение переменной цикла, выполнение цикла прекращается и программа переходит к следующему за ключевым словом Next оператору.
Блок-схема оператора цикла For, в котором параметр цикла изменяется от начального значения M до конечного значения N с шагом S, приведена на рисунке.
Синтаксис оператора цикла For имеет вид:
For Параметр = НачальноеЗначение To КонечноеЗначение [ Step Шаг ]
Оператор1
Оператор2
…………….
Next Параметр
В качестве параметра может быть использована переменная любого числового типа. В качестве параметров НачальноеЗначение, КонечноеЗначение, Шаг может быть использовано выражение числового типа. Если служебное слово Step и параметр Шаг не указаны, то значение параметра Шаг равно единице
В приведенном ниже фрагменте кода цикл типа For / Next вычисляется сумма N нечётных чисел:
Const N = 10 ‘количество не чётных чисел
Dim i as Integer ‘номер числа
Dim S as Integer ‘текущее значение суммы
S = 0 ‘обнуление значение суммы
For i = 1 To N ‘для всех значений номера числа от 1 до N
S = S + 2 * i +1 ‘увеличение суммы на значение нечётного числа
Next i ‘конец оператора цикла
lblS = S ‘передача значения суммы в надпись lblS
Как правило, циклы типа For / Next выполняются до тех пор, пока счетчик не достигнет конечного значения. Однако, в некоторых случаях нужно досрочно прекратить выполнение цикла. Для этого поместите в нужном месте цикла оператор Exit For. Обычно данный оператор используется совместно с оператором If, с помощью которого определяется условие досрочного завершения выполнения цикла.