这是一个控件,不是一个表。
你上面的代码是没有意义的,应该:
Dim dtb As New DataTableBuilder("筛选")dtb.AddDef("ReportsID", Gettype(String), 10)dtb.AddDef("connect", Gettype(String), 10)dtb.AddDef("listed", Gettype(String), 64)dtb.AddDef("compared", Gettype(String), 10)dtb.AddDef("content", Gettype(String), 64)Tables("窗口1_Table1").Datasource = dtb.BuildDataSource