|
-------------------郑家龙编绎于MS OFFICE开发文档
删除菜单和工具栏
你可以通过在现有的工具栏上右击，在弹出的自定义对话框中删除工具栏和菜单栏或者通过VBA删除他们，但是你只能通过VBA来删除弹出式菜单栏，用CommandBars集合中的Delete方法从当前CommandBars集合中删除一个已经存在的弹出式菜单栏，可以参考下面的方法：
Function CBDeleteCBControl(strCBarName As String, _
strCtlName As String)
On Error Resume Next
Application.CommandBars(strCBarName).Controls(strCtlName).Delete
End Function
注意：如果你要删除的工具栏没有在参数strCBarName中指定，在上面的函数中将不会出现错误提示，是通过On Error Resume Next这一句继续往下执行。
待完成篇章：
防止用户修改自定义菜单和工具栏
个性化菜单和工具栏
在菜单和工具栏中使用按钮图像
菜单和工具栏的使用
1.增加命令控件
2.显示和禁用命令控件
3.命令控件的状态
菜单和工具栏的事件
|
