如何在Access VBA中查找表的字段宽度

Question

在Access DAO.TablDef有一个函数CreateField(Name,Type,Size)我正在寻找现有表字段的大小。我有一个db_text类型的表格列，大小为6. DAO recordset有fields类。我可以找到它的字段类型但不是字段大小。我尝试过DefinedSize，NumericScale和ActualSize。谁知道如何找到字段大小？谢谢

Dim dars As Dao.Recordset

Set dars = CurrentDb.OpenRecordset("TableName")

debug.print dars.Fields("FieldName").Type

debug.print dars.Fields("FieldName").DefinedSize
debug.print dars.Fields("FieldName").NumericScale
debug.print dars.Fields("FieldName").ActualSize

dars.Close
Set dars = Nothing

Answer 1

Size属性包含字段大小：

debug.print dars.Fields("FieldName").Properties!Size