Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лекции по Visual Basic.doc
Скачиваний:
0
Добавлен:
01.07.2025
Размер:
175.1 Кб
Скачать

Управляющие операторы.

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

1) Инструкция If ... Then ... Else.

If условие Then [ инструкции ] [Else инструкции_else]

2) Инструкция Select Case.

Select Case выражение

[ Case списокВыражений-n

[инструкции -n]] ...

[ Case Else

[инструкции _else]]

End Select

3) Цикл Do ... Loop имеет 4 варианта синтаксиса :

Do While условие

[инструкции]

Loop

Do Until условие

[инструкции]

Loop

Do

[инструкции]

Loop While условие

Do

[инструкции]

Loop Until условие

Цикл может быть выполнен произвольное число раз, либо ни одного. Инструкция Exit Do позволяет безусловно немедленно передать управление команде, которая следует за последней командой цикла.

4) Цикл While ... Wend.

While [условие]

инструкции

Wend

Заметим, что для данного цикла нет инструкции для выхода из цикла.

5) Цикл For ... Next

For счетчик = начало To конец [Step шаг]

[инструкции]

Next [счетчик]

6) Цикл для массива и семейства For Each ... Next.

For Each элемент In группа

[инструкции]

Next [элемент]

7) Инструкция With ... End With.

Часто используется в циклах, облегчая восприятие текста и ускоряя процесс разработки. Эта инструкция позволяет непосредственно работать со свойствами и методами объекта, не повторяя его имя в каждой инструкции.

With объект

[инструкции]

End With

8) Безусловный выход из блока.

Exit Do

Выход из цикла Do .. Loop

Exit For

Выход из циклов For ... Next или For Each ... Next

Exit Function

Выход из функции, в которой имеется данная инструкция.

Exit Sub

Выход из процедуры, в которой имеется данная инструкция.

Exit Property

Выход из процедуры, в которой имеется данная инструкция.

9) Безусловный переход GoTo.

Следует использовать только в крайних случаях, т.к. такой макрос весьма тяжело отладить. Выполняет безусловный переход к заданной строке активной процедуры.

GoTo строка

10) Функция MsgBox.

Показывает сообщение в диалоговом окне, ожидает выбор одной из кнопок пользователем и возвращает значение, указывающее, какая кнопка была выбрана.

MsgBox (текст сообщения в окне [,число и тип кнопок выбора][,заголовок окна ][,№контекстной помощи для заданного файла подсказок])

Используется как правило для вывода значений.

11) Функция InputBox.

Показывает диалоговое окно ввода, ожидает ввод текста и возвращает содержимое введенного текста после его закрытия.

InputBox(пояснительный текст для ввода [,заголовок окна][,предлагаемый текст по умолчанию][, гор. смещение окна от левой гр. экрана][, вертик. смещение окна от верхней гр. экрана][, №контекстной помощи для заданного файла подсказок])