Свойство Field.Attributes (DAO)
Область применения: Access 2013, Office 2013
Задает или возвращает значение, которое определяет одну или несколько характеристик объекта Field. Для чтения и записи, Long.
Синтаксис
expression .Attributes
выражение: переменная, представляющая объект Field.
Комментарии
Свойство Attributes объекта Field указывает характеристики поля, представленного объектом Field. Свойство Attributes хранится как одно длинное целое число и является суммой следующих длинных констант:
| Константа | Значение | Описание |
|---|---|---|
| dbAutoIncrField | 16 | Значение поля для новых записей автоматически увеличивается на уникальные длинное целочисленное значение, которое нельзя изменить (в рабочей области Microsoft Access, поддерживается только для таблиц базы данных ядра СУБД Microsoft Access). |
| dbDescending | 1 | Для поля выполняется сортировка по убыванию (от Я до А или 100 до 0); этот параметр применяется только для объекта Field в коллекции Fields объекта Index. Если опустить эту константу, поле сортируется в порядке возрастания (от А до Я или от 0 до 100). Это значение по умолчанию для полей Index и TableDef (только для рабочих областей Microsoft Access). |
| dbFixedField | 1 | Размер поля закреплен (по умолчанию для числовых полей). |
| dbHyperlinkField | 32768 | Поле содержит сведения о гиперссылке (только для полей Memo). |
| dbSystemField | 8192 | Поле сохраняет информацию о репликацию для реплик; вы не можете удалить этот тип поля (только для рабочей области Microsoft Access). |
| dbUpdatableField | 32 | Можно изменить значение данного поля. |
| dbVariableField | 2 | Переменный размер поля (только для текстовых полей).\ |
Для объекта, который еще не добавлен в коллекцию, это свойство предназначено для чтения и записи. Для добавленного объекта Field объект доступность свойства Attributes зависит от объекта, содержащего коллекцию Fields.
| Если объект Field принадлежит к | тогда свойство Attributes является |
|---|---|
| ОбъектIndex | Чтение и запись до момента, когда объект TableDef, к которому добавляется объект Index, не будет добавлен к объекту Database; после чего свойство будет доступно только для чтения. |
| ОбъектQueryDef | Только для чтения |
| ОбъектRecordset | Только для чтения |
| ОбъектRelation | Не поддерживается |
| ОбъектTableDef | Чтение и запись |
Если вы задаете несколько атрибутов, их можно объединить, суммируя соответствующие константы. Любые недопустимые значения игнорируются без сообщения об ошибке.
Пример
Этот пример отображает свойство Attributes для объектов Field, Relation и TableDef в базе данных Northwind.
Sub AttributesX()
Dim dbsNorthwind As Database
Dim fldLoop As Field
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