Module Example
Public Sub Main()
Dim localZone As TimeZoneInfo = TimeZoneInfo.Local
Console.WriteLine("Local Time Zone ID: {0}", localZone.Id)
Console.WriteLine(" Display Name is: {0}.", localZone.DisplayName)
Console.WriteLine(" Standard name is: {0}.", localZone.StandardName)
Console.WriteLine(" Daylight saving name is: {0}.", localZone.DaylightName)
End Sub
End Module