如何在Access窗体中创建重做按钮？

Question

我正在创建一个Access表单，并希望禁用功能区和菜单，以便用户无法重新启用导航窗格，这将允许他们访问删除/修改数据库记录。

禁用功能区菜单的一个问题是用户不再看到撤消/重做按钮。

似乎可以从UI创建撤消按钮：设计 - >按钮（单击），然后选择'撤消记录'或使用'Me.Undo'进行语法编写

但是，似乎没有办法重新创建重做按钮（没有'Me.Redo'）。

有没有办法重新创建一个重做按钮？或者是否启用功能区菜单只有一个？ （使用Microsoft Office 365 ProPlus）

Answer 1

将以下内容添加到按钮单击事件中

  DoCmd.RunCommand acCmdRedo

您可能想要添加一些错误捕获。

Answer 2

我通常做的是，我禁用完整的功能区和导航窗格。您可以在文件 - >选项 - >当前数据库下执行此操作，现在取消选中显示导航窗格和允许完整菜单。或者根据开始表单的load事件中的代码：

'Maybe an If condition to check for admin

 DoCmd.NavigateTo "acNavigationCategoryObjectType", "acNavigationGroupTables"
 DoCmd.SelectObject acForm, vbNullString, True
 DoCmd.RunCommand acCmdWindowHide

 DoCmd.ShowToolbar "Ribbon", acToolbarNo