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