Bonsoir tout le monde. j'ai besoin de votre aide.

Pour comprendre la notion de Polyorphsme dans VB, j'ai essayé ce petit exemple
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Module Module1
 
    Sub Main()
        Dim damien As humain
        damien = New espagnol
        damien.parle()
        Console.ReadKey()
    End Sub
 
End Module
Classe mère:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
Public Class humain
    Public Overridable Sub parle()
        Console.WriteLine("tout humain parle")
    End Sub
End Class
Classe fille:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Public Class espagnol
    Inherits humain
 
    Public Overloads Sub parle()
        Console.WriteLine("Il parle espagnol")
    End Sub
 
End Class
Je m'attends à ce que (parle()) de espagnol qui s'exécute. Mais mon code affiche "tout humain parle"

Est ce que quelqu'un peut me donner une explication?

Merci