Sql 如何在导航表单上添加组合框作为筛选器

Sql 如何在导航表单上添加组合框作为筛选器,sql,vba,ms-access,Sql,Vba,Ms Access,我是个新手 我有两张表格。我将这两个表单放在一个导航表单中,每个表单都在一个选项卡上。现在我想在导航表单上有一个组合框,它将作为导航表单中两个表单的过滤器。组合框中的值来自另一个表中的字段。我该怎么做呢。谢谢,很抱歉,我对这件事还不太熟悉 您可以添加一些VBA代码来激活子窗体上的筛选器。在我的示例中,我为OK按钮添加了clickevent以应用过滤器,但您也可以在组合框中将其设置为afterupdate事件: Private Sub cmdOK_Click() If IsNull(Me.cmbF

我是个新手

我有两张表格。我将这两个表单放在一个导航表单中,每个表单都在一个选项卡上。现在我想在导航表单上有一个组合框,它将作为导航表单中两个表单的过滤器。组合框中的值来自另一个表中的字段。我该怎么做呢。谢谢,很抱歉,我对这件事还不太熟悉


您可以添加一些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