Vba 处理docmd.applyfilter没有结果

我有一个使用搜索功能的Access应用程序。我在表单上有一个文本框和一个搜索按钮，它对用户在文本框中输入的内容进行通配符搜索，并在其他控件（文本框和组合框）中显示记录

为了实现这一点，我正在使用

DoCmd.ApplyFilter

方法，我想知道是否有一种方法可以处理“无结果”场景？它当前所做的是将所有显示控件显示为空，ID字段显示（自动编号），就好像我在添加新记录一样

---

如果无法使用

DoCmd.ApplyFilter

处理无结果，那么是否有其他方法来搜索记录并处理“无结果”情况？

您可以检查recordsetclone以查看是否有记录，如果没有，则删除过滤器

DoCmd.ApplyFilter , "id=5"
If Me.RecordsetClone.RecordCount = 0 Then
    MsgBox "No records"
End If

---

雷莫，你建议在哪里做？表单的过滤器事件的交互中存在一些真正的奇怪之处，任何试图使用它们的人都知道这一点。我修改了上面的内容，以显示我的测试结果。