1VBA窗体系列,很久没有更新了.
今天给大家讲一个属性,"滚动条".
2上一章,咱们说到的地方是在SPIN按钮和能够颜色变化的条目,
3今天我们在这些控件下边增加一个"滚动条"
4很智能,有点意思,
过程其实很简单,我们将插入的滚动条控件编名为"滚动条周期",
最大值和最小值,和我们的之前的SPIN按钮的最大值和最小值一一相等.
这个largechange的意思是:我们能够一次变化多大的范围.
以下是新增的几段代码.很简短.
最下边这个SUB是之前说过的SPIN按钮章节说过的.
6当然其实以上很简单,如果你了解以上的做法,
你就可以开始研究以下的日期部分了.
7首先,我们要确定最小值和最大值,但是关于日期,貌似不怎么好做.
于是乎,可以在代码中来进行编辑.
具体的代码如下所示,
最大值和最小值的编辑.
8中间会用到CLNG函数,
9当然这个地方的日期,你可以自己去拟定成一个合理的区间,比如这个#1/1/1900#,你可以改成#1/1/2000#.
而Private Sub UserForm_Initialize()
的意思是,用户窗体的初始化设置,意思就是当你打开用户窗体时,默认的设置,例如,打开窗体你的时间窗口会默认的显示:
10至于逻辑,和之前第一种情况是一样的,如果你对之前的第一个例子情况了解了的话.
我们在这个部分的LargeChange,需要用到2个函数,DATEDIFF和DATEADD,并且嵌套在一起,我们就可以准确的算出你的变化是在准确的一个月,而不是单纯的数字30,30是不准确的,而且,如果一直都是以30来计算,随着选择的增加,会越发的不准确.
11
32:13