Rubrik: Datum/Zeit und Timer · Datums- und Zeit-Funktionen | VB-Versionen: VB2005, VB2008 | 28.07.09 |
Lokalzeit in UTC-Zeit umrechnen und umgekehrt Dieser Code zeigt, wie man eine Lokalzeit in die aktuelle Weltzeit (UTC) umrechnen kann und umgekehrt. | ||
Autor: Dieter Otter | Bewertung: | Views: 23.663 |
www.tools4vb.de | System: Win2k, WinXP, Win7, Win8, Win10, Win11 | Beispielprojekt auf CD |
Heute zeigen wir, wie man eine Lokalzeit in die aktuelle Weltzeit (UTC), auch als Greenwich Mean Time (GMT) bekannt, umrechnen kann und umgekehrt.
Die Lokalzeit entspricht hierbei der Ortszeit auf dem jeweiligen System.
' aktuelle Zeitzone With TimeZone.CurrentTimeZone ' aktuelle Lokalzeit (Ortszeit) Dim LokalZeit As DateTime = Now ' in UTC-Zeit umwandeln Dim ZeitUTC As DateTime = .ToUniversalTime(LokalZeit) ' UTC-Zeit anzeigen ListBox1.Items.Add("Lokale Zeit: " & LokalZeit) ListBox1.Items.Add("Aktuelle UTC-Zeit: " & ZeitUTC) ' Zeitverschiebung der Lokalzeit zur UTC-Zeit ListBox1.Items.Add("Zeitverschiebung Lokalzeit zur UTC-Zeit: " & _ .GetUtcOffset(LokalZeit).TotalMinutes & " Min.") End With