VBA自动创建outBar式样的工具栏-yuhong
Access软件网QQ交流学习群(群号码198465573),欢迎您的加入!
首页 >技术文章> Access数据库-模块/函数/VBA


VBA自动创建outBar式样的工具栏

发表时间:2019/3/16 19:46:37 评论(0) 浏览(4465)  评论 | 加入收藏 | 复制
   
摘 要:VBA自动创建outBar式样的工具栏
正 文:

      VBA自动创建outBar式样的工具栏,见附件!

附   件:

点击下载此附件


使用方法:

1,默认创建的工具栏为8条,可以直接删除不用的标签,可以通过复制和删除名称不为M_Llabel的标签,增加和减少标签,但必须保留3个,其中包括第一个M_Llabel名称的是拖动条不能删除,若工具条太多,可能得自己设置一下窗体的高度,以便能容下太多的工具条,或者改变一下参数重新生成工具栏

2,自动创建的工具栏窗体是窗体1、窗体2、以此类推,使用时修改为自己的名字即可,窗体模板A,B,C均是自动生成后重新命名的
3,默认创建的工具栏为无色,打开设计视图全部选择,设置自己喜欢的背景色,若不设置,工具栏将丑陋无色。拖动条也看不见
4,可以添加子窗体,子窗体自动适应,直接加入子窗体的和删除即可。
5,创建的工具栏设置了拖动条,左右拖动可改变工具栏的宽度,双击拖动条可显示和隐藏工具栏。
6,窗体上如自己添加控件如果带有标签,可以删除标签,否则必须改变标签的名字,,使得标签的名字前5个字符不能是"Label",建议改成汉字或者前面加一个字符。
7,默认创建的工具栏为8条,可以在创建窗体的代码中更改数目和模板窗体。可以自己设置改变模板窗体,模板窗体如果有页眉和页脚,自动创建的窗体也会有,当然你也可以不用模板。

8,可以用一个类模块来完成,自己分成了3个模块,没有进行优化,只是用于交流。录制了视频,但大于2M了。


演   示:

点击图片查看大图

Access软件网交流QQ群(群号:198465573)
 
 相关文章
CreateObject(“Outlook.Application...  【金宇转载  2014/11/18】
选项组treeView 动态添加图片仿outlook样式菜单  【yuhong  2016/9/9】
【vba控制outlook】批量读取收件箱内所有列表  【yihui  2018/3/27】
看别人做的OUTLOOK导航,我也做了下,配合小宝的免注册树-第一...  【蓝桥  2019/1/17】
常见问答
技术分类
相关资源
文章搜索
关于作者

yuhong

文章分类

文章存档

友情链接