Проверка условий на значения данных в программах
Для проверки правильности ввода данных в элемент управления в форме или в поле таблицы определяют свойство поля или правила проверки на значения для поля или записи в базовой таблице. Макросы и процедуры обработки события используют в тех случаях, когда требуется задать более сложные условия на значения.
Ситуации, в которых условия на значение задаются с помощью макросов или процедур обработки событий:
В условия на значение включаются условия для нескольких элементов управления в форме. Например, перед сохранением записи проверяется заполнение двух или трех полей.
Для разных ошибок требуется вывести различные сообщения об ошибках. Например, одно сообщение выводится, когда введенное значение выходит за верхнюю границу допустимого диапазона, а другое, когда введенное значение меньше минимально допустимого.
Требуется предоставить пользователям возможность нарушить условие на значение. В таких случаях обычно выводят предупреждение с приглашением подтвердить ввод данных.
Выражения, определяющие условия на значения, содержат функции или ссылки на элементы управления в других формах.
Условия на значение определяются для нескольких форм одновременно и требуется обеспечить возможность применения универсальных условий к разным формам.
Использование
процедуры обработки события
Можно создать процедуру обработки события, в которой определяется значение, введенное в поле «Страна», а затем проверяется соответствие значения, вводящегося в поле «Индекс», стандартам этой страны.
Вначале откройте в режиме конструктора форму, содержащую элементы управления. Затем определите для процедуры обработки события «До обновления» (BeforeUpdate) следующую программу Visual Basic, выводящую различные сообщения в зависимости от значения поля «Страна» и длины значения поля «Индекс».
Примечание. Программа Visual Basic определяется для процедуры обработки события «До обновления» (BeforeUpdate) формы, а не элементов управления, поскольку в данном условии проверяются значения двух элементов управления.
Private Sub Form_BeforeUpdate(Cancel As Integer)
Select Case Me![Country]
Case "France"
If Len(Me![PostalCode]) <> 5 Then
MsgBox "PostalCode must be 5 characters."
Cancel = True
End If
Case "Japan"
If Len(Me![PostalCode]) <> 3 Then
MsgBox "PostalCode must be 3 characters."
Cancel = True
End If
End Select
End Sub
При использовании этой формы для добавления нового поставщика Microsoft Access запустит процедуру проверки условия на значение после ввода новой записи, но до ее сохранения в таблице «Поставщики». При выполнении любого из условий, определенных в процедуре, Access выведет на экран соответствующее сообщение, а запись не будет сохранена в таблице «Поставщики».
Создание процедуры обработки события
Microsoft Access позволяет легко создать процедуру обработки событий. При указании для свойства события формы, отчета или элемента управления значения «[Процедура обработки события]» Microsoft Access создает заготовку процедуры обработки события. Пользователю остается только задать действия, выполняемые в ответ на определенные события в форме, отчете или элементе управления. Например, имеется возможность запустить программу при нажатии пользователем кнопки или при изменении данных.
Откройте форму или отчет в режиме конструктора формы или режиме конструктора отчета.
Выведите окно свойств для формы, отчета или для раздела или элемента управления формы или отчета.
Выберите вкладку События
Выберите свойство события, в ответ на которое должна выполняться процедура. Например, для того, чтобы открыть процедуру обработки события Изменение (Change), выберите свойство Изменение (OnChange).
Нажмите кнопку построителя … рядом с ячейкой свойства, чтобы открыть окно диалога Построители.
Выберите двойным нажатием кнопки мыши элемент «Программы» для получения в модуле формы или модуле отчета инструкций Sub и End Sub. Эти инструкции описывают, т.е. определяют процедуру обработки события. Microsoft Access автоматически описывает в модуле формы или отчета процедуры обработки события для каждого объекта и события с использованием ключевого слова Private, указывающим, что доступ к этой процедуре возможен только из других процедур в том же модуле.
Добавьте в процедуру программу, которая должна выполняться в ответ на событие. Например, для подачи звукового сигнала через динамик компьютера при изменении данных в поле «Название» включите инструкцию Beep в процедуру обработки события Название_Change:
Private Sub Название_Change()
Beep
End Sub
Процедура обработки события выполняется каждый раз при возникновении этого события для объекта.