Class with constructor : Constructor « Class Module « VB.Net Tutorial






Option Strict On
 Imports System
 Public Class Time
    ' Private variables
    Private Year As Integer
    Private Month As Integer
    Private mDate 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, mDate, 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
       mDate = theDate
       Hour = theHour
       Minute = theMinute
       Second = theSecond
    End Sub

 End Class 'Time

 Module Module1

    Sub Main( )
       Dim timeObject As New Time(2005, 3, 25, 9, 35, 20)
       timeObject.DisplayCurrentTime( )
    End Sub

 End Module
3/25/2005 9:35:20








6.30.Constructor
6.30.1.Class with constructor
6.30.2.Empty constructor
6.30.3.Default constructor
6.30.4.Copy constructor
6.30.5.Constructors in three levels
6.30.6.Overloaded constructors
6.30.7.Call member method in constructor
6.30.8.Private Constructor
6.30.9.Inheriting Constructors
6.30.10.Shared Constructor
6.30.11.Constructor with Optional parameter
6.30.12.Constructor Chain
6.30.13.constructor inheriting