Тема 5 Основы офисного программирования Лекция № 4

Тема 5 Основы офисного программирования Лекция №4 Программирование разветвляющихся и циклических процессов в VBA

1. Программирование разветвляющихся процессов в VBA. 2. Программирование циклических процессов в VBA. Литература: 1. Інформатика: Комп’ютерна техніка. Комп’ютерні технології. Підручник / За ред. О.І.Пушкаря. – К.: Видавничий центр "Академія ", 2003, с. 208 – 235. Основы офисного программирования

Каждый вид управляющей структуры реализуется при помощи соответствующих операторов, предназначенных для управления последовательностью выполнения строк кода программы. Разветвляющийся процесс (ветвление по условию) –такой, в котором исполняется лишь часть операторов в зависимости от истинности проверяемого условия. В линейный процессах (структурах) все инструкции кода выполняются строго последовательно друг за другом. Циклический процесс – такой, в котором некоторые операторы выполняются многократно. Основы офисного программирования

Программирование разветвляющихся процессов в VBA Если в результате выполнения программы, процесс вычисления может пройти только по одному из нескольких (в общем случае многих) альтернативных путей, то такой вычислительный процесс называется разветвляющимся. Разветвляющийся процесс (ветвление по условию) – процесс, в котором исполняется лишь часть операторов в зависимости от истинности (ложности) проверяемого условия. Конструкция If… Then чаще остальных используется для группирования инструкций VBA. Существует 3 способа записи (синтаксиса) оператора If

If условие Then оператор_1 [Else оператор_2] Структура оператора IF 1. Простая однострочная форма Блок-схема алгоритма строчного оператора If Слову «Да» в схеме соответствует ключевое слово Then в операторе, а слову «Нет» - Else.

If <лог_выражение> Then <оператор1> <оператор2> … <операторN> Else <операторN+1> <операторN+2> … <операторNN> End If 2. Если на каждой ветви разветвляющегося вычислительного процесса необходимо выполнить несколько действий, то используют блочную форму Структура оператора IF

Алгоритм, реализующий блочную запись оператора IF Структура оператора IF Начало Конец

3. Вложенный (расширенный) разветвляющийся процесс If <условие 1> Then <блок операторов 1> Elseif <условие 2> Then <блок операторов 2> ... Else <блок операторов N> End If Структура оператора IF

Оператор множественного выбора Case Select Case <анализируемое выражение> Case <значение 1> <группа операторов> Case <значение 2> <группа операторов> . . . Case <значение N> <группа операторов> Case Else <группа операторов> End Select Оператор выбора Select Case сопоставляет значение заданного выражения с заранее предусмотренными вариантами

Оператор множественного выбора Case <Выражение> в операторе Case может быть: а) конкретными значениями Case 1: Оп.1 Case 2 , 3 : Оп.2 б) диапазоном значений Case 1 To 15 Оп.1 Case 16 To 31 Оп.2 в) с применением операторов отношений (=, <, >, <=, >=, <>) Case IntKol < 15 Оп.1 Case IntKol >=16 Оп.2 Оператор выбора Select Case сопоставляет значение заданного выражения с заранее предусмотренными вариантами

В проектах VBA диалог с пользователем можно организовать не только с помощью текстовых полей (надписей) на форме (TextBox), но и с помощью стандартных диалоговых окон InputBox и MsgBox. Ввод-вывод данных в процедуру с использованием диалоговых окон

В VBA для вывода различных сообщений используется окно MessageBox (MsgBox). В его состав всегда входят: текст сообщения; заголовок; пиктограмма; набор кнопок. Синтаксис: MsgBox Prompt [, Buttons] [, Title] [, Context]. Prompt – напоминание, Button – кнопка, Title– название, Context – фон . 25 ноября 2017 г. Оператор MsgBox

25 ноября 2017 г. Пример оператора MsgBox MsgBox "Здравствуй, пользователь", vbExclamation, "Приветствие"

поле для ввода данных (default – значение по умолчанию) Пояснительная надпись (prompt) Заголовок (title) Управляющие кнопки Ввод исходных данных Окно InputBox состоит из четырех элементов: • строка заголовка; • приглашение к вводу (Prompt); • поле ввода со значением, предлагаемым по умолчанию; • две кнопки (ОК и Cancel).

Ввод исходных данных В коде программы окно InputBox описывается как метод объекта Application, с аргументами: InputBox("сообщение"[, "заголовок"] [, "данные по умолчанию"] [, x_позиция] [,y_позиция]) сообщение – определяет текст, отображающийся в диалоговом окне как приглашение, заголовок – отвечает за надпись заголовка; если этот параметр не указан, то отображаться название приложения, данные по умолчанию – определяет значение по умолчанию, отображаемое в строке ввода, параметры x_позиция и y_позиция указывают координаты верхнего левого угол окна. По умолчанию окно отображается посредине экрана. Функция InputBox возвращает строку, введенную пользователем. При нажатии кнопки Cancel возвращается пустая строка.

InputBox("Введите величину скидки",”Скидка",0.2,type:=1) Ввод исходных данных Аргумент type определяет, в какой тип будут преобразованы вводимые данные. Например: 1 – разрешает ввод чисел, 2 – текста, 4 – логических значений.

Функция InputBox возвращает текстовое значение, введенное пользователем. Если пользователь щелкнет на кнопке Cancel, возвращается пустая строка. Пример: IntKolich = CInt(InputBox("Введите количество", "СуперМаркет КЛАСС"). 25 ноября 2017 г. Функция InputBox

Для многоразового использования одного или нескольких операторов предназначены циклы. Цикл – часть программы, которая будет исполнена несколько раз подряд. Программирование циклических процессов в VBA Различают три вида циклов цикл с предусловием цикл с постусловием цикл с параметром Первые два вида циклов используются тогда, когда заранее неизвестно сколько будет повторений.

25 ноября 2017 г. Алгоритмы условных циклов r=rn r<=rk Операторы цикла r=r+hr Операторы вне цикла Цикл с предусловием Цикл с постусловием r=rn r<=rk Операторы цикла r=r+hr Операторы вне цикла Да Нет Да Нет

25 ноября 2017 г. Условный цикл (верхнее окончание) Do While <Условие> Оператор 1 Оператор 2 … Оператор N Loop Операторы … где While – пока Loop - петля Do Until <Условие> Оператор 1 Оператор 2 … Оператор N Loop Операторы … где Until – до Loop - петля Да Нет Да Нет

25 ноября 2017 г. Условный цикл (нижнее окончание) Do Оператор 1 Оператор 2 … Оператор N Loop While <Условие> Операторы … где While – пока Loop - петля Do Оператор 1 Оператор 2 … Оператор N Loop Until <Условие> Операторы … где Until – до Loop - петля Да Нет Да Нет

25 ноября 2017 г. Цикл с параметром (со счётчиком) For <Имя счётчика> = <Начальное значение> To <Конечное значение> [Step <Шаг изменения счётчика>] <Операторы тела цикла> Next [<Имя счётчика>] <Операторы после цикла> [] – необязательные элементы Может быть Exit For – для выхода Пример применения цикла с параметром будет дан при изучении массивов