以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何用CheckedComboBox实现筛选?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=109007)

--  作者:z769036165
--  发布时间:2017/11/2 13:27:00
--  如何用CheckedComboBox实现筛选?
请问如何用CheckedComboBox控件进行多个选择后实现对数据表进行筛选,如excel2016一样多选筛选?
--  作者:有点甜
--  发布时间:2017/11/2 14:50:00
--  

Dim s As String = e.form.controls("CheckedComboBox1").Text

Tables("表A").Filter = "第一列 in (\'" & s.replace(",", "\',\'") & "\')"