主题：如何筛选有空的行？或者筛选出内容完整的行？急求！！

 比如代码

Tables("表A").Filter = "第一列 is null or 第二列 is null"

Tables("表A").Filter = "第一列 is not null and 第二列 is not null"

如果循环所有列，就这样写

Dim t As Table = Tables("表A")
Dim str As String = ""
For Each c As Col In t.Cols
    str &= c.name & " is null or "
Next
str = str.Substring(0, str.length-3)
t.filter = str

--------------------------------------

Dim t As Table = Tables("表A")
Dim str As String = ""
For Each c As Col In t.Cols
    str &= c.name & " is not null and "
Next
str = str.Substring(0, str.length-4)
t.filter = str