Overriding覆寫父類別的Method
子類別不想直接繼承使用(重寫或部份衍生)
'子類別
'想改寫父類別有的 method Salary()
'Overrides 定義子類別覆寫父類別
Public Overrides Function Salary() As Decimal
Dim b As Decimal = MyBase.Salary() '原來底薪
Me._salary = b + Me._bon
End Function
'父類別
'薪資計算的功能Method
'Overridable 允許子類別可以進行複寫
Public Overridable Overloads Function Salary() As Decimal
Return Me._salary
End Function
全站熱搜