如何在导航格式上添加组合框作为过滤器

Question

我对Access很新。

我有两种形式。我将这两个表单放在导航表单中，每个表单都放在一个选项卡上。现在我想在导航表单上有一个组合框，它将作为导航表单中两个表单的过滤器。组合框将具有来自另一个表中的字段的值。我该怎么做呢。谢谢，对不起，我对此很新。

Answer 1

您可以添加一些VBA代码来激活子窗体上的过滤器。在我的示例中，我添加了一个用于应用过滤器的OK按钮的clickevent，但您也可以在组合框上将其作为afterupdate事件：

Private Sub cmdOK_Click()
If IsNull(Me.cmbFilter) Then
   Me.subfrmName1.Form.Filter = ""
   Me.subfrmName2.Form.Filter = ""
   Me.subfrmName1.Form.FilterOn = False
   Me.subfrmName2.Form.FilterOn = False
Else
  Me.subfrmName1.Form.Filter = "[State]='" & Me.cmbFilter.Value & "'"
  Me.subfrmName2.Form.Filter = "[State]='" & Me.cmbFilter.Value & "'"
  Me.subfrmName1.Form.FilterOn = True
  Me.subfrmName2.Form.FilterOn = True
End If
End Sub