Call base constructor : Constructor « Class « VB.Net

Call base constructor

Call base constructor
Imports System

Public Class MainClass
    Shared Sub Main()
         Dim w As New Window(5, 10)
         w.DrawWindow(  )

         Dim lb As New ListBox(20, 30, "Hello world")
         lb.DrawWindow(  )

    End Sub
End Class

 Public Class Window
     Public Sub New(ByVal top As Integer, ByVal left As Integer) = top
         Me.left = left
     End Sub 'New

     Public Sub DrawWindow(  )
         Console.WriteLine("Drawing Window at {0}, {1}", top, left)
     End Sub

     Private top As Integer
     Private left As Integer

 End Class

 Public Class ListBox
     Inherits Window

     Public Sub New(ByVal top As Integer, ByVal left As Integer, ByVal theContents As String)
         MyBase.New(top, left) ' 
         mListBoxContents = theContents
     End Sub 

     Public Shadows Sub DrawWindow(  )
         MyBase.DrawWindow(  ) 
         Console.WriteLine("Writing string to the listbox: {0}", mListBoxContents)
     End Sub 

     Private mListBoxContents As String 

 End Class


Related examples in the same category

1.Class with two constructorsClass with two constructors
2.Constructor with parametersConstructor with parameters
3.Use Constructor to init member variables
4.Multiplie Constructors
5.Init Member Variables through ConstructorInit Member Variables through Constructor
6.Overload Constructor DemoOverload Constructor Demo
7.Overloading constructorsOverloading constructors