老师,请问下,为什么下面这段代码只能填充第一行的数据
Dim Result As DialogResult
Result = MessageBox.Show("是否复制到表A?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
Dim f As New Filler
f.SourceTable = DataTables("表B")
f.DataTable = DataTables("表A")
f.Filter = "A列 is not null and 付款 ='支付'"
f.Distinct = False
f.Fill() '填充数据
End If