Задание свойств объектов DAO в Visual Basic
Область применения: Access 2013 | Access 2016
Объекты доступа к данным (DAO) позволяют управлять структурой базы данных и содержащимися в ней данными из Visual Basic. Многие объекты DAO соответствуют объектам, отображаемым в базе данных, например объект TableDef соответствует таблице Microsoft Access. Объект Field соответствует полю в таблице.
Большинство свойств, которые можно задать для объектов DAO, — это свойства DAO. Эти свойства определяются ядром СУБД Microsoft Access и задаются таким же образом в любом приложении, включающее ядро СУБД Access. Некоторые свойства, которые можно задать для объектов DAO, определяются Microsoft Access и не распознаются автоматически ядром СУБД Access. Настройка свойств для объектов DAO зависит от того, определяется ли свойство ядром СУБД Access или Microsoft Access.
Задание свойств DAO для объектов DAO
Чтобы задать свойство, определенное ядром СУБД Access, обратитесь к объекту в иерархии DAO. Самый простой и быстрый способ сделать это — создать переменные объекта, представляющие различные объекты, с которыми необходимо работать, и ссылаться на переменные объекта в последующих шагах кода. Например, следующий код создает новый объект TableDef и задает его свойство Name :
Dim dbs As DAO.Database
Dim tdf As DAO.TableDef
Set dbs = CurrentDb
Set tdf = dbs.CreateTableDef
tdf.Name = "Contacts"
Задание свойств Microsoft Access для объектов DAO
При установке свойства, определенного в Microsoft Access, но применимого к объекту DAO, ядро СУБД Access не распознает его как допустимое свойство автоматически. При первом установке свойства необходимо создать свойство и добавить его в коллекцию Properties объекта, к которому оно применяется. После того как свойство находится в коллекции Properties , его можно задать таким же образом, как и любое свойство DAO.
Если свойство задано впервые в пользовательском интерфейсе, оно автоматически добавляется в коллекцию Properties , и его можно задать в обычном режиме.
При написании процедур для задания свойств, определенных Microsoft Access, необходимо включить код обработки ошибок, чтобы убедиться, что свойство, которое вы задаете, уже существует в коллекции Properties . Дополнительные сведения см. в разделе справки о методе CreateProperty или отдельном свойстве.
Помните, что при создании свойства необходимо правильно указать его свойство Type , прежде чем добавлять его в коллекцию Properties . Свойство Type можно определить на основе сведений в разделе Параметры раздела справки для отдельного свойства. В следующей таблице приведены рекомендации по определению параметра свойства Type .
| Если параметр свойства имеет значение | Параметр свойства Type должен иметь значение |
|---|---|
| Строка | dbText |
| Истинный / Ложных | dbBoolean |
| Целое число. | dbInteger |
В следующей таблице перечислены некоторые свойства, определенные Microsoft Access, которые применяются к объектам DAO.
| Объект DAO | Свойства, определенные Microsoft Access |
|---|---|
| База данных | AppTitle, AppIcon, StartupShowDBWindow, StartupShowStatusBar, AllowShortcutMenus, AllowFullMenus, AllowBuiltInToolbars, AllowToolbarChanges, AllowBreakIntoCode, AllowSpecialKeys, Replicable, ReplicationConflictFunction |
| Контейнер SummaryInfo | Title, Subject, Author, Manager, Company, Category, Keywords, Comments, Hyperlink Base (См. вкладку Сводка диалогового окна Свойства databaseName, доступно, выбрав Свойства базы данных в меню Файл).) |
| Контейнер UserDefined | (Перейдите на вкладку Сводка диалогового окна Свойства databaseName, чтобы открыть его, выбрав Свойства базы данных в меню Файл.) |
| TableDef | DatasheetBackColor, DatasheetCellsEffect, DatasheetFontHeight, DatasheetFontItalic, DatasheetFontName, DatasheetFontUnderline, DatasheetFontWeight, DatasheetForeColor, DatasheetGridlinesBehavior, DatasheetGridlinesColor, Description, FrozenColumns, RowHeight, ShowGrid |
| QueryDef | DatasheetBackColor, DatasheetCellsEffect, DatasheetFontHeight, DatasheetFontItalic, DatasheetFontName, DatasheetFontUnderline, DatasheetFontWeight, DatasheetForeColor, DatasheetGridlinesBehavior, DatasheetGridlinesColor, Description, FailOnError, FrozenColumns, LogMessages, MaxRecords, RecordLocks, RowHeight, ShowGrid, UseTransaction |
| Поле | Caption, ColumnHidden, ColumnOrder, ColumnWidth, DecimalPlaces, Description, Format, InputMask |
См. также
- Форум для разработчиков Access
- Помощь при работе с Access на support.office.com
- Форумы Access на UtterAccess
- Справочный центр (FMS) для разработки и VBA программирования для Access
- Публикации по Access на StackOverflow
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.