我需要一个清除过滤器按钮，单击时我希望它清除子表单为空。此子表单附加到主表单

Posted 2023-05-07

【中文标题】我需要一个清除过滤器按钮，单击时我希望它清除子表单为空。此子表单附加到主表单

【英文标题】：I need a clear filters button, when clicked I would like it to clear sub form to null. This sub form is attached to main form

【发布时间】：2019-09-09 17:44:12

【问题描述】：

在主窗体上有控制子窗体的控件。一 我拥有的控件是一个清除过滤器按钮，单击时我希望它 清除子表单为空

我正在设置一个用户表单，基于此用户表单，用户将选择 他们希望根据主窗体上的一些控件看到什么，例如 列表框。在他们选择了他们想要下面的子表单之后 现在他们将点击一个过滤器按钮，该按钮导航子表单 是显示此信息的数据表。每当他们想看一个 新的子集搜索我有一个清除过滤器按钮，可以取消选择所有 列表框选择为空，但是我无法编写 代码让下面的子表单重置为空？

    Forms![dbo_tblPrintCenter subform].cmd_ClearFilters = ""

没有用，我也试过了

    [Print Request Search Form] = main form
    [dbo_tblPrintCenter subform] = Subform
    Forms![Print Request Search Form]![dbo_tblPrintCenter 
    subform].Form.Requery

【问题讨论】：

您不想在子表单上显示任何记录？还是您想清除过滤器并显示所有记录？子表单没有链接到主表单？

我只需要清除过滤器按钮即可工作，工作是指清除子表单上显示的所有记录。本质上，在用户选择他们想在主窗体中看到的内容后，子窗体中就会有记录。

子表单未链接到主表单

【参考方案1】：

如果我理解，您不希望任何记录显示在子表单中。

将子表单过滤器属性设置为保证不匹配记录的条件，例如：

ID = 0

或

1 = 0

【参考方案2】：

如果您对子表单进行了过滤，那么一种方法是：

Form_Name-Of-YourSubForm.Filter =""
Form_Name-Of-YourSubForm.FilterOn =False

清除文本框

 Dim ctl as Control
For each ctl in Subform.Control
If ctl.ControlType = acTextBox then
ctl =""
End if

下一个