- •Лабораторные работы
- •Тула 2012
- •Литература
- •Создание таблиц
- •Пример выполнения лабораторной работы (вариант 30)
- •Выполнение запроса на выборку.
- •Создание параметрического запроса.
- •Создание запроса, используемого для создания сложного отчета
- •Создание сложного отчета.
- •Создание и выполнение макросов Создание макросов
- •Сохранение макросов
- •Выполнение макроса
- •Редактирование макросов
- •Копирование макросов
- •Рабочие группы
- •Изменение файла рабочей группы.
- •Ограничение доступа в Microsoft Access 97
- •Учетные записи
- •Изменение прав владения
- •Присвоение и удаление прав доступа
- •Шифрование бд
- •Создание кода vba с помощью мастеров элементов управления
- •Процедуры
- •Создание процедур обработки событий
- •Редактирование в окне модуля
- •Аргументы процедуры
- •Основные операторы vba Переменные и оператор присваивания
- •Условные операторы
- •Операторы цикла
Условные операторы
В языке VBA, как и в других языках программирования, основными элементами, управляющими ходом выполнения процедуры, являются условные операторы. Наиболее простой из них — оператор If . . . Then:
If Полина = "Ж" Then
Поздравление = "С 8 марта!"
End if
Если условие, заданное выражением между ключевыми словами If и Then выполняется, соблюдаются инструкции внутри блока, ограниченного ключевыми словами Then и End if. Иначе операторы между ключевыми словами не выполняются, а ACCESS перейдет к обработке оператора, который следует за ключевыми слова End if. В случае необходимости произвести два различных действия (одно при соблюдении условия, а второе — нет), надлежит воспользоваться полной формой оператора If:
If выражение Then
Оператор1
Else
Оператор2
End if
Если условие соблюдается, выполняется Оператор1 (или группа операторов, расположенных между ключевыми словами Then и Else, а если не соблюдается — Оператор2 (или группа операторов, расположенных между ключевыми словами Else и End if.
Однако, не всегда возможны два варианта решения. Учитывая это, VBA предоставляет в распоряжение пользователей оператор Select Case, предназначенный для выбора одного из множеств вариантов решений:
Select Case Город
Case "Киев"
Код_МТС = "044"
Case "Москва"
Код_МТС = "095"
Case "Тула"
Код_МТС = "0872"
Case Else
Print "Я не знаю такого города!"
End Select
При выполнении этого оператора проверяется значение переменной Город. В зависимости от результата проверки переменной Код_МТС присваивается телефонной код некоторого города. Если значение переменной Город не совпадает ни с одним из значений, перечисленных в строках с ключевым словом Case, производится действие, указанной между ключевыми словами Case Else и End Select.
Операторы цикла
Цикл используется для многократного повторения одной или нескольких инструкций. Количество повторений цикла связано с некоторым условием. В VBA предусмотрено несколько разновидностей циклов. Простейшим примером циклической конструкции является так называемый цикл по счетчику.
For Счетчик = 1 To 10
Print Счетчик
Next Счетчик
Цикл по счетчику ограничивается ключевыми словами For и Next. После ключевого слова For указывается имя переменной, которая будет выполнять роль счетчика, после знака равенства — начальное значение счетчика, а после ключевого слова To — конечное значение счетчика.
Еще одна разновидность цикла — While-цикл. Условие выполнения команд внутри такого цикла определяется некоторым условным оператором:
Do While Счетчик <> 10
Loop
Разновидностью цикла Do является Until-цикл, который выполняется, пока условное выражение ложно:
Do Until Счетчик
Счетчик=Счетчик+1
Loop
