什么是类，什么是对象

大家好，在我之前的教程中分别讲了"VBA代码解决方案""VBA数据库方案""VBA字典和数组方案"，通过对这三套教程的学习，我们对VBA的基本知识和基本的操作能有了一定的了解。这套教材是在前面教材基础上的讲解，希望大家在学习前面教材的基础上再学习本套教材。这套教程，我们开始讲解VBA的高级内容，类和类模块应用。今日的内容是第一讲：什么是类，什么是对象。

一什么是类？ 类是对象的"灵魂"。对象可以是任何事物，而类不会做任何事情，也不会占用内存，只有当类成为对象并使用Set语句和New关键字实例化为具体对象后，才能做事情并占用内存。

把类实例化为具体对象的语法为：

Dim C As Class

Set C=New Class

上述语句创建了一个名为C的对象，该对象的数据类型为定义的类Class。其特点是：

1 使用New关键字，可以创建任意数量的类的新实例，并且能够将其存储在Collection对象中。

2 使用Property Let/Set/Get语句，可以编写代码验证赋给类元素的值，并且可以编写当值改变时执行的相应代码。例如，能够编写代码确保某个值为要求的特性。

3 类可以定义方法（使用Sub过程和Function过程），执行某项动作。

注意点：与用户自定义类型的区别，下面给出了自定义数据类型的特点：

1 在编译时必须声明所有的自定义类型变量。可以使用动态数组来处理多个自定义类型，但须使用Redim Preserve关键词。

2 不能在运行时添加新的自定义类型变量。

3 不能控制赋给自定义类型中元素的值。如只能定义为整数，但假如要求是大于5的值无法进行控制。

4 自定义类型只是静态地存储数据。

二 什么是类模块，类属性和方法：

类模块由属性和方法组成，类本身类似于名词；属性可以当作形容词，用来描述类；方法则为动词，执行操作

三 类和对象的比较

让我们先来看一条非常简单的程序，让我们亲身体会一下类的庐山真面目：

Sub mynzclass1_1()

Sheets("1").Activate

Range("A1").Value = "Hello,VBA world"

End Sub

上面代码的第二句：Range("A1").Value = "Hello,VBA world"

我们把这这句代码全部放开，把隐藏的补充完整，看看是什么样子：

Application.ActiveWorkbook.ActiveSheet.Range("A1")="Hello,VBA world"

我们解释一下：

1 Range("A1")为对象，指定单元格.

2 Range("A1")前面，ActiveSheet也是对象，指定了哪个工作表。

3 ActiveSheet前面又有一个对象ActiveWorkbook，指定了是哪个工作薄，

4 ActiveWorkbook前面还有一个Application，指定的是哪个应用。

那么其中的Value是什么？Value是一个Range("A1")这个对象的一个属性。那它是从哪来的呢？它是由Range类定义的。那么range是类还是对象呢？别急，我慢慢讲解，希望大家通过我的讲解能理解类和对象的关系。

在上面的讲解中，我们提到实例化类为具体对象的过程，其实在mynzclass_1引用了一个Range类，并将之实例化后修改了它的属性。而在例子中，我们只不过是将这一切都以隐藏起来，直接对一个对象Range("A1")修改它的属性，但Range("A1")这个对象正是引用了Ragne这个类，才具有了Range类的属性"Value"。

我们把上面的代码转换一下：

Sub mynzclass1_2 ()

Sheets("1").Activate

Dim RA As Range '引用一个Range类

Set RA = Range("A1") 'set将类实例化

RA.Value = "Hello,world" 'RA是一个对象了

Set RA = Nothing '将实例化销毁

End Sub

这段代码是上面mynzclass1_1的原始代码，从中我们看出类本身并不直接为我们做什么，但是，它却又一直默默地隐藏在幕后规化着我们的动作。是的，这就是类。它是通过对象的方式展现在我们的面前，让我们无时无刻与之交流，却又常常在不经意间忽视了它的存在。

现在再回到mynzclass1_1去看，就会很容易的发现，ActiveSheet实际引用了Worksheet类、ActiveWorkbook引用了Workbook类，而Application则引用了和它同名的Application类（这也正是我们会经常被混淆的一个概念，一个对象可以和被它所引用的类同名），原来我们在短短一个赋值的语句中，已经在与这么多的类打交道。

那我们又要怎样来区分类和对象呢？其实它们经常成对地出现在我们面前，只是一个是看得见摸得着的，一个却深藏不露。我们可以这样去理解类与对象：类是一个概念或是一种定义，每个类拥有其自己的特征和行为方式，而对象就是某个类的实例。所以类是对象的"灵魂"，它无处不在，而你却看不到它。

比如：汽车

如果作为类：汽车的定义为有四个或者四个以上轮子，人能够坐在上面，操作它行走的工具（好难的定义）。这个时候"汽车类"是有自己的属性，如：汽车的前轮（是负责转向的）。汽车的前玻璃（是负责挡风的）等等。这里的"汽车"是一个概念抽象的概念。

而我们通常指的汽车是作为对象：如丰田汽车就是汽车类中的一个大对象，这个大对象中还有小的对象，如"威驰FS"对象，属性：轮子是某某牌子的，前挡风玻璃是某某牌子的。这些就是很具体的属性值了。