条件已经合成了了,只是最后改一下:
If Filter > "" Then
DataTables("XXX").LoadFilter = Filter
DataTables("XXX").Load()
End if