tbl.Filter ="Convert(活动编号,'System.String') like" & txt1 & " Or 活动名称 Like " & txt1 & " Or Convert(活动日期,'System.String') Like " & txt1 & "