Herança em VB.Net

[Jeison Souza 0]

Tenho uma classe exemplo abaixo, e estou com uma dúvida.Estou precisando de uma função exatamente como o exemplo que está comentado como não funciona.Já tentei de tudo, CTYPE, CASTDIRECT, mas nada funciona. O IDE não apresenta nenhum erro, mas na execução, ocorre uma exception no cast.Alguém pode me ajudar a fazer o cast de um tipo "Pai" em um tipo "Filho" ???

Public Class Form1    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load        'Funciona        Dim Doberman As Animal = New Cachorro        MsgBox(Doberman.Acao)        'Não Funciona        Dim Lulu As Cachorro = New Animal        MsgBox(Lulu.Acao)    End Sub    Private Class Cachorro        Inherits Animal        Public Overrides Function Acao() As String            Return "Cachorro"        End Function    End Class    Private Class Animal        Public Overridable Function Acao() As String            Return "Animal"        End Function    End ClassEnd Class

[Juliano.net 2]

Jeison, você não pode declarar que um objeto do tipo Filho irá instanciar a classe Pai.O problema está na linha: Dim Lulu As Cachorro = New Animal