解析VB.NET中的面向对象编程特征[2]

　　现在，我们就可以初始化一个Manager对象，并使用Employee中的成员。如下面表10中的代码所示：

　　初始化Manager对象

　　Class Employee

　　Public salary As Decimal = 40000

　　Public yearlyBonus As Decimal = 4000

　　Public Sub PrintSalary()

　　'' print the salary to the Console

　　Console.Write(salary)

　　End Sub

　　End Class

　　Class Manager: Inherits Employee

　　End Class

　　Module Module1

　　Public Sub Main()

　　Dim manager As Manager

　　manager = New Manager()

　　manager.PrintSalary()

　　End Sub

　　End Module

　　下面表11中的代码演示了如何通过编写一个新的PrintBonus方法来扩充Manager类别的方法：

　　在子类中添加新的方法

　　Class Manager: Inherits Employee

　　Public Sub PrintBonus()

　　Console.Write(yearlyBonus)

　　End Sub

　　End Class

　　注意成员可访问性限制的使用。例如，如果使yearlyBonus域具有private属性，该哉就不能被Manager类访问，因此，编译这样的代码就会发生错误。

文章来源于领测软件测试网 https://www.ltesting.net/