时 间:2016-08-02 13:29:20
作 者:摘 要:用代码创建数据表并新增字段
正 文:
在DAO中,可以通过CreateTableDef方法在数据库中创建新的数据表,其具体的语法格式如下所示:
Set[表对象变量]=[数据库对象].CreateTableDef([表名])
在为数据库添加了指定名称的表后,还需将其添加到表对象集合中,才能够真正实现将表添加到数据库中,具体的语法格式如下所示:
[数据库].TableDefs.Append[表]
如果需要为表中新增字段,则需要使用下面的语句来实现:
[表].Field.Append[表].CreateField([字段名],[数据类型],[长度限制])
其中,字段类型为Access数据类型常量,字段长度限制单位为字节,表示该字段允许的多长的数据输入。
在DAO中,需要为某个字段设置字段特征,可以使用字段的Attributes属性,其具体用法格式为:
[字段].Attributes[字段特征常量]
其中,字段特征常量为数据库内置的常量,用于表示字段的特征,比如用于表示不可更改的自动编号的常量dbAutoIncrField.
附 件:
GIF 图:
代 码:
On Error GoTo Errorhandler
Dim db As DAO.Database
Dim Tb As DAO.TableDef
Dim fld As DAO.Fiel