工具栏开关代码+详细注释+详细说明:
若想在 Access开发完后, 用代码隐藏、显示工具栏,可以使用 `DoCmd.ShowToolbar` 方法。以下是一个示例代码:
Sub 工具栏关()
DoCmd.ShowToolbar "Ribbon", acToolbarNo '隐藏Ribbon工具栏
End Sub
Sub 工具栏开()
DoCmd.ShowToolbar "Ribbon", acToolbaryes '显示Ribbon工具栏
End Sub
在上述代码中,我们使用 `DoCmd.ShowToolbar` 方法并传入工具栏的名称以及 `acToolbarNo` 参数来隐藏相应的工具栏。可以根据需要选择要隐藏的工具栏,并在 `Sub` 过程中调用该方法。
同样,如果你想要重新显示工具栏,可以使用 `acToolbarYes` 参数来替代 `acToolbarNo`。
请注意,在使用前做好备份,在某些版本的 Access 中,"Ribbon" 工具栏可能无法通过此方法完全隐藏。如果需要彻底隐藏 Ribbon 工具栏,可能需要使用其他方法或修改 Access 的选项设置。
上述代码已在office2010 64 和office2021 64上正常使用(office2010 64 是win7 64,office2021 64是win10 64)