Método TableDef.CreateField (DAO)

Se aplica a: Access 2013 | Office 2013

Crea un nuevo objeto Field (solo para áreas de trabajo de Microsoft Access).

Sintaxis

expression .CreateField(Name, Type, Size)

expression Variable que representa un objeto TableDef.

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Name	Opcional	Variant	Una cadena que asigna nombres únicos al nuevo objeto Field. Consulte la propiedad Name para obtener más detalles sobre los nombres de Field válidos.
Type	Opcional	Variant	Una constante que determina el tipo de datos del nuevo objeto Field. Consulte la propiedad Type para obtener los tipos de datos válidos.
Size	Opcional	Variant	Un Entero que indica el tamaño máximo, en bytes, de un objeto Field que contiene texto. Consulte la propiedad Size para obtener valores de tamaño válidos. Se omite este argumento para los campos numéricos y de ancho fijo.

Valor devuelto

Field

Observaciones

Puede utilizar el método CreateField para crear un nuevo campo, así como para especificar el nombre, el tipo de datos y el tamaño del campo. Si omite una o más partes opcionales cuando utiliza CreateField, puede utilizar una instrucción de asignación adecuada para establecer o restablecer la propiedad correspondiente antes de anexar el nuevo objeto a la colección. Tras anexar el nuevo objeto, puede modificar algunos pero no todos los valores de la propiedad. Vea los temas de determinadas propiedades para obtener más detalles.

Los argumentos type y size se aplican sólo a objetos Field de un objeto TableDef. Estos argumentos se omiten cuando se asocia un campo Field con un objeto Index o Relation.

Si Name hace referencia a un objeto que ya es miembro de la colección, se produce un error en tiempo de ejecución cuando se utiliza el método Append.

Para eliminar un objeto Field de una colección Fields, utilice el método Delete de una colección. No puede eliminar un objeto Field de una colección Fields de un objeto TableDef después de crear un índice que hace referencia al campo.

Vínculo proporcionado por la comunidad de UtterAccess. UtterAccess es el principal foro de ayuda y wiki de Microsoft Access.

• Agregar un campo de hipervínculo a una tabla existente con DAO

Ejemplo

En el siguiente ejemplo se muestra cómo crear un campo calculado. El método CreateField crea un campo llamado FullName. Después, la propiedad Expression se configura con la expresión que calcula el valor del campo.

Código de ejemplo proporcionado por la Referencia del programador de 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