1、生成临时统计表,获取到满足条件的行,怎么去获取该表名,并添加到统计表的“表名列”
2、生成出来的统计报,增加了两遍呢。
Dim dt As New DataTableBuilder("统计")
dt.AddDef("序号", Gettype(String), 32)
dt.AddDef("表名", Gettype(String), 32)
dt.AddDef("审批状态", Gettype(String), 32)
dt.Build()
For Each t As DataTable In DataTables
If t.DataCols.Contains("审批状态") Then
For Each r As DataRow In t.dataRows
If r.IsNull("审批状态") = False Then
Dim nr As DataRow = DataTables("统计") .AddNew
’ nr("表名") = Tablesname
nr("审批状态") = r("审批状态")
End If
Next
End If
Next
[此贴子已经被作者于2018/1/4 11:16:19编辑过]