Russian Standard Time
Module Example Public Sub Main() Dim currentTime As Date = Date.Now Console.WriteLine("Moscow: {0}", TimeZoneInfo.ConvertTimeBySystemTimeZoneId(currentTime, TimeZoneInfo.Local.Id, "Russian Standard Time")) End Sub End Module