'Visual Basic 2010 Shadowing - Shadows Static Typing en Dynamic Binding
Namespace Shadowing
    Class Example
        Public Shared Sub Main()
            Dim object1_1 As Class1 = New Class1
            Dim object1_2 As Class1 = New Class2
            Dim object1_3 As Class1 = New Class3
            Dim object2_2 As Class2 = New Class2
            Dim object2_3 As Class2 = New Class3
            Dim object3_3 As Class3 = New Class3
            '
            object1_1.Method1()
            object1_2.Method1()
            object1_3.Method1()
            object2_2.Method1()
            object2_3.Method1()
            object3_3.Method1()
            '
            Console.ReadLine()
        End Sub
    End Class
End Namespace
'Bezoek www.vbvoorbeelden.be voor meer Visual Basic voorbeelden.
'Copyright - De Wolf / vbvoorbeelden - 2003-2011 - Alle rechten voorbehouden.