主题：窗口多值组合筛选(ok了)

型号单选，规格多选筛选ok了

如果要实现，型号也多选，规格也多选，代码怎么修改呢？

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:两列多值筛选，代码怎么修改呢？.foxdb

堂主，选择型号a和BV后，规格要下拉多选显示1.5  2.5 4 代码怎么写呢？

此主题相关图片如下：捕获.jpg

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:两列多值筛选，代码怎么修改呢？.foxdb

型号输入b，再选址规格，筛选不对。BV型号的规格也筛选出来了

下面代码还是不行，怎么修改呢？

Dim Filter As String
With e.Form.Controls("型号")
    If .Value IsNot Nothing Then
        If Filter >"" Then
            Filter = Filter & " And "
        End If
        Dim str As String = "1=2"
        For Each s As String In .Value.split(",")
            str &= " or 型号 = '%" & s & "%'"
        Next
        Filter = Filter & " (" & str & ") "
    End If
End With
Dim cmb As WinForm.CheckedComboBox
cmb = e.Sender
If filter = "" Then
    cmb.ComboList = DataTables("表A").GetComboListString("规格")
Else
    cmb.ComboList = DataTables("表A").GetComboListString("规格", filter)
End If

此主题相关图片如下：捕获.jpg