Программа на языке Microsoft Visual Basic пишется в виде блоков, которые называют процедурами. Процедура содержит набор инструкций Visual Basic, с помощью которых выполняются действия или рассчитывается значение. Процедурой обработки события называют процедуру, выполняющуюся в ответ на событие, инициируемое пользователем или программой или генерируемое системой. Событием называют определенное действие, возникающее при работе с конкретным объектом. Microsoft Access реагирует на целый ряд событий: нажатие кнопки мыши, изменение данных, открытие или закрытие форм и т.д. С помощью процедуры обработки события пользователь имеет возможность определить собственные отклики на события, происходящие в форме, отчете или элементе управления. Существуют процедуры двух типов: Sub и Function.
Процедура-подпрограмма Sub выполняет действие или набор действий, но не возвращает значение. Пользователь имеет возможность создавать процедуры Sub самостоятельно или использовать процедуры обработки событий, определенные в Microsoft Access.
Процедура-функция Function (часто такие процедуры называют просто функциями) возвращает значение, например, полученное в результате расчетов. Visual Basic включает ряд встроенных функций; например, функция Now возвращает текущее значение даты и времени. В дополнение к встроенным функциям, пользователь имеет возможность самостоятельно создавать функции, которые называют специальными или пользовательскими функциями
I. Рассмотрим пример встроенной процедуры обработки событий (например: при помощи мастера кнопок):
- Открыть форму Пациенты в режиме конструктора.
- Вывести на экран панель элементов. Установить кнопку мастера встраивания в нажатое положение (вторая кнопка на панели с рисунком в виде палочки, из которой сыплется песок).
- Щелкнуть по элементу под названием Кнопка. Затем в увеличенной области заголовка формы рядом с надписью растянуть небольшой квадратик. При этом должен вступить в действие мастер встраивания кнопки, который связывает с нажатием кнопки определенное действие.
Пользуясь подсказками мастера связать с нажатием кнопки закрытие формы.
- Закрыть конструктор. Сохранить. Проверить.
Аналогично можно встроить кнопку на открытие диаграммы, печать формы и т.п.
II. Теперь рассмотрим возможность создания процедуры Sub самостоятельно:
- Открыть форму Пациенты в режиме конструктора.
- Вызвать панель элементов. Для этого на панели инструментов надо утопить кнопку с пиктограммой молотка и гаечного ключа. На панели элементов найти элемент с пиктограммой Аа (наз. Надпись), затем растянуть небольшой прямоугольник рядом с полем «Возраст». В этом прямоугольнике напечатать «+» и выйти из текстового режима (щелчок мыши в любом месте формы или Enter).
- Для написания процедуры обработка события щелкнуть правой клавишей мыши на надпись «+» (одновременно выделяя ее и вызывая контекстное меню) и в контекстном меню выбрать опцию обработка событий. В открывшемся окне Построитель выбрать Программы. Нажать ОК.
- В процедуре - подпрограмме Sub для кнопки №…для события Нажатие кнопки (в этом месте моргает курсор), напечатать присвоение полю Возраст увеличение на 10: [Возраст] = [Возраст]+10
- Используя условный оператор If … Then (если … тогда), определить ограничение и возврат на меньшее значение для возраста. На следующей строке напечатать If [Возраст] >100 Then [Возраст]=5
- Для проверки правильности написания процедуры необходимо на панели инструментов нажать кнопку Компилировать, в виде стопки листов на которую сверху указывает стрелка.
- Затем все закрыть, сохранить и проверить работу кнопки, открыв форму.
