'Visual Basic 2010 Constructoren - New Object Oriented Programming
Module Exercise1Task
    Sub Main()
        Dim object2 As Class2 = New Class2
        '
        Console.WriteLine(object2.Value1)
        Console.WriteLine(object2.Value2)
        '
        Console.ReadLine()
    End Sub
End Module
Class Class1
    Public Value1 As Integer
    Public Sub New()
        Value1 = 1
    End Sub
End Class
Class Class2 : Inherits Class1
    Public Value2 As Integer
End Class
'Bezoek www.vbvoorbeelden.be voor meer Visual Basic voorbeelden.
'Copyright - De Wolf / vbvoorbeelden - 2003-2011 - Alle rechten voorbehouden.