Dim dtb As New DataTableBuilder("查询表")
dtb.AddDef("企业名称", Gettype(String), 100)
dtb.AddDef("法人", Gettype(String), 16)
dtb.AddDef("单位地址", Gettype(String), 100)
dtb.Build()
Dim f As New Filler
f.SourceTable = DataTables("基础数据") '指定数据来源
f.SourceCols = "企业名称,法人,单位地址" '指定数据来源列
f.DataTable = DataTables("查询表") '指定数据接收表
f.DataCols = "企业名称,法人,单位地址" '指定数据接收列
f.Fill() '填充数据
Forms("窗口1").show
Tables("窗口1_Table1").DataSource = dtb.BuildDataSource()
应该如何向临时表中添加数据?
哪位高人帮助一下,谢谢!