这样:
With tables("xxx")
if .Filter > "" then
.DataTable.RemoveFor(.Filter & " And " & 移除条件)
Else
.DataTable.RemoveFor(移除条件)
End If
End wWth