使用表单复选框设置查询条件

Question

我有一张表“MyTable”

Id Color
1  blue
2  Red

查询“Myquery”

Id  Color  Car
1  Red     BMW
2  Blue    BMW
3  Green   BMW
4  Yellow  Merc
5  Red     Alpha

我有一个表单“MyForm”，带有复选框“复选框1”。 我想根据“MyTable”（颜色）设置“MyQuery”标准和“MyForm”。如果选中“复选框1”，则设置标准。 结果假设显示为“BMW BMW Alpha”。 如何以及在何处设置？

这是我的SQL，

SELECT tblSourceB.KODPST, tblSourceB.KODSEK
FROM (tblSourceB LEFT JOIN MyTable ON tblSourceB.KODSEK = MyTable.KodSekFLd);

Answer 1

在复选框的AfterUpdate事件中，您可以执行类似

的操作

If Me!CheckBox1 = True Then
    DoCmd.ApplyFilter WhereCondition:="Color IN (SELECT Color FROM MyTable)"
Else
    ' Turn filter off
    DoCmd.ShowAllRecords
End If

或者，如果您想更改MyQuery，请发布其SQL。