来自:http://blog.sina.com.cn/s/blog_7aab5c6b0100urws.html
Public Class TheBase
Public Overridable Sub over()
Debug.WriteLine("TheBase")
End Sub
End Class
Public Class TheInherited : Inherits TheBase
Public Overrides Sub over()
Debug.WriteLine("TheInherited")
End Sub
End Class
Public Class TheShadowed : Inherits TheInherited
Public Shadows Sub over()
Debug.WriteLine("TheShadowed")
End Sub
End Class
第一种情况:
Dim c As TheBase
c = New TheBase()
c.over() ' 输出 TheBase
c = New TheInherited()
c.over() ' 输出 TheInherited
c = New TheShadowed()
c.over() ' 输出 TheInherited
第二种情况:
Dim c As TheInherited
c = New TheBase()
c.over() ' 错误!无效的转换。
c = New TheInherited()
c.over() ' 输出 TheInherited
c = New TheShadowed()
c.over() ' 输出 TheInherited
第三种情况:
Dim c As TheShadowed
c = New TheBase()
c.over() ' 错误!无效的转换。
c = New TheInherited()
c.over() ' 错误!无效的转换。
c = New TheShadowed()
c.over() ' 输出 TheShadowed
此例说明Overridable、Overrides、Shadows的用法。
请注意TheBase里面的Overridable,如果没有这一句,后面类TheInherited将无法声明同名过程over(),而TheShadows仍然可以。
Overridable 的意思是:可以被重写的。
Overrides 的意思是:重写原来的。
Shadows 的意思是:这个函数/过程/变量跟我的父类没有任何关系,它是一个全新的过程。
在运行的例子中我们可以清晰地看到,无论变量c的定义是什么,VB.NET都会尽量寻找到最后被定义的那个成员。
也就是说,如果被重写了,那么就找“从变量类型开始,到这个变量所指对象实际上的类为止,最后一次被重写(Overrides)的那个成员”。(当然,如果找不到,那么还会往变量类型的祖先那个方向上去找。)
简单点讲就是说,无论c怎么定以,如果他指向的是一个TheBase,他就找“到TheBase为止最后一次被重写的那个Sub over()”。
如果他指向的是一个TheInherited,就找“到TheInherited为止最后一次被重写的那个Sub over()”,也就是TheInherited里面的那个。
对于TheShadowed来说,情况稍微复杂一点:
由于TheShadowed里面所写的那个over()被声明为Shadows的,也就是说这个over()跟TheBase和TheInherited里面的没有关系,于是从变量c的基类(TheBase)开始找,一直找到变量所指对象的类型TheShadowed,发现变量c的类型(无论是TheBase还是TheInherited)里面的那个over()最后一次被重写是在TheInherited里面(注意:TheShadows里面的over()跟它没关系),于是只要c不是Dim .. As TheShadows,那么就会选择调用TheInherited里面的over()了。