请问用VB打开WORD后能不能控制WORD的菜单栏? 我想打开WORD后,把某一两项的菜单隐藏掉,比较把文件菜单和工具菜单隐藏掉,请问行吗?怎样实现? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 移除文件菜单中保存、另存、另存为WEB页、WEB页预览、打印预览、打印等项: Application.CommandBars("File").Controls(12).Delete Application.CommandBars("File").Controls(11).Delete Application.CommandBars("File").Controls(8).Delete Application.CommandBars("File").Controls(7).Delete Application.CommandBars("File").Controls(6).Delete Application.CommandBars("File").Controls(5).Delete Application.CommandBars("File").Controls(4).Delete恢复: Application.CommandBars("File").reset'删除编辑菜单: Application.CommandBars("Worksheet Menu Bar").Controls(2).Delete'恢复编辑菜单: Application.CommandBars("worksheet menu bar").Reset'关于右键菜单请见:http://community.csdn.net/Expert/topic/4228/4228120.xml?temp=.2959711'删除工具栏中保存、打印、打印预览、剪切按钮: Application.CommandBars("Standard").Controls(8).Delete Application.CommandBars("Standard").Controls(6).Delete Application.CommandBars("Standard").Controls(5).Delete Application.CommandBars("Standard").Controls(3).Delete'恢复:Application.CommandBars("Standard").Reset 我想通过调用API来设置 PIcturebox的 ScaleHeight 应该用那个API呢 rs.update与sql 中的update有什么不同? 怎样获得单元格的超链接地址 怎样更改TreeView底层图标? 受限用户如何连接SQL???? 谁能告诉我在哪里下载VB.NET,叫我买光盘的OUT 怎样将MSFlexGrid控件中的内容打印到写字板中 ACCESS 一个表最多允许多少字节 如何给ASP页加密?? 怎样安上MSDN, 求救,关于人事管理系统!!! 如何从内存中获取图片
Application.CommandBars("File").Controls(12).Delete
Application.CommandBars("File").Controls(11).Delete
Application.CommandBars("File").Controls(8).Delete
Application.CommandBars("File").Controls(7).Delete
Application.CommandBars("File").Controls(6).Delete
Application.CommandBars("File").Controls(5).Delete
Application.CommandBars("File").Controls(4).Delete
恢复:
Application.CommandBars("File").reset
'删除编辑菜单:
Application.CommandBars("Worksheet Menu Bar").Controls(2).Delete
'恢复编辑菜单:
Application.CommandBars("worksheet menu bar").Reset
'关于右键菜单请见:
http://community.csdn.net/Expert/topic/4228/4228120.xml?temp=.2959711'删除工具栏中保存、打印、打印预览、剪切按钮:
Application.CommandBars("Standard").Controls(8).Delete
Application.CommandBars("Standard").Controls(6).Delete
Application.CommandBars("Standard").Controls(5).Delete
Application.CommandBars("Standard").Controls(3).Delete
'恢复:
Application.CommandBars("Standard").Reset