Задание свойств объектов данных ActiveX в Visual Basic

Объекты данных ActiveX (ADO) позволяют управлять структурой базы данных и данными, содержащимися в ней из Visual Basic. Многие объекты ADO соответствуют объектам, которые отображаются в базе данных, например объект Table соответствует таблице Access. Объект Field соответствует полю в таблице.

Большинство свойств, которые можно задать для объектов ADO, являются свойствами ADO. Эти свойства определяются ядром СУБД Access и задаются таким же образом в любом приложении, включающее ядро СУБД Access. Некоторые свойства, которые можно задать для объектов ADO, определяются Access и не распознаются автоматически ядром СУБД Access. Настройка свойств для объектов ADO зависит от того, определяется ли свойство ядром СУБД Access или Access.

Задание свойств ADO для объектов ADO

Чтобы задать свойство, определенное ядром СУБД Access, обратитесь к объекту в иерархии ADO. Самый простой и быстрый способ сделать это — создать переменные объекта, представляющие различные объекты, с которыми необходимо работать, и ссылаться на переменные объекта в последующих шагах кода. Например, следующий код создает новый объект TableDef и задает его свойство Name :

Dim tbl As New ADOX.Table 
Dim cnn As ADODB.Connection 
Set cnn = CurrentProject.Connection 
tbl.Name = "Contacts"

Установка свойств Access для объектов ADO

При установке свойства, определенного в Access, но применяемого к объекту ADO, ядро СУБД Access не распознает свойство как допустимое свойство автоматически. При первом установке свойства необходимо создать свойство и добавить его в коллекцию Properties объекта, к которому оно применяется. После того как свойство находится в коллекции Properties , его можно задать так же, как и любое свойство ADO.

Если свойство задано впервые в пользовательском интерфейсе, оно автоматически добавляется в коллекцию Свойств , и его можно задать в обычном режиме.

При написании процедур для задания свойств, определенных в Access, необходимо включить код обработки ошибок, чтобы убедиться, что свойство, которое вы задаете, уже существует в коллекции Properties .

Помните, что при создании свойства необходимо правильно указать его свойство Type , прежде чем добавлять его в коллекцию Properties . Свойство Type можно определить на основе сведений в разделе Параметры раздела справки для отдельного свойства. В следующей таблице приведены рекомендации по определению параметра свойства Type .

Если параметр свойства имеет значение	Параметр свойства Type должен иметь значение
Строка	adLongVarWChar или adVarWChar
Истинный / Ложных	adBoolean
Целое число.	adInteger

В следующей таблице перечислены некоторые свойства, определяемые доступом, которые применяются к объектам ADO.

Объект ADO	Свойства, определенные Microsoft Access
Connection	AppTitle, AppIcon, StartupShowDBWindow, StartupShowStatusBar, AllowShortcutMenus, AllowFullMenus, AllowBuiltInToolbars, AllowToolbarChanges, AllowBreakIntoCode, AllowSpecialKeys, Replicable, ReplicationConflictFunction
Table	DatasheetBackColor, DatasheetCellsEffect, DatasheetFontHeight, DatasheetFontItalic, DatasheetFontName, DatasheetFontUnderline, DatasheetFontWeight, DatasheetForeColor, DatasheetGridlinesBehavior, DatasheetGridlinesColor, Description, FrozenColumns, RowHeight, ShowGrid
Поле	Caption, ColumnHidden, ColumnOrder, ColumnWidth, DecimalPlaces, Description, Format, InputMask

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.