https://barnamenevis.org/showpo...1&postcount=83

این روش مختص دات نت 3.5 (به بعد) است.

کد:

Imports System.Collections.ObjectModel


بدست آوردن Id و DisplayName نواحی :
کد:

Dim zones As ReadOnlyCollection(Of TimeZoneInfo) = TimeZoneInfo.GetSystemTimeZones()
For Each zone As TimeZoneInfo In zones
ListBox1.Items.Add(zone.Id)
listBox2.Items.Add(zone.DisplayName)
Next