比如
tbl.Filter = Filter & " AND 所属期间 Like " & txt
tbl.Filter = "(" & Filter & ") AND 所属期间 Like " & txt
tbl.Filter = iif(filter>"", "(" & Filter & ") AND ", "") & " 所属期间 Like " & txt