主题：[求助]通过addcolumn添加列能否指定具体的位置

参考代码

Dim bName As String = CurrentTable.Name
If CurrentTable.Cols.Contains("核对") = False Then
    Dim Builder As New ADOXBuilder()
    Builder.Open()
    With Builder.Tables(bName)
        .AddColumn("核对" ,ADOXType. Boolean)
    End With
    Builder.Close()
    DataTables.Unload(bname)
    DataTables.Load(bname)
End If
Tables(bname).Cols("核对").Move(1)
Tables(bname).NeedSaveSetting = True
Syscmd.Project.Save()