vb@rchiv · Tipps & Tricks · Sommer- oder Winterzeit und Beginn/Ende der Sommerzeit ermitteln

Rubrik: Datum/Zeit und Timer · Datums- und Zeit-Funktionen | VB-Versionen: VB2005, VB2008

23.07.09

Sommer- oder Winterzeit und Beginn/Ende der Sommerzeit ermitteln Ein Code-Ausschnitt, der zeigt, wie man die aktuelle Zeitzone ermittelt und zudem auch den Beginn und das Ende der Sommerzeit in Erfahrung bringt.
Autor: Dieter Otter	Bewertung:	Views: 15.505
www.tools4vb.de	System: Win2k, WinXP, Win7, Win8, Win10, Win11	Beispielprojekt auf CD

Mit Hilfe der TimeZone-Klasse lässt sich sehr einfach die aktuell eingestellte Zeitzone ermitteln und somit auch, ob Sommer- oder Winterzeit eingestellt ist. Weiterhin stellt uns die Klasse zudem Eigenschaften zur Verfügung, um den Beginn und das Ende der Sommerzeit in Erfahrung zu bringen.

With TimeZone.CurrentTimeZone
  ' aktuelle Zeitzone (Sommer-/Winterzeit)
  If .IsDaylightSavingTime(Now) Then
    ListBox1.Items.Add("Aktuelle Zeitzone: " & .DaylightName)
  Else
    ListBox1.Items.Add("Aktuelle Zeitzone: " & .StandardName)
  End If
 
  ' Beginn und Ende der Sommerzeit 
  ListBox1.Items.Add("Beginn der Sommerzeit: " & .GetDaylightChanges(Year(Now)).Start)
  ListBox1.Items.Add("Ende der Sommerzeit: " & .GetDaylightChanges(Year(Now)).End)
End With

Diesen und auch alle anderen Tipps & Tricks finden Sie auch auf unserer aktuellen vb@rchiv

Vol.6
(einschl. Beispielprojekt!)

Ein absolutes Muss - Geballtes Wissen aus mehr als 8 Jahren vb@rchiv!
- nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten
- Symbol-Galerie mit mehr als 3.200 Icons im modernen Look
Weitere Infos - 4 Entwickler-Vollversionen (u.a. sevFTP für .NET), Online-Update-Funktion u.v.m.