Método TableDef.CreateField (DAO)

Aplica-se ao: Access 2013, Office 2013

Cria um novo objeto Field (apenas espaços de trabalho do Microsoft Access).

Sintaxe

expressão .CreateField(Name, Type, Size)

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

Parâmetros

Nome	Necessária/opcional	Tipo de dados	Descrição
Name	Opcional	Variant	Uma cadeia de caracteres que nomeia o novo objeto Field. Consulte a propriedade Name para obter detalhes sobre nomes válidos de Field.
Type	Opcional	Variant	Uma constante que determina o tipo de dado do novo objeto Field. Consulte a propriedade Type para obter tipos de dados válidos.
Tamanho	Opcional	Variant	Um número inteiro indicando o tamanho máximo em bytes, de um objeto Field com texto. Consulte a propriedade Size para obter valores válidos de tamanho. Esse argumento será ignorado para os campos numéricos e de largura fixa.

Valor de retorno

Campo

Comentários

Você pode usar o método CreateField para criar um novo campo, bem como especificar o nome, o tipo dos dados e o tamanho do campo. Se você omitir uma ou mais das partes opcionais ao utilizar CreateField, poderá usar uma instruções de atribuição apropriada para definir ou redefinir a propriedade correspondente antes de acrescentar o novo objeto a uma coleção. Depois de acrescentar o novo objeto, será possível alterar algumas, mas não todas as suas configurações de propriedade. Consulte os tópicos de propriedade individuais para obter mais detalhes.

Os argumentos type e size se aplicam somente aos objetos Field em um objeto TableDef. Estes argumentos são ignorados quando um objeto Field está associado a um objeto Index ou Relation.

Se Name se referir a um objeto que já é faz parte da coleção, ocorrerá um erro de tempo de execução quando você usar o método Append.

Para remover um objeto Field de uma coleção Fields, use o método Delete na coleção. Não é possível excluir um objeto Field de uma coleção Fields do objeto TableDef depois de criar um index que faça referência ao campo.

Link fornecido pela comunidade UtterAccess. UtterAccess é o fórum principal de wiki e de ajuda do Microsoft Access.

• Adicionar um campo de hiperlink a uma tabela existente com DAO

Exemplo

O exemplo a seguir mostra como criar um item de lista. O método CreateField cria um campo denominado NomeCompleto. A propriedade de expressão, em seguida, está definida como a expressão que calcula o valor do campo.

Código de exemplo fornecido por: a Referência do programador do Microsoft Access 2010.

    Sub CreateCalculatedField()
        Dim dbs As DAO.Database
        Dim tdf As DAO.TableDef
        Dim fld As DAO.Field2
        
        ' get the database
        Set dbs = CurrentDb()
        
        ' create the table
        Set tdf = dbs.CreateTableDef("tblContactsCalcField")
        
        ' create the fields: first name, last name
        tdf.Fields.Append tdf.CreateField("FirstName", dbText, 20)
        tdf.Fields.Append tdf.CreateField("LastName", dbText, 20)
        
        ' create the calculated field: full name
        Set fld = tdf.CreateField("FullName", dbText, 50)
        fld.Expression = "[FirstName] & "" "" & [LastName]"
        tdf.Fields.Append fld
        
        ' append the table and cleanup
        dbs.TableDefs.Append tdf
        
    Cleanup:
        Set fld = Nothing
        Set tdf = Nothing
        Set dbs = Nothing
    End Sub