主题：[求助]

请各位大大指导下。以下这段代码想实现筛选符合三种条件所有行

但是怎么勾选其中一个的时候正确，同时勾二个或者三个就出错，

我是菜鸟，希望高手能指导下代码的错误

 

Tables("信息表").filter = ""

Dim hg As WinForm.CheckBox = e.Form.Controls("CheckBox1")
Dim ds As WinForm.CheckBox = e.Form.Controls("CheckBox2")
Dim yqx As WinForm.CheckBox = e.Form.Controls("CheckBox3")
Dim filter1 As String
Dim filter2 As String
Dim filter3 As String

With e.Form.Controls("CheckBox1")
    If hg.checked = True Then
        Filter1 = "状态 = '合格'"
    End If
End With

With e.Form.Controls("CheckBox2")
    If ds.checked = True Then
        Filter2 = "状态 = '待审'"
    End If
End With

With e.Form.Controls("CheckBox3")
    If yqx.checked = True Then
        Filter3 = "状态 = '己取消'"
    End If
End With

Tables("信息表").Filter = Filter1 & Filter2 & filter3   '这句能不能通过这样实现并列三条种条件一起？