主题：[求助]检查框作查询筛选

和帮助中的筛选代码差不多，注意下面的不同之处。

With e.Form.Controls("CheckBox1")
    If .Checked = True Then
        Filter = "条件1= true "
    End If
End With