microstation中,如何利用VBA在菜单栏目增加一些button和屏蔽一些button
2006-09-18 15:51
513 查看
1.代码
Application.CommandBars.Add "InsertPrice", msoBarTop
Application.CommandBars("InsertPrice").Visible = True
Application.CommandBars("InsertPrice").Protection = msoBarNoMove + msoBarNoCustomize
Set Control1 = Application.CommandBars("InsertPrice").Controls.Add(msoControlButton, 1)
Control1.Caption = "数据导入"
Control1.OnAction = "insertData"
Control1.Visible = True
2.手工
Workspace->Customize->MenuBar
Key IN:VBA RUN MAIN(BasMain.checkIn)
Application.CommandBars.Add "InsertPrice", msoBarTop
Application.CommandBars("InsertPrice").Visible = True
Application.CommandBars("InsertPrice").Protection = msoBarNoMove + msoBarNoCustomize
Set Control1 = Application.CommandBars("InsertPrice").Controls.Add(msoControlButton, 1)
Control1.Caption = "数据导入"
Control1.OnAction = "insertData"
Control1.Visible = True
2.手工
Workspace->Customize->MenuBar
Key IN:VBA RUN MAIN(BasMain.checkIn)
相关文章推荐
- 如何在Delphi里面利用Word的VBA代码进行一些总结
- 在Fedora9中如何为右键菜单增加打开终端菜单项
- 如何让UDP变得靠谱一些(增加UDP的可靠性)
- 利用Word的宏录制来反查一些菜单操作的命令
- 如何利用Featue对特定的文档库或列表添加listviewtoolbar上的button
- GitChat · 安全 | 如何利用搜索引擎做一些「不可描述」的事情?
- ecmall中如何在用户中心增加一个菜单
- 给button等按钮和控件加背景色或者图片,dialog如何增加背景色和图片背景
- 如何利用button实现链接功能
- 如何屏蔽pocketpc 长按触笔时,发出的菜单消息
- 如何利用邮件推广给企业增加更多的流量
- C语言系列(一):最近重拾C语言的想法,谈到C中易错点,难点;以及开源代码中C语言的一些常用技巧,以及如何利用define、typedef、const等写健壮的C程序
- C语言系列(四):最近重拾C语言的想法,谈到C中易错点,难点;以及开源代码中C语言的一些常用技巧,以及如何利用define、typedef、const等写健壮的C程序
- Android中如何屏蔽长按MENU(菜单)键
- 如何通过js全局屏蔽回车键 以解决一些不必要的麻烦
- 如何在一个视图上增加菜单
- 如何屏蔽“开始”菜单中的“注销”
- 如何利用ccform自定义表单来增加自己的控件,关于Sys_FrmEle表结构与数据存储设计?