VB.NET之旅（五）—类的继承

概述 “类的继承？”大李点点头，“以前很多人批评VB的功能不完善时，都会加上这个条件。但是现在VB.NET中已经是比较完善的面向对象编程方法了。刚才我们也提到过，类与 VB.NET 的结构类似，让我们可以定义封装一组相关项的数据类型。然而与结构的一个重要区别就是，VB.NET 类可以继承和扩展其他类的特性。作为新类的基础的类称为‘基类’。从基类派生的类称为‘派生类’。派生类继承基类中定义的所有字段、属 “类的继承？”大李点点头，“以前很多人批评VB的功能不完善时，都会加上这个条件。但是现在VB.NET中已经是比较完善的面向对象编程方法了。刚才我们也提到过，类与 VB.NET 的结构类似，让我们可以定义封装一组相关项的数据类型。然而与结构的一个重要区别就是，VB.NET 类可以继承和扩展其他类的特性。作为新类的基础的类称为‘基类’。从基类派生的类称为‘派生类’。派生类继承基类中定义的所有字段、属性、方法和事件。你看，我们只要对类进行一次开发和调试，就可以将其作为其他类的基础重复使用。”

　　“类的继承的概念我学过的，在VB.NET中是如何来实际演练呢？”我还是坚持着问。

　　“我写段代码给你看一下吧，俗话不是说，百闻不如一见吗？”大李调侃了两句，噼噼啪啪地开始敲打起键盘来：

双击代码全选

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37

Public 　 Class 　CBaseHenry　 　 　　 Private 　x　 As 　 Integer 　=　10　 　 　　 Protected 　y　 As 　 Integer 　 　 　　 Sub 　 New ()　 　 　　　　Console.Writeline( "基类的构造" )　 　 　　 End 　 Sub 　 　 　　 Protected 　 OverrIDes 　 Sub 　Finalize()　 　 　　　　Console.Writeline( "基类的析构" )　 　 　　　 MyBase .Finalize()　 　 　　 End 　 Sub 　 　 Public 　 OverrIDable 　 Function 　GetY( ByVal 　x　 As 　 Integer )　 As 　 Integer 　 　 　　 Me .y　=　me.x　+　x　‘private类型的me.x只能在基类中使用　 　 　　　　Console.Writeline( "基类的GetY方法，结果为:" 　&　 Me .y)　 　 　　　　 Return 　 Me .y　 　 　　 End 　 Function 　 　 　　 Public 　 Sub 　oldY()　 　 　　　　Console.Writeline( "基类的oldY方法" )　 　 End 　 Sub 　 　 End 　 Class

　　“你看，这是一个基类，我再给你写个继承自该类的派生类。”他一边说一边继续写：

双击代码全选

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37

Public 　 Class 　CDerivedHenry　 　 　　 inherits 　CBaseHenry　 　 　　 Sub 　 New ()　 　 　　　　 MyBase . New ()　‘注意：这句话要放在sub内的第一句　 　 　　　　Console.Writeline( "派生类的构造" )　 　 　　 End 　 Sub 　 　 　　 Protected 　 OverrIDes 　 Sub 　Finalize()　 　 　　　　Console.Writeline( "派生类的析构" )　 　 　　　　 MyBase .Finalize()　 　 　　 End 　 Sub 　 　 　　 Public 　 OverrIDes 　 Function 　GetY( ByVal 　x　 As 　 Integer )　 As 　 Integer 　 　 　　　　 Me .y　=　x　*　10　‘protected类型的me.y却可以在派生类中使用　 　 　　　　Console.Writeline( "派生类的GetY方法，结果为:" 　&　 Me .y)　 　 　　　　 Return 　 Me .y　 　 　　 End 　 Function 　 　 　　 Public 　 Sub 　NewY()　 　 　　　　Console.Writeline( "派生类的新方法" )　 　 　　 End 　 Sub 　 　 End 　 Class

