同时筛选 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

可以用两个 ComboBox筛选吗？

比如 ComboBox1 选择第一列的 a

红色代码表示 ComboBox1点选择的时候只筛选出投资参考表，第一列包含a的行，感谢感谢

e.Sender.ComboList = DataTables("投资参考").GetComboListString("类别")

比如ComboBox1选择a ，ComboBox2就要红色代码上多加一个筛选条件，提交是在第一列有a的行筛选。感谢感谢

Tables("投资学习窗口_Table1").Filter = "类别 Like '%" & e.Form.Controls("ComboBox1").Text & "%' And "流程 Like '%" & e.Form.Controls("ComboBox2").Text

能帮忙看看这个吗？为什么不行呢感谢感谢

"类别 Like '%" & e.Form.Controls("ComboBox1").Text & "%' And 流程 Like '%" & e.Form.Controls("ComboBox2").Text & "%'"

能帮忙看看这个吗？

此主题相关图片如下：1003.gif

Dim cmb As WinForm.ComboBox = e.form.Controls("ComboBox1")
cmb.ComboList = DataTables("表A").GetComboListString("型号")

2、在ComboBox2的Enter事件中加入代码：

Dim cmb As WinForm.ComboBox = e.Sender
Dim str As string = e.Form.Controls("ComboBox1").Value
cmb.ComboList = DataTables("表A").GetComboListString("规格", "型号 = '" & str & "'")

3、最后在ComboBox3的Enter事件中加入代码：

Dim cmb As WinForm.ComboBox = e.Sender
Dim str As String = e.Form.Controls("ComboBox2").Value
cmb.ComboList = DataTables("表A").GetComboListString("颜色", "规格 = '" & str & "'")

能帮忙看看这个吗？

就是筛选的时候是根据按钮筛选的输入，按钮在执行下面代码的时候是根据前面的ComboBox输入的内容筛选。

可以让他们依次筛选吗？比如类别是车刀片，参数A按下按钮的时候就是显示为类别为车刀片的行，后面以此内推。

图片点击可在新窗口打开查看此主题相关图片如下：qq截图20180530180109.png

[此贴子已经被作者于2018/5/30 18:02:24编辑过]

能帮忙看看这个吗？

Dim cmb As WinForm.ComboBox = e.Sender

Dim str As String = e.Form.Controls("ComboBox101").Value

cmb.ComboList = DataTables("产品库").GetComboListString("类别", "参数A = '" & str & "'")

就是红色代码点击下按钮筛选出的内容自在ComboBox101选定的行了

比如ComboBox101 选择产品列的“车刀片”，然后ComboBox1（就是写代码的这个按钮）按下按钮只显示产品列为车刀片的行，感谢感谢

cmb.ComboList = DataTables("产品库").GetComboListString("参数A", "类别 = '" & str & "'")

主题：同时筛选