浅显易懂的VB类入门教程

《浅显易懂的VB类入门教程》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、浅显易懂的VB类入门教程VB类的入门一直困扰了我很长时间，查阅了很多资料和文章，都是一笔带过，云里雾中的不能理解，通过本篇文章的学习才对VB的类有了一个初步的认识。qee用君“在VBA类：隐者的秘密”这篇教程中的讲述也很详细，但始终弄不懂属性过程PropertyLet与PropertyGet的原理与作用。看完本教程才恍然大悟豁然开朗：原来之所以不明白属性过程PropertyLet与PropertyGet的原理与作用，是因为我始终站在一个使用者角度去理解属性过程，所以怎么也搞不明白。类是制造对象的模板，要站在构造者的角度去理解，这样各种原理就会迎刃而解

2、。本教程例子通过类生成器构建一个类，类构建完成以后，双击这个类，打开代码页面，可以看到类的架构代码。涿行代码仔细推敲，就会对类有个大致的了解。通过这个类生成器构建的类，可以发现，一个类的属性对应一对属性过程PropertyLet与PropertyGe并且还有一个程序集变量。站在构建者的角度可以这么理解：当给这个类的一个实例对象的属性赋值的时候，调用PropertyLet过程，把所要赋的值存放在那个程序集变量中。当要读取一个对象的值的时候，就是读取那个程序集变量的值。（2011-8-24注）第一天：类的概念当您第一次看到“类”这个概念时，可能会觉得摸不

3、着头脑。我们先看一点我们熟悉的东西：在VB控件工具箱中的CommandButton，这是VB中的按钮控件，是我们在VB程序中经常用到的基本控件。我们在学习VB的类之前，单纯地就把它看成一个控件，其实，用类的观点，它就是一个类。我们知道，所有CommandButton都有相同的属性选项，尽管对于画到窗体上去的每个按钮，这些属性的值可能不同；它们也都有相同的事件，尽管我们对画到窗体上的每个按钮的这些事件地处理可能不同；它们也都有不同的方法，尽管我们调用每个画到窗体上的按钮的方法的目的不同。但，所有的窗体中的按钮都是CommandButton这一类控件。我

4、们新建一个窗体，从控件工具箱中选中CommandButton并画到窗体上，这时，窗体上就有了一个我们非常熟悉的Command1这个按钮。我们看看Command1这个东西，按照类的观点，它现在不能再叫做一个CommandButton控件（类）了，而叫做一个按钮，是CommandButton这个控件（类）的实例。所谓实例就是被具体化的类的一个形态，它有自己的属性，如高度和宽度，有自己的位置和大小，有自己的Caption和Name；它有自己的方法，如Move，当我们用Command1.Move这个方法时，谁都知道，只会移动Command1;它有自己的事件，

5、如Click事件，当我们对Command1_Click进行代码编写后，只有Command1会调用我们对这个事件编写的代码。每当我们在这个窗体上新画一个CommandButton，就新产生一个CommandButton的实例，每个新产生的按钮，都有自己的个性，但它们不会有CommandButton这个类所包含的属性项目以外的选择，比如Command1绝对不会有Max属性。我们再看第二个例子，这个例子我想跳出VB的范围，回到生活中来。比如我们常说，程序员是一类人，在这里，我们把程序员这类人就叫做一个类。这个类有一些属性，比如Name(姓名)、Empold

6、erTool（使用的开发工具）；这个类有一些方法，比如Empolder（开发）、Study（学习）；也同样有一些事件，比如EmpolderSucceed（开发成功）、EmpolderLost(开发失败)。我们现在来创建一个程序员类的实例，好让他可以做点事情。（要记住，没有实例化的类，只是一种概念上的东西，这种东西是什么也不能做的，就象日常生活中我们所见到的一样：程序员可以开发软件，但软件是由明确的属于这个类的一个实例开发出来的，比如求伯君写的WPS，求伯君是程序员这个类的一个实例，而不是这个类本身）。下面的代码是标准的VB代码，但却是还没有实际意义的

7、代码——因为您不要指望这段VB代码中的程序员类能为您写出一个VB程序来。[vb]OptionExplicit‘定义一个对象变量，并指定这个变量属于这个类‘WithEvents使这个对象能响映事件DimWithEventsMyDeveloperAscDeveloperPrivateSubForm_Load()SetMyDeveloper=NewcDeveloper‘这句一定要，这是初始化这个对象WithMyDeveloper.Name="求伯君"‘这个程序员叫做求伯君.EmpolderTool="C++"‘这个程序员用C++进行开发.Empolder‘

8、调用Empolder方法使这个程序员进行开发工作EndWithEndSub‘如果开发失败，则产生Empold