隐藏与显示工具条

你可以通过以下代码来隐藏当前激活的工具条：

Dim oldMBar As Variant
Set oldMBar = CommandBars.ActiveMenuBar
oldMBar.Enabled = False

或通过下面代码来显示有隐藏你自定义的工具条
DoCmd.ShowToolbar "你的工具条名称", acToolbarYes

DoCmd.ShowToolbar "你的工具条名称", acToolbarNo