VBA类隐者的秘密Word格式.docx
《VBA类隐者的秘密Word格式.docx》由会员分享,可在线阅读,更多相关《VBA类隐者的秘密Word格式.docx(19页珍藏版)》请在冰豆网上搜索。
![VBA类隐者的秘密Word格式.docx](https://file1.bdocx.com/fileroot1/2022-10/13/56976711-2e8d-479e-ac01-e73c29231bc5/56976711-2e8d-479e-ac01-e73c29231bc51.gif)
1.什么是类
2.什么缘故要学习类
3.类的预备知识
4.创建类属性
5.创建类方式
6.创建类事件
7.一个完整的类实例
8.未完的结尾
估量10天左右完成,权做朋友们中场休息了,呵呵。
一、
什么是类
在咱们身旁,相同或相似的物品无处不在,从生活用品,到工业产品,……通常它们都是由同一个能够称为“模具”的东西生产出来。
明白得类,一样要先从对象谈起,但由于从不同的角度,有不同的明白得,从而也有不同的关于类的概念,本文不去探讨一个完整而且公认的类概念,在这一部份后,只要你有一个大体的判定而且在碰到时明白是类就能够够了。
在上面的那个例子中,一个“模具”确实是一个“类”,而由它生产出的每一个产品,确实是一个“对象”。
看下面的VBA语句:
Dimtx1AsTextbox
不用说明它的意思吧,那个地址咱们用到一个类Textbox概念了一个对象tx1,再来看:
Dimtx2AsTextbox
又概念了一个对象tx2,若是你不嫌烦,我还能够继续下去。
对象增加了,但As后的Textbox没有变,它能够无穷制的利用下去。
类是一个隐者,上面Textbox是VBA已经给咱们预备好的一个类,咱们无法明白VBA是怎么预备的(它的真身被隐藏了),但咱们能够明白对象tx1怎么用。
VBA把对对象的利用划分为三种,属性、方式和事件(后面预备知识咱们再提)。
但是,Textbox是一个类,仍然不是本文要说的类,因为它是VBA已经给咱们预备好了的,咱们要做的,只是明白如何利用它罢了。
本文要介绍的,是利用VBA已经给咱们提供的资源,来构建咱们自己的类,姑且可称之为自概念类。
这需要在VBE下,通过插入类模块,然后向类模块中写入代码来完成。
这确实是你常常听说的类,本文的主题确实是那个包括代码的模块!
通过那个模块,能够提供给咱们一个和VBA提供给咱们的诸如Textbox功能性质完全相同的类,然后,再由咱们自己象利用Textbox一样利用!
类是一个隐者,她把自己藏在所有模块的最后,乃至在多数情形,她从不出场。
此刻,她挂着神秘的微笑,向你走来,你要拒绝吗?
二、什么缘故要学习类
类通常被以为是学习VBA的难点之一,之因此如此,因为相关于制造一个标准模块或用户窗体,咱们能够找到的类的学习资源少之又少,乃至很多VB的书籍也只有缪缪字语(在后面的预备知识,咱们再提另一个重要的缘故)。
从技术角度上看,类的构建,不象窗体,VBA的类也不象有些语言提供了可视的设计界面,感性上那样直接,隐者!
她是不可视的设计,所有的构定都是通过在类模块中写代码来实现的。
2.1.学习是一种爱好的追求
俗语云:
学的千万万,用的有几何?
又曰:
书到历时方恨少。
林语堂先生将做学问划分为三重境遇,第二重说“为伊消得人憔悴,衣带渐宽终不悔”,大多数朋友,包括本人,都不是专业程序员,学习程序只是一种爱好和爱好,就好象有人喜爱**网游一样,对喜爱程序的人,不断地学习和提高,也是一种追求优秀的态度,而且乐意享受那个追求的进程。
模块、控件、链接库和类组成软件工程开发的四大技术,而类技术是控件和链接库技术的基础,咱们不能不学。
2.2.类有什么用
如你前面看到的咱们利用Textbox类,类能够创建大量性质相近的对象,减轻咱们的程序量,简练代码并提高效率。
记得清风兄做过一个扫雷的程序,100颗雷,若是没有类,光是单击的代码你就要写100个!
类概念后,在其它模块中利历时,咱们就能够够临时忘记或没必要考虑它内部复杂的细节,让咱们变得轻松,VBA尽管不能真正封装类的形式,但在那个地址,咱们能够封装它的概念。
这并非是类的全数益处,其它的,留着朋友们用的时候慢慢体会吧。
类挂着神秘的微笑,已经走到你的大门口,开门迎接她吧,你还等什么?
三、类的预备知识
广义上讲,所有VBA的知识,包括语句、函数和为咱们提供的标准类乃至第三方的资源都能够在类中被利用。
本文无法也不预备一一探讨,那个地址只说一些最紧密最大体的,但即便如此,笔者仍然不能把这些点的知识都写到,乃至因为对问题说明清楚或符合逻辑的需要,采纳非标准的表述,对专门问题的全面明白得,请读者注意参考有关标准帮忙文档并加以甄别。
3.1.从构建者的角度明白得对象
上一回咱们提到,类被以为是VBA难点还有一个缘故,这确实是咱们的思想!
VBA提供了大量的现成的类,咱们几乎再也不需要去构建自己的类,这种结果,咱们熟练地适应了从利用者的角度去明白得类—的实例:
对象,包括它的属性、方式和事件。
可是,此刻你还要尝试做一个提供者,这和你作为利用者时的试探方式是完全不同的,乃至是革命性的。
这种角色的转位是痛楚的,它需要你舍弃你本来能够自豪地说明出对象和它的属性、方式、事件的概念,它们本来是如此逻辑地被划分,如此清楚,但此刻,类模块中的一切,彼此交织,你会发觉它们都模糊了!
是需要你忘掉所有固执的“招势”的时候了,当你心中无剑时,转位也就完成了,隐者变得清楚了,她是如此漂亮。
且慢,在你完全忘掉前,让咱们最后再看一眼它们的样子,呵呵,若是你实在忘不掉,你就提示一下自己构建者的身份吧。
下面是通常情形下关于对象、属性、方式、事件的大体表述,若是你以前没了解过,那么应当找些资料先认真地明白得它们,然后再依照上面的提示去做。
对象是由类创建的一个实例,它是类的实体化。
对象的引用和操作被逻辑上划分为不重叠的三个部份:
属性是指对象的特性。
以前面的Textbox为例,有长度,高度,框中显示的文字等等。
方式是指对象的某个操作。
如让Textbox成为当前的核心(即光标移动到它上面)。
事件是指对象对外部动作的响应。
如咱们用鼠标点击Textbox时,会产生一个Click事件,改变它的值,那么产生一个Change事件。
3.2.变量的作用域
变量因为声明的位置和方式不同,从而有不同的作用域。
作用域是指变量在多大范围内能被代码识别。
能够划分为进程级、模块级和全局变量。
进程级变量在进程中声明,那个地址进程指的是一个Sub或Function,也包括后面提到到属性进程。
通经常使用Dim或Static进行声明。
Dim声明的变量,只在该进程执行时存在,进程终止,变量的值也就消失了。
Static声明的变量称为静态变量,那个值在整个程序运行期间都存在。
模块级变量对整个模块的所有进程都有效,但对其它模块不可用。
能够在模块顶部声明。
声明模块级变量用Private关键字和直接利用Dim没有区别。
但推荐利用Private进行声明,因为如此能够方便地与后面的全局变量区分开来。
全局变量是对整个VBA工程的所有进程都有效的变量,利用Public关键字在标准模块的顶部来声明。
在类模块中,对变量作用域的明白得要注意下面两点:
(a)由于类是生成对象的模具,每生成一个对象,相当于产生了一个副本,那个副本确实是对象的“真身”,副本间是彼此独立的,从而,模块级的变量只作用于副本自身。
(b)类模块中利用Public关键字,只有当对象变量是那个类的实例时,才能被访问。
3.3.进程和函数
变量、进程(Sub)、函数(Function)是咱们在标准模块中利用的最大体的构件,在类摸块中,它们仍然是最大体和重要的角色。
关于它们,你已经再熟悉只是,之因此前面还要花这么多文字,是为了突出它的重要,也是想让你轻松一下,哦,我花了很短的时刻已经看了这么多(我也写了这么多!
)。
进程和函数并无实质的区别,当需要返回值时,就利用Function,若是不需要返回任何结果,随你的爱好,但这时推荐你利用Sub,因为如此更符合微软的本意。
进程(Sub)、函数(Function)也有作用域,在标准模块中通过利用Private和Public关键字(能够省略Public关键字,因为它是默许的),能够划分为模块级和全局级,以决定它是在当前的模块有效仍是整个工程有效。
同变量一样,在类模块中利用Public关键字,只有当引用对象变量是那个类的实例时,才能被访问。
3.4.通用内部控件Control(s)
VBA提供Control类作为一样内部控件类型,当利用
DimCtAsControl
声明了一个变量后,就能够够将任何控件赋给该变量,而不管具体的类型,因为在类的利用一般是处置大量相近的对象,因此这种特性超级有效。
在实际利历时,咱们多是通过容器控件的Controls属性来返回一个Control的集合对象。
ForEachCtIn
IfTypeName(Ct)="
CommandButton"
ThenMsgBox
Next
上面这段代码能够遍历窗体的所有控件并报告找到的命令按钮。
3.5.集合Collection
Collection是咱们在利用类时最经常使用到的对象。
一个Collection对象代表一组相关的项目,尽管它的成员并非被强制要求是同一类型的的,但请记住,这通常并非能给咱们带来额外的方便,相反,咱们一般是用来搜集同一类型的数据。
成立集合的方式和成立其它对象一样,如:
DimcolAsNewCollection
集合成立后,能够利用Add方式添加成员,用Remove方式删除成员,用Item方式从集合中返回特定成员。
PrivateSubCommandButton1_Click()
DimcolAsNewCollection
Dimi%
DimctAsControl
ForEachctIn
IfLeft,7)="
TextBox"
Thenct
Nextct
Fori=To1Step-1
MsgBox"
下面删除成员"
&
(i).Name
i
Nexti
EndSub
上面的代码先将窗体上所有的TextBox加入到集合中,然后再删除掉。
Count属性返回集合的成员数量,Remove方式后面的参数是集合成员的索引号。
成员的索引号一般是依照加入的顺序自然编号,从1开始,但能够在加入时利用Add方式的参数进行改变。
Add方式的完整语法是:
item[,key][,before][,after]
item必需的。
任意类型的表达式,指定要添加到集合中的成员。
key可选的。
唯一字符串表达式,指定能够利用的键字符串,代替位置索引来访问集合中的成员。
before/after可选的。
表达式,指定集合中的相对位置。
下面语句向集合增加一个对象TextBox1,并概念该成员的关键字为tx1。
TextBox1,"
tx1"
然后,下面两句都能够向集合中增加一个TextBox2,并把它放在成员TextBox1的前面。
TextBox2,,
TextBox2,,"
第一句中,因为只有一个成员,因此也是索引号
3.6.利用事件的WithEvents变量
WithEvents不是一个单独的语句,为了利用对象的事件,需要在声明该对象时利用WithEvents关键字。
例如:
DimWithEventsappAsApplication
将上面的语句写入ThisWorkBook的模