文档介绍：类模块和标准模块类模块和标准模块的不同点在于存储数据方法的不同。标准模块的数据只有一个备份。这意味着标准模块中一个公共变量的值改变以后,在后面的程序中再读取该变量时,它将得到同一个值。而类模块的数据,是相对于类实例(也就是,由类创建的每一对象)而独立存在的。同样的,标准模块中的数据在程序作用域内存在,也就是说,它存在于程序的存活期中;而类实例中的数据只存在于对象的存活期,它随对象的创建而创建,随对象的撤消而消失。最后,当变量在标准模块中声明为Public时,则它在工程中任何地方都是可见的;而类模块中的Public变量,只有当对象变量含有对某一类实例的引用时才能访问。上面的比较,同样适用于标准模块和类模块中的公共过程,用下面的例子可以说明。新建一个工程,并在“工程”菜单中个添加一•个标准模块和-个类模块,然后运行以下的代码:把下面的代码放在Classi中:,下面是Classi对象的•个属性。mentAsString,下面是Classi对象的一个方法。ment()ment,,gstrVisibleEverywhere把下面的代码放在 Module1中:'标准模块中的代码是全局的。PublicgstrVisibleEveiywhereAsStringPublicSubCallableAnywhere(ByValcl AsClassi)'下行改变一个全局变量,这是一个Classi实例的(属性)'ment='!上,并在Forml中添加以下的代码:Privateme1FirstAsClassiPrivateme1SecondAsClassiPrivateSubForm_Load()'创建两个Classi类的实例。Setme1First=NewClassiSetme1Second=NewClassigstrVisibleEverywhere="Globalstringdata"mand1_Click()Call CallableAnywhere(mc1First)(),运行该工程。当Forml加载时,它创建两个Classi类实例,每个实例有自己的数据。同时,Forml设置了下面全局变量gstrVisibleEverywhere的值。mand1,调用全局过程并传递引用给第一个Classi对象。ment属性,ment方法显示该对象的数据。正如图1所示,ment属性,而且全局字符串在Classi内部是可见的。mand?,ment方法。,两个对象都访问了全局字符串变量;然而,ment属性是空的,ment属性。Globalstringdata: wiTE j图2第二个Classi对象的信息框重点:要避免类的代码依赖于全局变量,也就是标准模块中的公共变量。一个类的许多实例可以同时存在,所有这些对象在程序中共享全局数据。在类模块代码中使用全局变量也违背了面向对象封装的编程原则,因为由这样的类所创建的对象并没有包含它们的所有数据。静态类数据有时,希望由一个类模块所创建的一些对象共享某个数据项。这就是所谓的静态类数据。不能在VisualBasic类模块中实现真正的静态类数据。但是,通过使用Property过程在标准模块中设置及返回Public数据成员的值,可以仿真静态类数据,如以下的代码:'只读属性返回应用程序的名字。monStringOAsString,变量gstrVisibleEverywhere保存在'标准模块中,monString=gstrVisibleEverywhere注意:在类模块中,对模块级的变量不能声明为Static,Static数据只能在过程中使用。由PropertyLet过程(对于含有对象引用的属性,使用PropertySet)对标准模块数据成员赋予新的值,可以仿真非只读的静态类数据。然而,这种使用全局变量的方式违背了封装编程的原则,而旦不推荐使用。例如,变量gstrVisibleEverywhere可以在工程中任何地方赋值,甚至可以从别的类代码中赋值,monstring属性。这样做能导致程序中非常微妙的错误。对象模型通过创建类模块并赋以属性和方法,就可以定义了类,接着就可以由该类创建任意数量的对象。如何记录所创建的这些对象呢?记录对象最简单的办法,莫过于为创建的每个对象都声明一个对象变量。当然,这样对能够创建对象的数量就有了限制。,可能要定位窗体或标准模块中的对象变量、对象数组以及对象集合,就跟处理普通变量一样。但是,随着添加更多的类,可能会发现正使用的这些对象之间有明确的关系。对象模型表达了包含