User123456789's questions

我在 MS Access 中有一个分割表单，其中我插入了多个命令按钮。

从左到右依次为：

• （A）cmdClearAllFilter
• （B）cmdFilterBySelection
• （C）cmdFilterByForm
• （D）cmdToggleFilter

我希望这些按钮能够执行与功能区中的按钮完全相同的操作。

我让 (A) 和 (C) 与以下 VB 一起工作：

Private Sub cmdClearAllFilter_Click()
    DoCmd.RunCommand acCmdRemoveFilterSort
End Sub

Private Sub cmdFilterByForm_Click()
    DoCmd.RunCommand acCmdFilterByForm
End Sub

但是我仍然对（B）和（D）感到困惑，我希望它们的行为就像单击下面标记的功能区中的按钮一样（最好使用DoCmd.RunCommand自定义 VB）：

对于（B），我尝试了：

Private Sub cmdFilterBySelection_Click()
    DoCmd.RunCommand acCmdFilterBySelection
End Sub

我无法描述它的行为，因为我不完全理解它的作用。我只能得出一个结论：它的行为不像功能区按钮（下拉菜单在标记的单元格/字段/属性/值上提供 4 个筛选选项）。

对于（D），我尝试了：

Private Sub cmdToggleFilter_Click()
    DoCmd.RunCommand acCmdToggleFilter
End Sub

这有两个问题：

1. 在功能区中的“实际切换过滤器”按钮被单击一次之前，该按钮不可单击。
2. 如果功能区按钮不可用（变灰），单击命令按钮将导致错误，我认为可以通过以下方式解决：On Error Resume Next。

任何帮助或指导都将不胜感激。