为什么输入“小白”和“进口”会出现表中结果，查询按钮事件代码如下Dim Filter As String
Dim myfs As winForm.TextBox=e.Form.Controls("贸易方式")
If myfs.Value IsNot Nothing Then
Filter = " 贸易方式='"& myfs.Value &"'"
End If
Dim khmc As winForm.TextBox=e.Form.Controls("客户名称")
If khmc.Value IsNot Nothing Then
Filter =" 客户名称='"& khmc.Value &"'"
End If
Dim khzh As winForm.TextBox=e.Form.Controls("客户账户")
If khzh.Value IsNot Nothing Then
Filter =" 客户账户='"& khzh.Value &"'"
End If
Dim hth As winForm.TextBox=e.Form.Controls("合同号")
If hth.Value IsNot Nothing Then
Filter = " 合同号='"& hth.Value &"'"
End If
If Filter > "" Then
Tables("记录表
此主题相关图片如下：微信图片_20180401192540.png
").Filter=Filter
加好友 
发短信
Post By：2018/4/1 19:42:00 [显示全部帖子]
