关于Visual Basic 6.0类开发之三(转)

（2） 类的引用 ；

　　 已经编写完成的类可以经过两种格式进行引用，第一种方式：Private（public或者dim) myCLS（指定的类名） As New cls（编写完成的类名）；第二种方式较多用于程序编写风格较“老”的程序员：首先在窗体代码中进行模块级声明——Dim myCLS As cls,然后在具体代码过程中进行具体定义—— Set mycls = New cls。这两种方式的效率和代码的简洁性方面可能会有所差别，但在笔者的编程实践中，并没有什么特别的感觉，不过我较多使用第一种方式，因为它书写起来更加方便。另外，在代码结束的时候，使用 Set myCLS = Nothing来取消类的资源占用是一种非常好的编程习惯。

　　 在窗体form1中(窗体有一个密码框控件text1，passworldchar="*")添加以下代码：

　　 Option Explicit

　　　 Private myCLS As New cls

　　　 '引用cls

　　　 Private Sub Form_Load()

　　　 myCLS.Attach Text1

　　　 '启动类

　　 End Sub

　　 '在代码结束时记得释放资源

　　 Private Sub Form_Unload(Cancel As Integer)

　　　 Set myCLS = Nothing

　　 End

　 End Sub

　　 本文代码展示了类的方法的代码编写过程和调用方式(尽管它和类的事件非常相似)，它的效果是，如果密码框中被输入了非字母，则系统振铃，并删除密码框中的原来的数据——在一定程度上保护密码。
类的方法可以不需要任何参数，这一点类似一个public的函数或者过程，它也是类中使用最广泛的。在下一篇文章中我将讨论，如何使用类的属性、事件和方法进行综合编程[@more@]

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/8781179/viewspace-925244/，如需转载，请注明出处，否则将追究法律责任。

转载于:http://blog.itpub.net/8781179/viewspace-925244/