这是我的沙坑:
Sub Main()
Dim myCar As Car
myCar = New sportsCar
myCar.numDoors = 4
myCar.weight = 100 '<<errors here
End Sub
Class Car
Public numDoors As Integer
End Class
Class sportsCar
Inherits Car
Public weight As Integer
End Class
最初我将 myCar 指向超类Car
,然后使用多态将其实例化为子类sportsCar
。
为什么我不能访问子类的字段weight
?有没有我需要使用的技术来访问这个字段,或者我只是错过了重点?
编辑 我意识到以下将编译。但练习的重点是我试图理解多态性的概念
Sub Main()
Dim myCar As sportsCar
myCar = New sportsCar()
myCar.numDoors = 4
myCar.weight = 100
End Sub
如果子类的成员不可访问,那么多态的意义何在?
Dim myCar As Car
myCar = New sportsCar