| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 筛选结果不准确 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=124994) |
| -- 作者：蓝蚂蚁 -- 发布时间：2018/9/18 9:12:00 -- 筛选结果不准确 Dim Filter As String With e.Form.Controls("DropBox1") If .Value IsNot Nothing Then If Filter > "" Then Filter = Filter & " And " End If Filter = Filter & "地点一 like \'%" & .Value & "%\' Or 地点二 like \'%" & .Value & "%\'" End If End With With e.Form.Controls("NumericComboBox1") If .Value IsNot Nothing Then If Filter > "" Then Filter = Filter & " And " End If Filter = Filter & "年度 like \'%" & .Value & "%\'" End If End With If Filter > "" Then Tables("窗口_Table1").Filter = Filter End If 这段筛选代码本想实现如下作用： 举例：把地点一或地点二是“深圳”，年度是2018的行筛查出来，但发现有一个年度是2017的也出来了， 变成：年度 地点1 地点2 2017 深圳 2018 深圳 2018 深圳 ...... 请问老师，是不是代码的问题，该如何处理？ |
| -- 作者：有点甜 -- 发布时间：2018/9/18 9:46:00 -- Filter = Filter & "地点一 like \'%" & .Value & "%\' Or 地点二 like \'%" & .Value & "%\'"
改成
Filter = Filter & "(地点一 like \'%" & .Value & "%\' Or 地点二 like \'%" & .Value & "%\')" |
| -- 作者：蓝蚂蚁 -- 发布时间：2018/9/18 9:55:00 -- 谢谢 老师 授人以鱼不如授人以渔 请问相关帮助在哪里？再次谢谢 |
| -- 作者：有点甜 -- 发布时间：2018/9/18 10:14:00 -- 以下是引用蓝蚂蚁在2018/9/18 9:55:00的发言：
谢谢 老师 授人以鱼不如授人以渔 请问相关帮助在哪里？再次谢谢
参考
http://www.foxtable.com/webhelp/scr/1647.htm
|