主题：[求助]窗口表的combobox筛选代码

组合框值用于筛选

Dim dt As Table = e.Form.controls("Tableblitem").Table
Dim H As String = e.Form.controls("combobox").value
Dim Filter As String
Select Case  H

    Case "张三"
        Filter = "H1"
    Case "李四"
        Filter = "H2" And "H3" And "H4"

    Case "王五"
        Filter = "H5"
End Select
Filter = "code='" & e.Row("code") & "' And pcode='"& e.Row("pcode") & "'And ptype= Filter"
e.form.controls("Tablelablist").Table.Filter  = Filter

报错：row不是eventargs成员。。。

还有几个条件，可以这么加吗？

e.form.controls("Tablelablist").Table.Filter  = "ptype in (" & filter & ")" and "lcode='" & e.Row("lcode") & "' and  "pvcode='"& e.Row("pvcode") & "'"