Vb中 继承 多态的实现
说到继承这里首先说下类成员访问的方式,有三种,public,private, friend Public是完全公开的,外部可以随时进行修改,这个不是很安全,所以类里使用公有变量安全性差,若改为私有的,是找不到数据成员的;private是只有本模块可以访问的;而Friend介于是private和public之间,本类和工程都可访问,但其他的工程不可以访问。 所以这里介绍一种比public安全的方式 定义 :属性过程 属性过程(两种情况,写入,读取) 读属性过程的格式如下 Public (static) property get name(arglist) as type(读属性) Statement Name=expression Exit property Statements Name=expression (属性名) End property
写属性过程有两种方式 let 与set
写对象属性set ;数值属性,字符串,整数,浮点用let Public (static) propertyLet name(arglist) as type(读属性) Statement Name=expression Exit property Statements Name=expression (属性名) End property
注意:属性过程名是真正的属性名,变量是中间存错的媒介,将一个属性设置为一个对象的时候用property set。
以上是背景交代。 下面步入话题。
一个程序是由多个类,多个程序实现的,而类中有继承和多态,vb又是基于多态的,下面说下 继承的实现 方法:1 继承与类的展开(flatten)flatten方法是将基类的都拿到派生类中,即将代码复制到本类中 2 对象做为成员 展开说明 Flatten方法事都放在另一个类中,为派生类(方法简单,但要求是源代码是必须有的,然而很多情况是不具有源代码,这样就需要对象成员) 用对象作为成员 首先对象要实例化初始化,实例化方法说明如下 Private sub class_initialize() Set name=new classname End sub 对象结束时要释放 Private sub class_terminate() Set name=nothing End sub 期间可以添加自己的属性过程,如读属性,写属性,方式如开始介绍的。 多态的实现 Vb中的多态是不同的对象,接受相同的消息,产生不同的结果如同样都是水果他们的保存方式几乎是不一样的。同样都是保存,结果是不同的方式。 Vb中使用接口和实现构成多态 接口和实现是不一样的 接口只是描述什么功能,不关心怎样实现 实现,是具体的变现完成某些功能 多态的实现有三部分构成分别是 定义接口类 定义实现类 给接口添加属性 首先定义接口类(在类模块中定义) Public Sub save() '定义了(保存)接口类 End Sub Implements '实现接口类型定义(实现类)是必须有的 这里还可以增加其他的方法 如开始说道的类的属性过程定义 可以定义读属性,写属性,只读,只写属性 Public Property Let color(clr As Long) ' 定义了写的颜色属性 End Property (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |