RT
本人新人，第一次发帖。
烦请大佬帮看下哪里能错了，在线等。
···················································
下面是查询功能的代码
···················································
Dim pp As WinForm.ComboBox = e.Form.Controls("品牌")
Dim zl As WinForm.ComboBox = e.Form.Controls("种类")
Dim nd As WinForm.TextBox = e.Form.Controls("年度")
Dim ys As WinForm.TextBox = e.Form.Controls("颜色")
Dim bh As WinForm.TextBox = e.Form.Controls("编号")
Dim cm As WinForm.TextBox = e.Form.Controls("尺码")
Tables("商品信息表").Filter = "品牌 like '*" & pp.Text & "*' And 种类 like '*" & zl.Text & "*' and 年度 like '*" & nd.Text & "*' and 颜色 like '*" & ys.Text & "*' And 编号 Like '*" & bh.Text & "*' and 尺码 like '*" & cm.Text & "*' "
·····································································
附件1图 选择正确查询值 显示筛选结果
此主题相关图片如下：1.png
附件2图 选择正确查询值 不显示筛选结果
此主题相关图片如下：2.png
附件3图 选择正确查询值 不显示筛选结果
此主题相关图片如下：3.png
······································································
源文件见附件lz.rar
·······································································
[此贴子已经被作者于2018/7/4 14:46:31编辑过]
加好友 
发短信
Post By：2018/7/4 14:44:00 [只看该作者]
