Date Time VB.Net

Imports System
Imports System.Globalization
Imports Microsoft.VisualBasic
Module DaylightChangesDemo
    Dim localZone As TimeZone = TimeZone.CurrentTimeZone
    Sub CreateDaylightTime( year As Integer )
        
        Dim daylight As DaylightTime = localZone.GetDaylightChanges( year )
        Console.WriteLine( "{0,-7}{1,-20:yyyy-MM-dd HH:mm}" & _
            "{2,-20:yyyy-MM-dd HH:mm}{3}", year, daylight.Start, daylight.End, daylight.Delta )
    End Sub 
    Sub Main( )
        Console.WriteLine( localZone.StandardName )
        CreateDaylightTime( 2005 )
    End Sub 
End Module