如何使用createfield建立autonumber类型.txt

VB技巧问答10000例 VB技巧问答10000例

可 以 这 样 ： 
     Set fld = gtdfTableDef.CreateField() 
     'fill the field structure 
     With fld 
     .Name = txtFieldName.TEXT 
     .Type = dbLong 
     .Size = txtFieldSize.TEXT 
     .Attributes = .Attributes Or dbAutoIncrField 
     End With 
<END>