主题：[求助]

狐爸，请问下数据填充器，我如果想要能复制重复行，但不复制空白行，代码该怎么写，下面的代码能复制重复行，但空白行也复制进来了。谢谢！

Dim f As New Filler
f.SourceTable = DataTables("A")
f.DataTable = DataTables("B")
f.ExcludeNullValue = True
f.filter = "某列 is not null"
f.Distinct = False
f.Fill() '填充数据

老师，这个是某列不要复制，我是想要只要是一整行都是空白的就不要复制，不是列，是行，比如添加的空白行。

Dim f As New Filler
f.SourceTable = DataTables("表B")
f.DataTable = DataTables("表E")
Dim str As String = "1=2"
For Each dc As DataCol In f.SourceTable.DataCols
    str &= " or " & dc.name & " is not null"
Next
f.filter = str
f.Distinct = False
f.Fill() '填充数据

完美解决，老师辛苦了，谢谢老师！