求教

Question

用DAO对象在已有数据库中建立一张新表，代码如下：dim db as database
dim tb as tableDef
dim fd as field
db=opendatabase("e:\我的文件夹\学生学籍管理")
td=db.createtableDef("表1")
fd=td.createfield("国别",dbchar)       错误行
db.tableDefs.append td
tb.fields.append fd这是我自己写的代码，一运行就会提示“无效的字段数据类型”，错误在我标注的错误行处。大家帮我看看是怎么回事啊郁闷！！！
如果有错误要改动的话最好在我写的基础上。谢谢