Propriedade de Field.Attributes (DAO)

Aplica-se ao: Access 2013, Office 2013

Define ou retorna um valor que indica uma ou mais características de um objeto Field. Long de leitura/gravação.

Sintaxe

expressão .Attributes

expressão Uma variável que representa um objeto de Campo.

Comentários

A propriedade Attributes propriedade de um objeto Field especifica características do campo representado pelo objeto Field. A propriedade Attributes é armazenada como um único Inteiro Long e é a soma das seguintes constantes Long:

Constante	Valor	Descrição
dbAutoIncrField	16	O valor do campo para novos registros é automaticamente incrementado em um inteiro Long exclusivo que não pode ser alterado (em um espaço de trabalho do Microsoft Access, aceito somente para tabelas de banco de dados do mecanismo de banco de dados do Microsoft Access).
dbDescending	1	O campo é classificado em ordem decrescente (Z para A ou 100 para 0); essa opção se aplica a um objeto Field em uma coleção Fields de um índice Index. Se você omitir essa constante, o campo é classificado em ordem crescente (A até Z ou de 0 a 100). Esse é o valor padrão para campos Index e TableDef (somente workspaces do Microsoft Access).
dbFixedField	1	O tamanho do campo é corrigido (padrão para Campos numéricos).
dbHyperlinkField	32768	O campo contém informações sobre o hiperlink (apenas campos Memorando).
dbSystemField	8192	O campo armazena informações de replicação de réplicas; Não é possível excluir esse tipo de campo (espaço de trabalho apenas do Microsoft Access).
dbUpdatableField	32	O valor de campo pode ser alterado.
dbVariableField	2	O tamanho do campo é variável (somente campos de texto).\

Para um objeto que não está acrescentado a uma coleção, essa propriedade é de leitura/gravação. Para um objeto Field acrescentado, a disponibilidade da propriedade Attributes depende do objeto que contém a coleção Fields.

Se o objeto Fields pertencer a	Attributes serão
Indexobject	Leitura/gravação até o objeto TableDef que o objeto do Índice é anexado ao seu anexo para o objeto de Banco de dados; em seguida, a propriedade é somente leitura.
QueryDefobject	Somente leitura
Recordsetobject	Somente leitura
Relationobject	Sem suporte
TableDefobject	Leitura/gravação

Quando você define vários atributos, é possível combiná-los somando as constantes apropriadas. Qualquer valor inválido é ignorado sem gerar nenhum erro.

Exemplo

Este exemplo exibe a propriedade Attributes dos objetos Field, Relation e TableDef no banco de dados 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