Init Member Variables through Constructor : Constructor « Class « VB.Net

Init Member Variables through Constructor

Init Member Variables through Constructor
Imports System

Public Class MainClass

    Shared Sub Main(ByVal args As String())
       Dim timeObject As New Time(2005, 3, 25, 9, 35, 20)
       timeObject.DisplayCurrentTime( )
    End Sub
End Class

 Public Class Time
    Private Year As Integer
    Private Month As Integer
    Private Day As Integer
    Private Hour As Integer
    Private Minute As Integer
    Private Second As Integer

    ' Public methods
    Public Sub DisplayCurrentTime( )
         System.Console.WriteLine("{0}/{1}/{2} {3}:{4}:{5}", _
             Month, Day, Year, Hour, Minute, Second)
    End Sub 'DisplayCurrentTime

    ' Constructor
    Public Sub New(ByVal theYear As Integer, ByVal theMonth As Integer, _
                   ByVal theDate As Integer, ByVal theHour As Integer, _
                   ByVal theMinute As Integer, ByVal theSecond As Integer)

       Year = theYear
       Month = theMonth
       Day = theDate
       Hour = theHour
       Minute = theMinute
       Second = theSecond
    End Sub

 End Class 'Time


Related examples in the same category

1.Call base constructorCall base constructor
2.Class with two constructorsClass with two constructors
3.Constructor with parametersConstructor with parameters
4.Use Constructor to init member variables
5.Multiplie Constructors
6.Overload Constructor DemoOverload Constructor Demo
7.Overloading constructorsOverloading constructors