TimeZoneInfo.DisplayName
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