<<< 返回 access911.net 编程静态资料库索引页

修改了菜单栏/工具栏后如何恢复默认?

 

作者:cg1  摘自:access911.net  录入:cg1  时间:2003-4-6  浏览人次:1429


专题地址:http://access911.net/fixhtm/73FABE1E11DC.htm 如果需要更详细的评论或说明,请点击该地址。

 

简述:修改了菜单栏/工具栏后如何恢复默认?《VBA》

 


问题:

恢复默认菜单和工具栏的办法 

 


方法一:

引用 Microsoft Office 9.0 Object Library 
执行如下过程: 

Public Sub EnableDefaultMenu() 
  Dim oBar As CommandBar 
  Set oBar = CommandBars("Menu Bar") 
  oBar.Reset 
End Sub 


恢复默认菜单和工具栏,搞定! 
注:Menu Bar是指ACCESS的主菜单 

用这个把: 
Public Sub EnableDefaultMenu() 
On Error Resume Next 
Dim obar As CommandBar 
.....................
...........

资料库随时有更新,欲查看最新详情请单击专题地址http://access911.net/fixhtm/73FABE1E11DC.htm

 


上一篇:如何在任意位置插入记录?

下一篇:如何用程序调用链接表管理器?

2017年2月22日生成静态资料