에 자식 인스턴스를 사용 Vb.net 부모 - 입력

Question

내가 자바 그래서

내가 하나 개의 인스턴스를 가지고 사용 다형성과 상속을 시도하고 VB에서 잘못된 그 일을 할 수있는 다형성 수행하는 방법을 더 잘 알고 변수 여러 양식을 취할 수있는 변수는 부모 형식으로 인스턴스화되고 자식 클래스 인스턴스로 초기화되지만 자식 속성에 액세스 할 수 없습니다. 나는이 작업을 얻을 수 있다면

가

sub main() 
    Dim animal as Animal   'instantiated as parent type 
    'some code later 
    animal= New Dog()    'no problems here 
    dim legs = animal.legs   'this works 
    dim fur = animal.fur   'this is an error 
end sub 

Public Class Animal 
    Property legs as integer 
End Class 

Public Class Dog 
    inherits Animal 
    Property fur as Boolean = True 
End Class 

그것은 좋은 것 : 아래

내가 할 노력하고있어 예입니다.

Answer 1

이것은 실제로 인스턴스를 생성하지 않고 선언합니다. 당신이 동물을 알고있는 경우

Dim animal as Animal

그리고, 다음과 같이 하나를 만들 :

Dim doggo As New Dog

유일한 시간을 당신이 Animal이 경우 그대로 Dog을 치료하는 데 필요합니다 당신은 그것에 뭔가를 수행하고 있습니다 Legs.

(예를 들어 Animal 클래스) :

Shared Sub AmputateLeg(patient As Animal) 
    patient.Legs = patient.Legs - 1 
End Sub 

당신과 같이 Dog에서 호출 할 수 있습니다 : Plutonix은 주석으로, 기본 클래스는 파생 대해 아무것도 몰라한다

Dim doggo As New Dog() 
doggo.Legs = 4 
Animal.AmputateLeg(doggo) 
Console.WriteLine(doggo.Legs) ' Shows 3. 

따라서 Dog이 Animal 유형

으로 처리 될 때 IDE는 Fur 속성을 찾을 수 없습니다.

아마도 당신은 Interface이 방법을 사용하여 Interface 대신

Public Interface IAnimal 
    Property Fur As Boolean 
    Property Legs As Integer 
End Interface 

Public Class Dog 
    Implements IAnimal 

    Public Property Fur As Boolean = True Implements IAnimal.Fur 
    Public Property Legs As Integer = 4 Implements IAnimal.Legs 
End Class 

Public Class Duck 
    Implements IAnimal 

    Public Property Fur As Boolean = False Implements IAnimal.Fur 
    Public Property Legs As Integer = 2 Implements IAnimal.Legs 
End Class 

의 라인을 따라 뭔가 항상 Legs 및 동물의 Fur를 참조 할 수 있음을 의미를 원한다.