Use Me to reference myself : Me « Class Module « VB.Net Tutorial

1. VB.Net Tutorial
2. Class Module
3. Me

Option Strict On
 Imports System
 Public Class Time
    Private Second As Integer

    Public Sub DisplayCurrentTime( )
       System.Console.WriteLine(Second)

    End Sub

    Public Sub New(ByVal dt As System.DateTime)
       Second = dt.Second
    End Sub 

    Public Sub New(ByVal Second As Integer)
       Me.Second = Second
    End Sub
 End Class 

 Module Module1

    Sub Main( )
       Dim currentTime as System.DateTime = System.DateTime.Now
       Dim time1 As New Time(currentTime)
       time1.DisplayCurrentTime( )
       Dim time2 As New Time(30)
       time2.DisplayCurrentTime( )
    End Sub

 End Module