ms-access - 如何使用复选框过滤特定记录并显示在子表单中

Question

当我单击白色复选框时，它必须只过滤掉其 W 在子表单中记录的比赛，这是我的代码，但它不能正常工作，任何建议有什么问题。提前致谢

Option Compare Database

Private Sub White_Click()

strFilter = "Race=W """ & Me.White.OnClick & """"
DoCmd.OpenForm "Home"
Forms!Home![Employees subform].Form.Filter = strFilter
Forms!Home![Employees subform].Form.FilterOn = True

End Sub

Answer 1

这种说法非常令人困惑：

strFilter = "Race=W """ & Me.White.OnClick & """"

首先，有Race=W。然后是 Me.White.OnClick 的值 - 如果这是一个复选框，那么您将拥有一个与之关联的真/假值，但前提是您使用了一个值。

根据您的源表，您可能应该执行以下操作：

if me.white.value then
   strFilter = "Race = 'W'"
else
   strFilter = ""
end if

我不太确定 me.white.value - 它可能是另一个变量。这样做将允许单击和关闭复选框