Vb6 以编程方式将列注释添加到Microsoft Access-97数据库

我必须以编程方式使用新表和列更新大量Access-97数据库，并希望填写每个新列的描述。为此，我创建了以下代码：-

Dim MyTable  As TableDef
Dim NewField As Field

' Fill in MyTable...

Set NewField  = MyTable.CreateField("MyColumn")
NewField.Type = WantedType
NewField.Size = WantedSize

MyTable.Fields.Append NewField

但是没有属性

NewField.Description

我试图创建这样一个属性：-

Call NewField.CreateProperty("Description", dbText, "My Comment", True)

但这没有任何作用

放弃这种方法，我尝试创建一个SQL语句来执行以设置描述，如下所示：-

ALTER TABLE MyTable ALTER COLUMN MyColumn

但后来发现Access 97没有

ALTER COLUMN

功能。在MyColumn列上也没有任何命令

注释，就像在某些数据库引擎上一样

我还可以尝试填写程序中某个列的描述吗？
ADOX@阿列克谢·里托。我要试一试。谢谢