此主题相关图片如下:cw.jpg
![dvubb 图片点击可在新窗口打开查看](UploadFile/2016-4/2016462115199818.jpg)
我只是在TextChanged里写了以下代码:
Dim txt As String = e.Form.Controls("fa piao查询").Text
Dim tbl As Table = Tables("fa piao明细")
If txt = "" Then
tbl.Filter = ""
Else
txt = "'%" & txt & "%'"
tbl.Filter = "fa piao号码 Like " & txt & " Or 开piao日期 Like " & txt & " Or 价税合计 Like "& txt & " Or 销方税号 Like " & txt & " Or 认证时间 Like " & txt & " Or 销方名称 Like " & txt
End If