关于VisualBasic6.0类开发(上)
2018-06-17 17:16:13来源:未知 阅读 ()
(一)类的基本定义和应用概述;
类是包含了方法、属性、数据成员的高级代码模块,它既在模块的范畴之内,又是一个没有图形界面的Activeocx,程序员可以象使用控件一样使用它,但却不能看到它,值得注意的是,类是不能继承的。
类能够使我们高效的完成对某一个或者某几个特定的对象的复杂操作,对象的动作就是类的方法,对象的属性就是类的属性过程。相对而言,如果编程的对象是一组事物,那么,我们采用标准模块的方式是非常合适的,在下列两种情况下,应该使用类进行代码处理:
(1)创建大量性质相近的对象;
(2)提高代码的封装性。
类的创建非常简单,在进行代码编写的时候,在“工程”菜单中选择“添加类模块”项目,就可以添加一个空白的类。
类文件一般以.cls作为扩展名保存。
(二)类的方法的实现;
类的方法类似于动态链接库的接口函数,它能够接受其他窗体代码的指定类型参数,并且传递到类中。一般来说类的方法是能够指定是否有返回值的。它在类中通常是一个public过程。请看下面的代码示例,它使一个密码框拒绝非字母的输入:
(1)类cls的代码;
OptionExplicit'变量检查
PrivateWithEventsmytxtAsTextBox
'本类中的方法接受和控制一个text密码框
DimisNUMAsBoolean
'类的模块级变量
PublicSubAttach(itTEXTAsTextBox)
'接受外部变量到mytxt中
Setmytxt=itTEXT
EndSub
PrivateSubmytxt_KeyUp(KeyCodeAsInteger,ShiftAsInteger)
isNUM=(KeyCode>=65)And(KeyCode<=90)
'测试密码框的键盘输入是否是英文字母
IfisNUM=FalseThen
Beep
mytxt.Text=""
'如果输入不是英文字母则响铃并且清空密码框内容
MsgBox"非法字符输入!"
EndIf
Debug.Printmytxt.Text
'调试输出密码框内容
EndSub
'类的代码结束
(2)类的引用;
已经编写完成的类可以经过两种格式进行引用,第一种方式:Private(public或者dim)myCLS(指定的类名)AsNewcls(编写完成的类名);第二种方式较多用于程序编写风格较“老”的程序员:首先在窗体代码中进行模块级声明——DimmyCLSAscls,然后在具体代码过程中进行具体定义——Setmycls=Newcls。这两种方式的效率和代码的简洁性方面可能会有所差别,但在笔者的编程实践中,并没有什么特别的感觉,不过我较多使用第一种方式,因为它书写起来更加方便。另外,在代码结束的时候,使用SetmyCLS=Nothing来取消类的资源占用是一种非常好的编程习惯。
在窗体form1中(窗体有一个密码框控件text1,passworldchar="*")添加以下代码:
OptionExplicit
PrivatemyCLSAsNewcls
'引用cls
PrivateSubForm_Load()
myCLS.AttachText1
'启动类
EndSub
'在代码结束时记得释放资源
PrivateSubForm_Unload(CancelAsInteger)
SetmyCLS=Nothing
End
EndSub
本文代码展示了类的方法的代码编写过程和调用方式(尽管它和类的事件非常相似),它的效果是,如果密码框中被输入了非字母,则系统振铃,并删除密码框中的原来的数据——在一定程度上保护密码。
类的方法可以不需要任何参数,这一点类似一个public的函数或者过程,它也是类中使用最广泛的。在下一篇文章中我将讨论,如何使用类的属性、事件和方法进行综合编程。(未完待续)
->
标签:
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有
下一篇:人民币小写转大写
- 快速开发多媒体Web 2018-06-17
- 用VisualBasic开发绿色软件的探讨 2018-06-17
- 用VB开发CAI软件的小经验 2018-06-17
- 关于VisualBasic6.0类开发(下) 2018-06-17
- VB开发通讯软件 2018-06-17
IDC资讯: 主机资讯 注册资讯 托管资讯 vps资讯 网站建设
网站运营: 建站经验 策划盈利 搜索优化 网站推广 免费资源
网络编程: Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术: Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
软件技巧: 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷
网页制作: FrontPages Dreamweaver Javascript css photoshop fireworks Flash