Лабораторная работа № 24 Язык программирования vba. Управляющие операторы

Цель работы: Ознакомить с операторами управления и привить навыки использования их при решении задач

Операторы управления порядком выполнения команд позволяют оценить реальную ситуацию и адекватно реагировать на нее, принимая решения о дальнейших действиях. VBA предоставляет для этого ряд функций и операторов.

Наиболее часто используется оператор If ... Then, который может иметь

простую однострочную или блочную структуру.

Однострочный синтаксис

If Условие Then Оператор [Else Onepamop]

Функционирование оператора такой структуры относительно просто. Если условие после if истинно, т.е. результат равен True, выполняется оператор, указанный за Then. Если же результат равен False, то выполняется оператор, следующий за ключевым словом Else, если такое имеется:

If A = 7 Then Beep 'операторы

If X < 9 Then Лист1.Name = "False!" Else Лист1.Name = "True!"

В первом примере выдается звуковой сигнал, если переменная А равна 7. Во

втором примере листу1 присваивается имя False!, если значение переменной х

меньше 9; в противном случае присваивается имя True!.

Блочный синтаксис

If Условие Then

Операторы 1

[ElseIf Условие Then

Операторы 2]

Else Операторы 3

End If

В принципе блочная запись предоставляет такие же возможности, как и однострочная. Но если в зависимости от условия необходимо выполнить не простую команду, а группу операторов, следует использовать блочный синтаксис. Это относится и к ветви Else. Кроме того, блочная структура с ElseIf

позволяет анализировать несколько условий:

If A<5 Then

MsgBox "Ждите"

End If

If Name = "Иванов" Then

MsgBox "Ваша карточка удерживается!"

Else

MsgBox "Деньги, пожалуйста!"

End If

If Обращение = 1 Then

MsgBox "Глубокоуважаемый господин"

Elself Обращение = 2 Then

MsgBox "Глубокоуважаемая госпожа"

Elself Обращение = 3 Then

MsgBox "Глубокоуважаемые дамы и господа"

Else

MsgBox "Здравствуйте, люди"

End If

При формировании более сложных условий блочная запись удобнее.

Использование в этом случае блочного синтаксиса улучшает читабельность

программы.

Select Case

Еще одним оператором ветвления VBA является Select Case, который позволяет выполнить одну из нескольких групп операторов в зависимости от значения условия.

Инструкция Select Case имеет следующий синтаксис:

Select Case Проверочное_выражение

[Case Значение 1

[Операторы 1]]

[Case Значение 2

[Операторы 2 ]]\

[Case Else

[ОператорыЗ]]

End Select

Select Case n

Case 1

MsgBox "Равно 1"

Case 2,3

MsgBox "Равно 2 или З"

Case 4 To 6

MsgBox "Больше или равно 4 и меньше или равно 6"

Case Is >= 9

MsgBox "Больше или равно 9"

Case Else

MsgBox "Ни одно из предшествующих"

End Select

В качестве значения для блока Case можно указывать не только одно значение (1), но и несколько, разделенных запятой (2, 3). Можно определять также области сравнения (4 то 6) или воспользоваться относительным сравнением (is >= 9): вместо непосредственного проверочного выражения можно использовать ключевое слово Is.

Блок Case Else выполняется, если ни одно из предыдущих условий не является истинным.

Если условию Select Case соответствует несколько блоков Case, то выполняется первый из них.

Private Sub CommandButtonl Click()

Select Case nVariable

Case()

MsgBox "Равно 0"

Case -10 To 10 '

MSgBox "Между -10 и 10, кроме 0"

End Select

End Sub

Во втором блоке Case обрабатываются значения от -10 до 10, однако значение 0 перехватывается первым блоком Case. Поэтому операторы второго блока Case будут выполняться, если значение условия больше или равно -10 и меньше 0, а также больше 0 и меньше или равно 10.

Задания для самостоятельной работы:

1. Найти наибольшее из двух чисел.

2. Найти наименьшее из трех данных чисел

3. Найдите корни квадратного уравнения ах^А2+Ьх+с=0

4. Вывести сообщение «стой», «жди» или «иди», в зависимости от выбора цвета светофора.

5. Составить процедуру, которая по введенному пользователем номеру дня недели выводит его название на русском языке.

6. Написать программу, которая анализирует человека по возрасту и относит к одной из четырех групп: дошкольник, ученик, работник, пенсионер.

7. Составить процедуру, реализующую эпизод сказки: спрашивает куда предпочитает пойти герой ( налево, направо или прямо ), и печатает, что ждет его в каждом случае.