26.12.2014 Views

Управление базами данных Access на VBA - eDrive

Управление базами данных Access на VBA - eDrive

Управление базами данных Access на VBA - eDrive

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

22<br />

• [Reports! Отчет!] Объект<br />

• Forms («имяОбъекта»)<br />

• Reports («имяОбъекта»)<br />

• Forms (индексОбъекта)<br />

• Reports (индексОбъекта)<br />

• Forms (ссылоч<strong>на</strong>яПеремен<strong>на</strong>я)<br />

• Reports (ссылоч<strong>на</strong>яПеремен<strong>на</strong>я)<br />

Точка отделяет объект от его свойства или метода, а также разделяет объекты<br />

подчиненной формы (отчета):<br />

• [Forms! Форма!] [Объект].[свойствоИлиМетод]<br />

• [Reports! Отчет!] [Объект].[свойствоИлиМетод]<br />

• [Forms!Глав<strong>на</strong>яФорма!]Подчинен<strong>на</strong>яФорма.[Form!] Объект<br />

• [Forms!Глав<strong>на</strong>яФорма!]Подчинен<strong>на</strong>яФорма.ееИсточникДанных<br />

Обращение к активным объектам класса Screen в ряде случаев заменяют их<br />

свойствами ActiveDataSheet, ActiveForm, ActiveControl, PreviousControl,<br />

Application, Parent. А для ссылки <strong>на</strong> активную форму или отчет из модулей<br />

их классов удобно использовать конструкции<br />

• Me.Член<br />

• Me!Объект<br />

Закрытие объектов выполняется методом Close класса <strong>Access</strong> и объекта<br />

DoCmd, а выход из <strong>Access</strong> — методом Quit:<br />

DoCmd.Close [типОбъекта, имяОбъекта], [параметрСохранения]<br />

• Application.Quit [параметрСохранения]<br />

• DoCmd.Quit [параметрСохранения]<br />

где типОбъекта и параметрСохранения выражаются встроенными<br />

константами.<br />

Примеры<br />

Sub ОткрытиеФормы<strong>Access</strong> ()<br />

DoCmd.OpenForm "Форма Таблицы1"<br />

MsgBox Forms![Форма Таблицы1].Caption<br />

End Sub<br />

Sub ОткрытиеФорм<strong>Access</strong> ()<br />

On Error GoTo ошибка

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!