Ms access Access-如何从多个组合框显示子窗体上的数据

我有一个表单，我有3个不同的组合框，我希望能够动态过滤。组合框被称为

cboVendor

，

cboRegion

，

cboPosition

。当我单独过滤组合框时，效果很好，但当我尝试过滤供应商然后过滤区域然后过滤位置时，子窗体仅在我选择的最后一个组合框下拉列表中更新数据，而不是将数据仅限于以前选择的组合框

我能够让每个组合框根据其他框动态更新，我只是不能让子表单以这种方式显示数据

以下是我为每个组合框提供的单独SUB：

Private Sub cboVendor_AfterUpdate()
Dim myVendor As String
myVendor = "Select * from TblVendor where ([Vendor] = '" & Me.cboVendor & "')"
Me.tbl_Vendor_subform1.Form.RecordSource = myVendor
Me.tbl_Vendor_subform1.Form.Requery
Me.cboRegion = Null
Me.cboPosition = Null
Me.cboRegion.Requery

End Sub

Private Sub cboRegion_AfterUpdate()
Dim myRegion As String
myRegion = "Select * from TblVendor where ([Region] = '" & Me.cboRegion & "')"
Me.tbl_Vendor_subform1.Form.RecordSource = myRegion
Me.cboPosition = Null
Me.cboPosition.Requery

End Sub



Private Sub cboPosition_AfterUpdate()
Dim myPosition As String
myPosition = "Select * from TblVendor where ([Position] = '" & Me.cboPosition & "')"
Me.tbl_Vendor_subform1.Form.RecordSource = myPosition

End Sub

---

尝试使用此命令

strDataSource = "Select * from TblVendor where ([Vendor] = '" & Me.cboVendor & "' AND [Region] = '" & _
            Me.cboRegion & "' AND [Position] ='" & Me.cboPosition & "')"

Me.tbl_Vendor_subform1.Form.RecordSource = strDataSource
Me.tbl_Vendor_subform1.Form.Requery