- •Системы управления базами данных (субд) access 97 for Windows 95
- •5. Создание приложений с использованием vba
- •5.1. Мастер создания бд
- •5.2. Создание приложений
- •5.3. Переход от макросов к vba
- •6. Среда программирования Access
- •If ... Then ... Else ... End If
- •Темплан 1998 г.
- •344022, Ростов-на-Дону, Социалистическая, 162
If ... Then ... Else ... End If
Select Case ... End Select
Другая, не менее эффективная возможность - это повторяющиеся циклы. VBA предлагает два типа операторов цикла:
Do ... Loop
For ... Next
Оператор Do ... Loop используется в том случае, когда необходимо повторять некоторую процедуру до тех пор, пока условие остается истинным. Оператор имеет два необязательных элемента - While и Until. Опция While указывает, что оператор Do ... Loop должен выполняться до тех пор, пока условие истинно. Опция Until действует наоборот - определяет выполнение операторов программы, заключенных между операторами Do ... Loop, до тех пор, пока условие ложно. Оператор Exit Do используется для немедленного прекращения цикла.
Оператор For ... Next используется в тех случаях, когда цикл необходимо повторить определенное количество раз.
Если при выполнении какой-либо процедуры будет обнаружена ошибка, Access выдаст сообщение об ошибке и прекратит выполнение процедуры. Оператор On Error обеспечивает возможность продолжения работы процедуры даже при обнаружении ошибки. Синтаксис оператора On Error :
On Error GoTo имя метки
On Error Resume Next
Оператор On Error GoTo указывает, что при обнаружении ошибки Access выполнит инструкции, на которые указывает метка. Оператор On Error Resume Next указывает Access, что обнаруженную ошибку следует пропустить и перейти к выполнению следующего оператора в программе.
Литература:
Праг К.Н., Ирвин М.Р. Библия пользователя Access для Windows 95, 3-е издание - К.: Диалектика, 1996. - 576 с.
Вейскас Д. Эффективная работа с Microsoft Access 2 / Перев. с англ. - СПб: Питер, 1995. - 864 с.
Корректор Гладких Н.Е.
Темплан 1998 г.
ЛР 020818 от 20.09.93
Подписано в печать 26.10.98 Формат 60*84 1/16 Ризограф Тираж 15
Бумага тип. №1 Уч. - изд. л. 4,0 Бесплатно Заказ
Редакционно-издательский центр
Ростовского государственного
строительного университета
344022, Ростов-на-Дону, Социалистическая, 162
Галин Access 95/97