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

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

Дата добавления: 2014-10-22