VB类模块教程

VB类模块 教程 人力资源管理pdf成真迷上我教程下载西门子数控教程protel99se入门教程fi6130z安装使用教程 本页仅作为文档封面，使用时可以删除Thisdocumentisforreferenceonly-rar21year.March对程序员和编程爱好者来说，VB中类的技术是学习中的一个难点，在大型软件的开发过程中，模块(Moudle)、控件(Activeocx)A链接库(Activedll)和类(Classmoudle)构成了系统化、高效化的软件 工程 路基工程安全技术交底工程项目施工成本控制工程量增项单年度零星工程技术标正投影法基本原理 ，而类的技术是控件和链接库技术的基础，因此掌握类的理论和编程方法是非常有意义的。（一）类的基本定义和应用概述;类是包含了方法、属性、数据成员的高级代码模块，它既在模块的范畴之内，乂是一个没有图形界面的Activeocx,程序员可以象使用控件一样使用它，但却不能看到它，值得注意的是，类是不能继承的。类能够使我们高效的完成对某一个或者某儿个特定的对象的复杂操作，对象的动作就是类的方法，对象的属性就是类的属性过程。相对而言，如果编程的对象是一组事物，那么，我们采用 标准 excel标准偏差excel标准偏差函数exl标准差函数国标检验抽样标准表免费下载红头文件格式标准下载 模块的方式是非常合适的，在下列两种情况下，应该使用类进行代码处理：（1）创建大量性质相近的对象；（2）提高代码的封装性。类的创建非常简单，在进行代码编写的时候，在〃工程〃菜单中选择〃添加类模块〃项目,就可以添加一个空口的类。类文件一般以？cls作为扩展名保存。（二）类的方法的实现；类的方法类似于动态链接库的接口函数，它能够接受其他窗体代码的指定类型参数，并且传递到类中。一般来说类的方法是能够指定是否有返回值的。它在类中通常是一个public过程。请看下面的代码示例，它使一个密码框拒绝非字母的输入：（1）类Cis的代码；OptionExplicit'变量检查PrivateWithEventsmytxtAsTextBox本类中的方法接受和控制一个text密码框DimisNUMAsBoolean'类的模块级变量PublicSubAttach(itTEXTAsTextBox'接受外咅B变量至Umytxt中Setmytxt=itTEXTEndSubPrivateSubisNUM='测试密码框的键盘输入是否是Beep=""MsgBox”非法字,调试输出密码框内容mytxt_Keyllp(KeyCodeAsInteger,ShiftAsIntege)（KeyCode>=65And（KeyCode<=90英文字母IfisNUM=FalseThen'如果输入不是英文字母则响铃并且清空密码框内容符输入！“EndIfEndSub，类的代码结束（2）类的引用；已经编写完成的类可以经过两种格式进行引用，第一种方式：Private（public或者dim）myCLS（指定的类名）AsNewcis（编写完成的类名）；第二种方式较多用于程序编写风格较“老〃的程序员：首先在窗体代码中进行模块级声明一DimmyCLSAscis然后在具体代码过程中进行具体定义一Setmycls=Newclso这两种方式的效率和代码的简洁性方面可能会有所差别，但在笔者的编程实践中，并没有什么特别的感觉，不过我较多使用第一种方式，因为它书写起来更加方便。另外，在代码结束的时候，使用SetmyCLS=Nothing来取消类的资源占用是一种非常好的编程习惯。在窗体forml中（窗体有一个密码框控件textl,passworldchar=*'*”添加以下代码：OptionExplicitPrivatemyCLSAsNewcis'引用cisPrivateSubForm_Load()Textl'启动类EndSub，在代码结束时记得释放资源PrivateSubForm_Unload(CancelAsInteger)SetmyCLS=NothingEndEndSub本文代码展示了类的方法的代码编写过程和调用方式（尽管它和类的事件非常相似），它的效果是，如果密码框中被输入了非字母，则系统振铃，并删除密码框中的原来的数据一在一定程度上保护密码。类的方法可以不需要任何参数，这一点类似一个public的函数或者过程，它也是类中使用最广泛的。在下一篇文章中我将讨论，如何使用类的属性、事件和方法进行综合编程.在VisualBasic类的技术与应用（上）（以下简称上文）中，我们讨论了类的理论、类的创建和类的方法的编程实践，实际上，类之所以能够在软件工程中广泛应用，最主要的一点是它可以非常方便的封装许多编程需要的属性，这不仅使程序员在一定程度上克服控件（ocx）和链接库（dll）设计和调试中的复杂性，而且能够提髙程序代码的简洁和高效性一本文将讨论完整的类的编程，包括方法、属性和基本事件。（-）类的属性的特征和定义：类似于标准控件的属性，类的属性允许用户在指定的数据范围内进行赋值，这些值被类内的各个代码部分所共享。属性的获得和传递需要经过PropertyLet和PropertyGet语句进行编程，当然，我们首先需要在类中进行全局或者模块级的相应变量定义。（二）事件的属性和基本定义；和窗体的事件类似，类也有两个基本的事件，Class」nitialize（类加载时触发）和Class_Terminate（类卸载时触发），这两个事件和是private的。实际上，我们完?可以忽略这两个事件一只要你记得完善类的方法和属性。类同样可以定义自己的事件，它和方法的程序编写格式类似，只不过需要WithEvents关键字进行参数声明，而且事件不能有任何命名参数或者可选参数，它也没有返回值。实际上，结构良好的方法和属性完全可以替代结构复杂的类的事件。(三)类的方法、事件和属性的编程实例；本程序的设计口的是，通过类控制窗体中文本框的内容的全部大写、小写和逆向排序转化。为了方便代码的书写和调用，我在类中引用了枚举的编程方法。以下代码在类Class：iOptionExplicit'方法的参数接口Lbigit'大写属性PrivateWithEventsmyTXTAsTextBoxSTYLELcaseit'小写属性排序属性EndEnum，自定义枚举，用来实现属性的自动赋值PrivatemvarBiaozhiAsSTYLE实现枚举常量的连接dONE()AsString"DONE方法用来根据指定的枚举属性，对本框进行相应的字符转化操作PublicEnumNlogoit1逆向mvarBiaozhi=NlogoitThenElselfmvarBiaozhi=LcaseitThen写转化Else，并且返回转化后的字符串dONE=StrReverse(myTXT)dONE=LCase(myTXT)PublicFunction1窗体文If"逆向排序強制小dONE=UCase(myTXT)'强制大写转化EndIfEndFunction'DONE方法结束PublicPropertyLetBiaozhi(ByValvDataAsSTYLE)获得属性的被赋的值mvarBiaozhi=vDataEndPropertyPublicPropertyGetBiaozhi()AsSTYLE"传递属性值到类中SetBiaozhi=mvarBiaozhiEndPropertyPublicSubAttachfitTEXTAsTextBox)'连接类的方法SetmyTXT=itTEXTEndSubPrivateSubClass_lnitialize()'本事件在类倍加载时激活MsgBox"你好！本程序向忘展示使用类的方法、属性、事件进行编程的技术！“EndSubPrivateSubClassATerminateO'本事件在类被卸载时激活MsgBox"你好！记得在Class_Terminate中填写对象撤销后的代码！"EndSub，类的代码全部结束一四)窗体代码的引用编程在窗体FORM1中添加文本控件TEXT1下拉列表控件C0MB01、命令按钮C0MMAND1(CAPTION='^始转化")，调整三个控件到适当位置。DimmyTAsNewClassi，类的引用PrivateSubForm_Load()字符串大写转化“字符串小写转化““字符串逆向排序“=0，在列表框中添加属性选项EndSubPrivateSubCommandl_Click()'当命令按钮按下时激活类Textl，方法参数联接SelectCaseCase0=LbigitCase1=LcaseitCase2=NlogoitEndSelectBiaozhi属性赋值，根据列表框的选择，给类的主意，在编程环境中，上述属性值自动添加，返回排序结束后的字符串EndSubPrivateSubForm_Unload(CancelAsInteger)SetmyT=NothingEnd，良好的编程习惯EndSub怎么样，我们的代码看起来如此的简洁，这种感觉就象是在使用一个控件，不仅可以随心所欲的调用，而且方便的使用了vb的自动提示功能。(要自动提示，可以进行枚举)