Поделиться через


Свойство Field2.Attributes (DAO)

Область применения: Access 2013, Office 2013

Задает или возвращает значение, указывающее одну или несколько характеристик объекта Field2 . Для чтения и записи, Long.

Синтаксис

expression .Attributes

expression — переменная, представляющая объект Field2.

Замечания

Значение указывает характеристики поля, представленного объектом Field2 , и может быть сочетанием этих констант.

Константа

Описание

dbAutoIncrField

Значение поля для новых записей автоматически увеличивается на уникальные длинное целочисленное значение, которое нельзя изменить (в рабочей области Microsoft Access, поддерживается только для таблиц базы данных ядра СУБД Microsoft Access).

dbDescending

Поле отсортировано в порядке убывания (от Z до A или от 100 до 0); Этот параметр применяется только к объекту Field2 в коллекции Fields объекта Index . Если опустить эту константу, поле сортируется в порядке возрастания (от А до Я или от 0 до 100). Это значение по умолчанию для полей Index и TableDef (только для рабочих областей Microsoft Access).

dbFixedField

Размер поля закреплен (по умолчанию для числовых полей).

dbHyperlinkField

Поле содержит сведения о гиперссылке (только для полей Memo).

dbSystemField

В поле хранятся сведения о репликации для реплик; Вы не можете удалить поля этого типа (только для рабочих областей Microsoft Access).

dbUpdatableField

Можно изменить значение данного поля.

dbVariableField

Переменный размер поля (только для текстовых полей).

Для объекта, который еще не добавлен в коллекцию, это свойство предназначено для чтения и записи. Для добавленного объекта Field2 доступность свойства Attributes зависит от объекта, содержащего коллекцию Fields .

Если объект Field принадлежит к

тогда атрибуты будут

Объект Index

Чтение и запись до того момента, пока объект TableDef, который добавляется к объекту Index, добавляется к объекту Database; после чего свойство будет доступно только для чтения.

Объект QueryDef

Только для чтения

Объект Recordset

Только для чтения

Объект Relation

Не поддерживается

Объект TableDef

Чтение и запись

Если вы задаете несколько атрибутов, их можно объединить, суммируя соответствующие константы. Любые недопустимые значения игнорируются без сообщения об ошибке.

Пример

В этом примере отображается свойство Attributes для объектов Field2, Relation и TableDef в базе данных Northwind.

Sub AttributesX() 
 
 Dim dbsNorthwind As Database 
 Dim fldLoop As Field2 
 Dim relLoop As Relation 
 Dim tdfloop As TableDef 
 
 Set dbsNorthwind = OpenDatabase("Northwind.mdb") 
 
 With dbsNorthwind 
 
 ' Display the attributes of a TableDef object's 
 ' fields. 
 Debug.Print "Attributes of fields in " & _ 
 .TableDefs(0).Name & " table:" 
 For Each fldLoop In .TableDefs(0).Fields 
 Debug.Print " " & fldLoop.Name & " = " & _ 
 fldLoop.Attributes 
 Next fldLoop 
 
 ' Display the attributes of the Northwind database's 
 ' relations. 
 Debug.Print "Attributes of relations in " & _ 
 .Name & ":" 
 For Each relLoop In .Relations 
 Debug.Print " " & relLoop.Name & " = " & _ 
 relLoop.Attributes 
 Next relLoop 
 
 ' Display the attributes of the Northwind database's 
 ' tables. 
 Debug.Print "Attributes of tables in " & .Name & ":" 
 For Each tdfloop In .TableDefs 
 Debug.Print " " & tdfloop.Name & " = " & _ 
 tdfloop.Attributes 
 Next tdfloop 
 
 .Close 
 End With 
 
End Sub