Contact: aviboots(AT)netvision.net.il
39,862 questions
51,784 answers
573 users
Module Module1 Sub Main() Dim tz As TimeZone = TimeZone.CurrentTimeZone Console.WriteLine(tz.ToLocalTime(Date.Now)) Console.WriteLine(tz.ToUniversalTime(Date.Now)) End Sub End Module ' run: ' ' 20/09/2018 09:28:09 ' 20/09/2018 06:28:09