Public Class T
 
    Public Overridable Sub Test()
        Console.WriteLine("Bingo")
    End Sub
End Class
 
Public Class InhT
    Inherits T
 
    Public Sub myTest()
        MyBase.Test()
    End Sub
 
    Protected Shadows Sub Test()
        MyBase.Test()
    End Sub
End Class

Ralf