　　“你看清了吧，我们通过声明inherits关键字，来标识该类的基类是谁，如果没有标识的类，比如CBaseHenry，VB.Net就会视其为派生自Object基类，这是种隐式继承，和结构是隐式继承自ValueType 类的方式是一样的。”大李指着屏幕跟我解说着。

　　“那这些overrIDes与overload标识是什么意思呀？”我隐隐感觉到它们的意义，却没法清楚地说出来。

　　“我们使用继承，也要允许派生类中的某些属性或方法有与基类不同的行为，我们想‘重写’它，但基类也得要同意你才能重写呀，否则不就会发生命名冲突了吗？因为派生类的对象是可以使用基类的公用成员的，那怎么知道哪些基类的方法与属性是被派生类重写了呢？所以就必须有一个约定：我们在基类中用OverrIDable修饰符来标识允许基类中的属性或方法在其派生类中被重写，没有标识的其实就是默认为有NotOverrIDable修饰符来隐式地标识，用于提醒编译器该属性或方法不可被重写；然后在派生类重写时，我们就用OverrIDes修饰符来标识哪些是重写自基类中定义的 OverrIDable 属性或方法。”大李娓娓道来，“我们来演练一下对派生类的 *** 作吧。”

双击代码全选

1 2 3 4 5 6 7 8 9 10 11

Public 　 Sub 　Main()　 　 　　 Dim 　obj　 As 　CDerivedHenry　=　 New 　CDerivedHenry()　 　 　　obj.GetY(4)　　 '调用派生类的GetY方法　 　 　　obj.oldY()　　　 '调用基类的oldY方法　 　 　　obj.NewY()　　　 '调用派生类的NewY方法　 　 End 　 Sub

　　然后大李按了一下F5键，在“输出”窗口中就出现了如下的运行结果：

双击代码全选

1 2 3 4 5 6 7 8 9 10 11 12 13

基类的构造　　　　　　　　　　‘开始运行 New 　CDerivedHenry()　 　 　　派生类的构造　 　 　　派生类的GetY方法，结果为:40　　‘obj.GetY(4)的运行结果=4*10，不等于基类的(4+10)　 　 　　基类的oldY方法　　　　　　　　‘obj.oldY()的运行结果　 　 　　派生类的新方法　　　　　　　　‘obj.NewY()的运行结果　 　 　　派生类的析构　 　 　　基类的析构

　　“你看，你只在Main中实例化了一个派生类的对象，为什么先会出现‘基类的构造’？”大李问。

　　“这个么，”我开始在代码中查看起来，“是这句了。”我手指着派生类里的这段代码：

双击代码全选

1 2 3 4 5 6 7

Sub 　 New ()　 　 　　　　 MyBase . New ()　‘注意：这句话要放在sub内的第一句　 　 　　　　Console.Writeline( "派生类的构造" )　 　 End 　 Sub

　　“没错，我们必须要注意这一点，就是派生类的构造函数与析构函数都必须重新编写。New 构造函数一般用于打开文件、连接到数据库、初始化变量以及处理任何需要在可使用对象前完成的其他任务。我们必须在Sub New 构造函数中的第一行代码使用语句 MyBase.New()，来调用类层次结构中该类的基类的构造函数，以获得基类的性质。析构则是在Sub Finalize中执行完对派生类的的清理任务，如保存状态信息、关闭文件和与数据库的连接，以及执行在释放对象前必须完成的其他任务之后，在析构函数的最后一句使用语句 MyBase.Finalize() 显式调用其基类的 Sub Finalize 方法，以析构MyBase.New()构造的内容。所以你从程序运行结果中也可以很清楚的看出这一顺序。”大李敲击着屏幕，象是给我提个醒。

　　“明白了，我会记着的。”我诚恳地点头回应着。

　　大李突然想起了什么，抬头对我说：“讲到类的继承，我们还得看一下重载与隐藏的问题。”

总结

以上是内存溢出为你收集整理的VB.NET之旅（五）—类的继承全部内容，希望文章能够帮你解决VB.NET之旅（五）—类的继承所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。