Visual BasicNET 程序设计第六章.pptVIP

以下描述一些继承规则，以及一些可用来更改类继承或被继承方式的修饰符： 1. 继承修饰符：Visual Basic引入表6-3所列的类级别语句和修饰符，以支持继承。 Inherits 语句 指定派生类继承的哪个基类。 NotInheritable 修饰符 定义一个类，特别指明该类不能作为基类。 MustInherit 修饰符 声明一个类为必须被继承的类，又称“抽象类”，该类必须在派生类实现。 表6-3 继承修饰符 2. 重写派生类中的属性和方法 重写又称“覆盖”，是在在派生类中对基类的方法重新实现。默认情况下，派生类从其基类继承方法。如果继承的属性或方法需要在派生类中有不同的行为，该方法或属性可以“重写”，即可以在派生类中定义其新的实现。表6-4中的修饰符用于控制重写属性和方法。 修饰符 功 能 Overridable 允许某个类中的属性或方法在派生类中被重写。 Overrides 重写基类中定义的 Overridable 属性或方法。 NotOverridable 防止在继承类中重写属性或方法。默认情况下，Public 方法为 NotOverridable。 MustOverride 要求派生类重写属性或方法。当使用 MustOverride 关键字时，方法定义仅由 Sub、Function 或 Property 语句组成。不允许有任何其他语句，特别是没有 End Sub 或 End Function 语句。MustOverride 方法必须在 MustInherit 类中声明。 表6-4 用于控制重写属性和方法的修饰符 [建立类文件] 在菜单栏上选择“项目?添加类”选择，添加新类MyClass.vb。 [程序代码] 删除MyClass.vb中的所有代码，加入以下代码： Namespace Gongsi Public Class guyuan ’基类 Public Name As String Public Sub initValue(ByVal sName As String) Name = sName End Sub Public Overridable Function jsgz() As Double Return 0.0 End Function End Class Public Class wenyuan’文员类 Inherits guyuan Public jbgz As Double = 1200 Public Overrides Function jsgz() As Double Return jbgz End Function End Class Public Class yewuyuan ‘业务员类 Inherits guyuan Public jbgz As Double = 800 Public tc As Double = 1000 Public Overrides Function jsgz() As Double Return jbgz + tc End Function End Class Public Class yewujingli ‘业务经理类 Inherits guyuan Public jbgz As Double = 800 Public tc As Double = 1000 Public jj As Double = 200 Public Overrides Function jsgz() As Double Return jbgz + tc + jj End Function End Class End Namespace [代码说明] 1. 名字空间 Namespace Gongsi…End Namespace结构定义名字空间。名字空间就象一座办公大楼，类就象办公大楼的职能部门；把相关的职能部门集中在一起办公，象学校的行政大楼。要到一个学校去办理事务，只要找到学校的办公大楼，再找相关部门就容易多了；或者象商业上的电脑城，买电脑直接找到电脑城位置即可。北京、上海、广州和深圳都有电脑城，若需要找电脑