Date Time VB.Net

Imports System
Imports System.Globalization
Imports Microsoft.VisualBasic
Module TimeZoneDemo
    Sub Main( )
        Dim localZone As TimeZone = TimeZone.CurrentTimeZone
        Dim currentDate As DateTime = DateTime.Now
        Dim currentYear As Integer = currentDate.Year
        Console.WriteLine( currentDate )
        Console.WriteLine( localZone.IsDaylightSavingTime( currentDate ) )
    End Sub 
End Module