vuex的五个属性及使用方法_vba Page分页控件使用方法介绍,MultiPage属性设置

分页在vba编程中使用,会大大增加程序的整洁度,也是应用程序比较实用的一个功能。

基本说一下,Page分布控件的使用方法,包括添加分页、删除分页、和设置分页属性等几点比较重要的内容。

a7d71ed464ec5517caff95e5599ad371.png

一个表单示例,标题分布以按钮形式来显示,默认为标签形式。

设置方法:

With Me.MultiPage1.Style = fmTabStyleButtons'按钮形式'.Style = fmTabStyleTabs '默认为标签形式End With

背景图片设置

背景图片用loadpicture("图片路径+文件名")加载

2de26a9ff2a360338f6757d9ec578473.png

使用方法如下:

Me.MultiPage1.Pages.Item(1).Picture =_LoadPicture(ThisWorkbook.Path & "pic123.jpg")

其中注意一点Item(i),item表示Page页 字母i代表下标或索引值.索引值从0开始,也就是说第一个Page页用item(0)来代表,最后一个用item(pages.count-1)来表示.

93e5e27dc61d98d17433931ad2ccd52e.png

图片加载后的效果

改变按钮宽度

这个功能其实就是设置分布标题大小,用TabFixedWidth设置宽,TabFixedHeight设置高.

cfd1141913670120f0788ee03864dd1a.png

使用方法

with Me.MultiPage1.TabFixedWidth = 80.TabFixedHeight=28end with

新建分页

新建分页也十分简单,一行代码就可以完成. MultiPage1.Pages.Add "分布名","标题名",索引值

a7426ccb76693136ea16a098b0cf7969.png

使用方法:

Dim x As Integerx = Me.MultiPage1.Pages.CountMe.MultiPage1.Pages.Add "page" & x, "新建 " & x & "#", x

删除分页

删除分页也是一行代码完成的,Me.MultiPage1.Pages.Remove 索引

7fc802a6bdf92c688ff5f31ed052c486.png

使用方法:

Dim i As Integeri = Me.MultiPage1.Pages.Count - 1'取最后一个分布索引号If i <= 4 Then Exit Sub'判断是否是删除页 不能把自己删除了Me.MultiPage1.Pages.Remove i'执行删除分页

结尾

其实,对分页控件用得不是很熟悉,也是边学边做,所以,存在一些错误的地方,在所难免.

希望大家指出,加以改正.

关注江觅

学习更多vba编程技术

表情包
插入表情
评论将由博主筛选后显示,对所有人可见 | 还能输入1000个字符
相关推荐
<p> <span style="font-size:24px;">      本课程属性Excel VBA中比较高阶课程主要讲解关于各种事件应用各种控件应用如果使用类模块如果在VBA用调用SQL语句去处理数据库中数据等操作。学习完成本课后你可以在Excel中开发各种小型应用系统。以下是课程主要内容。</span> </p> <p> <span style="font-size:24px;background-color:#009900;color:#FFFFFF;"><strong>第1章:工作表工作簿常用事件。</strong></span><br /><br /><span style="font-size:24px;background-color:#009900;color:#FFFFFF;"><strong>第2章:</strong></span><span style="font-size:24px;background-color:#009900;color:#FFFFFF;"><strong>窗体控件应用</strong></span><br /><br /><span style="font-size:24px;background-color:#009900;color:#FFFFFF;"><strong>第3章:</strong></span><span style="font-size:24px;background-color:#009900;color:#FFFFFF;"><strong>ActiveX控件应用</strong></span><br /><br /><span style="font-size:24px;background-color:#009900;color:#FFFFFF;"><strong>第4章:</strong></span><span style="font-size:24px;background-color:#009900;color:#FFFFFF;"><strong>类模块应用</strong></span><br /><br /><span style="font-size:24px;background-color:#009900;color:#FFFFFF;"><strong>第5章:</strong></span><span style="font-size:24px;background-color:#009900;color:#FFFFFF;"><strong>vba+ado+sql</strong></span><br /><br /><span style="font-size:24px;background-color:#009900;color:#FFFFFF;"><strong>第6章:</strong></span><span style="font-size:24px;background-color:#009900;color:#FFFFFF;"><strong>实战应用(考试系统开发)</strong></span><br /><span style="font-size:24px;"></span> </p>
<p> <b><span style="background-color:#FFE500;">【超实用课程内容】</span></b> </p> <p> <br /> </p> <p> <br /> </p> <p> 本课程内容包含讲解<span>解读Nginx基础知识</span><span>解读Nginx核心知识、带领学员进行</span>高并发环境下Nginx性能优化实战让学生能够快速将所学融合到企业应用中。 </p> <p> <br /> </p> <p style="font-family:Helvetica;color:#3A4151;font-size:14px;background-color:#FFFFFF;"> <b><br /> </b> </p> <p style="font-family:Helvetica;color:#3A4151;font-size:14px;background-color:#FFFFFF;"> <b><span style="background-color:#FFE500;">【课程如何观看?】</span></b> </p> <p style="font-family:Helvetica;color:#3A4151;font-size:14px;background-color:#FFFFFF;"> PC端:<a href="https://edu.csdn.net/course/detail/26277"><span id="__kindeditor_bookmark_start_21__"></span></a><a href="https://edu.csdn.net/course/detail/27216">https://edu.csdn.net/course/detail/27216</a> </p> <p style="font-family:Helvetica;color:#3A4151;font-size:14px;background-color:#FFFFFF;"> 移动端:CSDN 学院APP(注意不是CSDN APP哦) </p> <p style="font-family:Helvetica;color:#3A4151;font-size:14px;background-color:#FFFFFF;"> 本课程为录播课课程永久有效观看时长大家可以抓紧时间学习后一起讨论哦~ </p> <p style="font-family:"color:#3A4151;font-size:14px;background-color:#FFFFFF;"> <br /> </p> <p class="ql-long-24357476" style="font-family:"color:#3A4151;font-size:14px;background-color:#FFFFFF;"> <strong><span style="background-color:#FFE500;">【学员专享增值服务】</span></strong> </p> <p class="ql-long-24357476" style="font-family:"color:#3A4151;font-size:14px;background-color:#FFFFFF;"> <b>源码开放</b> </p> <p class="ql-long-24357476" style="font-family:"color:#3A4151;font-size:14px;background-color:#FFFFFF;"> 课件、课程案例代码完全开放给你你可以根据所学知识自行修改、优化 </p> <p class="ql-long-24357476" style="font-family:"color:#3A4151;font-size:14px;background-color:#FFFFFF;"> 下载方式:电脑登录<a href="https://edu.csdn.net/course/detail/26277"></a><a href="https://edu.csdn.net/course/detail/27216">https://edu.csdn.net/course/detail/27216</a>播放页面右侧点击课件进行资料打包下载 </p> <p> <br /> </p> <p> <br /> </p> <p> <br /> </p>
©️2020 CSDN 皮肤主题: 深蓝海洋 设计师:CSDN官方博客 返回首页