主题：窗口的的table 插入列的代码怎么实现？

If DataTables(Vars("strDatatableNameMxForInput")).DataCols.Contains("多选") = False Then
    DataTables(Vars("strDatatableNameMxForInput")).DataCols.Add("多选",Gettype(Boolean))
End If

1，最好加判断

2，增加临时列在DATATABLE中增加

Tables("导航窗口_Table4").DataTable.cols.add("是否",Gettype(Double))