MS Access 向表单添加过滤工具栏答案

【问题标题】：MS Access Adding a Filtering ToolBar to FormMS Access 向表单添加过滤工具栏
【发布时间】：2013-12-29 23:03:58
【问题描述】：

我有 Microsoft Access 表单，其中有数据表，我希望能够在 MBE 模式下向表单添加过滤工具栏。注意 MBE 不在 MDB 的设计器模式下。 IE。我想要一个分布式 MBE 文件的过滤器。

在我添加的 Form.Open 事件中：

Private Sub Form_Open(Cancel As Integer)
  DoCmd.ShowToolbar "Ribbon", acToolbarYes
  DoCmd.ShowToolbar "ribbonMain", acToolbarYes
  DoCmd.ShowToolbar "Menu Bar", acToolbarYes

End Sub

我也试过

Private Sub Ctl__Click()
  Dim db As DAO.Database
  Dim prop As DAO.Property
  Set db = CurrentDb()
  DoCmd.ShowToolbar "Ribbon", acToolbarYes
End Sub

另外，访问按钮->访问选项->当前数据库在功能区和工具栏选项下：选中允许的内置工具栏。另外，功能区名称是“ribbonMain”。

我仍然看不到表单顶部的工具栏。我在代码或访问页面设置中缺少什么。我在 MS Access 2003 上运行。我真的很想在已部署的 MBE 文件中的表的设计模式中看到相同的过滤。

【问题讨论】：

标签： ms-access vba ms-access-2010 ms-access-2007 ms-access-2003

【解决方案1】：

我建议将代码放在On load 中，即使DoCmd.ShowToolbar "Ribbon", acToolbarYes 也可能导致访问2003 出错。当我构建我的数据库时，我发现这篇文章很有帮助。 http://www.access-programmers.co.uk/forums/showthread.php?t=97578

【讨论】：