主题：[求助]新插入的日期列为什么无法修改？

删除后面两行：

Dim zc As String="Select * from 分段数据 Where 品种 Is Null"
Tables(e.Form.Name & "_table1").fill(zc,数据源名,True)

DataTables(e.Form.Name & "_table1").DataCols.Add("起始日期",Gettype(Date))
DataTables(e.Form.Name & "_table1").DataCols.Add("结束日期",Gettype(Date))