MS ACCESS - 如何通过主表单的文本框（如搜索框）过滤子表单数据表答案

【问题标题】：MS ACCESS - How to filter a subform datasheet by a main form's textbox like a searchboxMS ACCESS - 如何通过主表单的文本框（如搜索框）过滤子表单数据表
【发布时间】：2020-10-15 02:51:21
【问题描述】：

我有一个主 form1 (formview) 和一个 subform2 (datasheetview) 基于相同的查询，如 splitform。

在主表单 1 中，我有一个文本框，我想将其用作子表单 2 的搜索框。

此搜索框必须通过在 3 个不同的字段（名称、类型、编号）中搜索来过滤 subform2 数据表，并且当找到与搜索框的值匹配的记录时，它必须按此值过滤数据表。

我尝试使用宏 Applyfilter 和 VBA，但没有成功.. 有人可以帮我吗？

【问题讨论】：

点评datanumen.com/blogs/…
我需要一个搜索框功能，我知道如何进行伪拆分，并且我使用了您链接的方式..但现在我需要一个搜索框..
应该编辑问题以显示尝试的代码。

标签： ms-access filtering subform datasheet

【解决方案1】：

考虑：

Private Sub tbxSearch_AfterUpdate()
Me.ctrDS.Form.Filter = "Member_name LIKE '*" & Me.tbxSearch & "*' OR TypeOfBusiness LIKE '*" & Me.tbxSearch & "*' OR Member_ContactNumber='" & Me.tbxSearch & "'"
Me.FilterOn = True
End Sub

或者

Private Sub tbxSearch_AfterUpdate()
With Me.ctrDS.Form.RecordsetClone
    .FindFirst "Member_name LIKE '*" & Me.tbxSearch & "*' OR TypeOfBusiness LIKE '*" & Me.tbxSearch & "*' OR Member_ContactNumber='" & Me.tbxSearch & "'"
    If Not .NoMatch Then Me.ctrDS.Form.Bookmark = .Bookmark
End With
End Sub

【讨论】：