VBA类隐者的秘密Word格式.docx
《VBA类隐者的秘密Word格式.docx》由会员分享，可在线阅读，更多相关《VBA类隐者的秘密Word格式.docx（19页珍藏版）》请在冰豆网上搜索。
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的模
升级会员 