Пример использования объекта Err

Свойства объекта Err используются для создания окна диалога с сообщением об ошибке. Отметим, что если при создании ошибки Visual Basic с помощью метода Raise предварительно вызывается метод Clear , то значениями свойств объекта Err становятся стандартные значения свойств, определенные Visual Basic.

Dim Msg

' Вывод окна сообщений при возникновении ошибки.

On Error Resume Next ' Отложенный перехват ошибок.

Err.Clear

Err.Raise 6 ' Создаем ошибку "Переполнение".

' Проверка ошибки и вывод окна сообщения.

If Err.Number <> 0 Then

Msg = "Ошибка # " & Str(Err.Number) & " возникла в " _

& Err.Source & Chr(13) & Err.Description

MsgBox Msg, , "Ошибка", Err.Helpfile, Err.HelpContext

End If

Объект Form

Объект Form представляет конкретную форму Microsoft Access. Объект Form является компонентом семейства Forms, в которое входят все текущие открытые формы. В рамках семейства Forms отдельные формы нумеруются с помощью индекса, начинающегося с нуля. Допускаются ссылки на объект Form в семействе Forms либо по имени соответствующей формы, либо по ее индексу в семействе. При ссылках на определенную форму семейства рекомендуется применять ссылки по имени, поскольку индекс формы в семействе может измениться. Имена, содержащие пробелы, следует заключать в квадратные скобки ([ ]).

Синтаксис	Пример
Forms!имяФормы	Forms!ФормаЗаказы
Forms![имя формы]	Forms![Форма Заказы]
Forms("имяФормы")	Forms("ФормаЗаказы")
Forms(индекс)	Forms(0)

Каждый объект Form содержит семейство Controls, включающее все элементы управления в форме. При ссылках на конкретные элементы управления в форме допускаются как явные, так и неявные ссылки на семейство Controls. Программа с неявными ссылками на объекты семейства Controls выполняется быстрее. Ниже демонстрируются два способа ссылки на элемент управления «НовыеДанные» в форме «Заказы»:

' Неявная ссылка.

Forms!Заказы!НовыеДанные

' Явная ссылка.

Forms!Заказы.Controls!НовыеДанные

В следующем примере демонстрируются два способа ссылки на элемент управления «НовыеДанные» в подчиненной форме ctlSubForm, содержащейся в форме «Заказы»:

Forms!Заказы.ctlSubForm.Form!Controls.НовыеДанные

Forms!Заказы.ctlSubForm!НовыеДанные

Семейство Forms

Семейство Forms содержит все формы, открытые в данный момент в базе данных Microsoft Access. Семейство Forms используется в программах Visual Basic или в выражениях для ссылок на формы, открытые в данный момент. Например, для задания или возвращения значений свойств конкретных форм бывает удобно организовать перебор всех компонентов семейства Forms. Компоненты семейства обычно перебираются с помощью инструкции For Each...Next.

Допускаются ссылки на конкретный объект Form в семействе Forms либо по имени соответствующей формы, либо по ее индексу в семействе. При ссылках на определенную форму семейства рекомендуется применять ссылки по имени, поскольку индекс формы в семействе может измениться.

Индексация компонентов семейства Forms начинается с нуля. Ссылки на форму по индексу имеют вид Forms(0) для первой открытой формы в семействе, Forms(1) для второй и т.д. Если сначала открыта форма Form1, а после нее Form2, то ссылка по индексу на Form2 в семействе Forms выглядит как Forms(1). Если затем форма Form1 будет закрыта, то ссылка по индексу на Form2 в семействе Forms будет иметь вид Forms(0).

Примечание. Для того чтобы составить перечень всех форм базы данных, как открытых, так и закрытых, следует выполнить перебор компонентов семейства Documents объекта Container типа Forms. При этом свойство Name каждого конкретного объекта Document возвращает имя формы.

Не допускается удаление или добавление пользователем объектов Form в семействе Forms.