Операторы цикла
End Select
Результат выполнения программы при значении тест-выражения равном 77 представлен на рисунке 11.3.
Рис. 11.3. Форма с результатом для примера 2
Забегая немного вперёд и используя терминологию объектно-ориентированного программирования, поясним, что идентификатор txtОценка.Value в приведённом фрагменте означает содержимое текстового поля (значение свойства Value объекта TextBox с именем txtОценка). Текстовые поля и другие объекты-элементы управления (метки – Label, командная кнопка – CommandButton, рисунок – Image) размещены на форме пользователя (объект UserForm с именем Пример2_Select)
Циклом называется многократное повторение определенного действия или группы действий (так называемого тела цикла). Например, если нужно табулировать функцию, чтобы построить график, или загрузить исходные данные в массив, или произвести обработку данных в массиве, то так или иначе приходится неоднократно повторять однотипные вычислительные процедуры. В таких случаях предпочтительнее использовать не линейные, а циклические алгоритмы.
На рисунке 11.4 показаны блок-схемы циклических алгоритмических структур с предусловием (Цикл-Пока) и с постусловием (Цикл-До). Напомним, что их различие заключается в том, что действие (процесс) в зависимости от истинности условия в первой схеме может не выполниться ни разу, а во второй – выполняется не менее одного раза.
Рис. 11.4. Циклические алгоритмические структуры
Для реализации цикла с предусловием в VBA может использоваться оператор WHILE … WEND и более универсальный оператор DO … LOOP (см. *), с помощью которого можно реализовать также и цикл с постусловием.
Программный код примера 3 на алгоритмическом языке VBA
Private Sub cmdStart_Click()
Dim I As Integer
I = 0
txtIn.Value = I
Do While I < 10
I = I + 1