VB.net程序设计教程（第3版）第7章.ppt

******************重载实现解决方法2为Student类添加新的SetValue函数PublicOverloadsSubSetValue(ByValaAsString,ByValbAsString)No=aName=bEndSub *例7.15派生类重载基类的方法在派生类StudentLeader中将New_SetValue方法改名为SetValue。对基类Student中的SetValue方法的定义添加关键字Overloads。PublicOverloadsSubSetValue(ByValaAsString,ByValbAsString,ByValcAsInteger)No=a：Name=b：Score=cEndSub 这样，不仅在基类Student中可以重载，而且派生类StudentLeader中也可以重载。*在派生类StudentLeader中的SetValue方法的定义添加关键字Overloads。PublicOverloadsSubSetValue(ByValaAsString,ByValbAsString,ByValcAsInteger,ByValdAsString)MyBase.SetValue(a,b,c)调用基类的方法Duty=dEndSub关键字MyBase代表基类。重写派生类的方法时，可用MyBase关键字调用基类中的方法，但不能通过MyBase访问基类的Private成员*重写作用:派生类对所继承属性和方法的改写或扩充实现:在基类和派生类中使用Overridable基类的定义Class基类名……PublicOverridableSub过程名(参数名) ……EndSub……EndClass*重写派生类的定义Class派生类名……PublicOverridesSub过程名(参数名)……EndSub……EndClass*重写示例例7.16在派生类StudentLeader中重写基类Student中的Print方法。对基类Student中的Print方法定义添加关键字Overridable。PublicOverridableSubPrint()Debug.WriteLine(No)Debug.WriteLine(Name)Debug.WriteLine(Score)EndSub添加关键字Overridable后，Print方法可以在任何派生类中重写*重写示例对派生类StudentLeader中的Print方法定义添加关键字Overridable。PublicOverridesSubPrint()MyBase.Print()Debug.WriteLine(Duty)EndSub*重载与重写小结(1)重载要求参数列表、或参数个数、或参数类型有所不同。当参数个数和类型全部相同时，不能重载，只能重写。(2)同一个类的方法重载时，每一个方法中必须要有Overloads关键字(3)派生类重载基类方法时，基类方法中可以省略Overloads关键字，但派生类的方法中必须要有Overloads关键字。*重载与重写小结(4)若基类的方法中有Overloads关键字，则基类可以重载，派生类也可以重载。(5)重写只能发生在基类与派生类之间。在基类中使用关键字Overridable，在派生类中使用关键字Overrides。(6)重写会发生意想不到的问题，请务必谨慎使用。***********************VB.NET程序设计教程本书目录VisualBasic.NET程序设计教程(第三版)同济大学计算机基础教学团队021*第七章面向对象程序设计基础7.1类的基本特类7.2类和对象7.3继承和派生7.4综合应用*7.1类的基本特类从结构VBPoint到类VBPointStructureVBPointDimx,yAsSingl