2

我想写一些VBA 脚本，这样当我启动我的访问应用程序时，主窗口是空白的。这是我需要删除或隐藏的内容列表：

  • 整个丝带
  • 状态栏
  • 导航窗格
  • 窗口选项卡

另外，我想在右键单击时禁用弹出菜单。我还想禁用 SHIFT 旁路键启动。

我基本上希望它看起来像用 VB 或 C# 创建的应用程序。只有当我以管理员身份登录时，才会绕过禁用的选项。

4

4 回答 4

4

需要VBA吗？为什么不使用正常的 Access 应用程序选项？

在 Access 2010 中，您可以通过文件 > 选项 > 当前数据库找到它们。几乎所有您想要的东西都可以取消选中 - 请参见以下屏幕截图。您在此处选择的选项与您的数据库一起保存。

您可以在按住的同时启动数据库，SHIFT这将覆盖这些启动选项并显示您的“正常”功能区、状态栏、导航栏......

Access 2010 应用程序选项

于 2010-10-06T13:05:52.223 回答
3

在启动功能中尝试以下操作

这应该做你想做的

DoCmd.ShowToolbar "Ribbon", acToolbarNo
DoCmd.ShowToolbar "Status Bar", acToolbarNo

可能与其他 MS Access 窗口元素一起使用，我只是不想显示上面的部分。

于 2012-04-05T07:24:21.710 回答
3

旧线程但仍然有用的信息。这就是我所做的：

DoCmd.ShowToolbar "Ribbon", acToolbarNo
DoCmd.ShowToolbar "Status Bar", acToolbarNo
DoCmd.NavigateTo "acNavigationCategoryObjectType"
DoCmd.RunCommand acCmdWindowHide

将该代码放在一个Public Sub名为 的宏AutoExec中。

禁用 Window Tabs 和 Shift Bypass 比较棘手，因为这些需要通过设置数据库属性来完成，或者通过数据库Properties或通过附加属性来完成CreateProperty。此外，您需要退出并重新打开数据库才能使这些更改生效。

我在 techrepublic 上找到了说明，Allen Browne 在他的网站上有更完整的说明。

于 2014-03-26T03:29:52.300 回答
2

实际上，如前所述，您可以使用启动选项来删除您在弹出窗口、选项卡等方面的大部分问题。

要隐藏功能区，qat，只需使用：

DoCmd.ShowToolbar "功能区", acToolbarNo

因此，通过正确的选项设置和一行代码，您只会看到您的表单。

这是使用上述一行代码和选项关闭选项卡的结果屏幕截图（您想要选项卡式窗口，但选项卡已关闭）。请注意您如何查看 Windows 桌面。这一切都是用上面的一行代码完成的：

替代文字

于 2010-10-07T19:27:38.140 回答