basic4android and Olson TimeZone

Sub Activity_Create(FirstTime As Boolean)
   Dim tz As AHTimeZone
   Dim loc As AHLocale
   
   tz.Initialize
   loc.InitializeUS
   
   ' Get a list of all available timezones on the device
   Dim l As List
   l = tz.AvailableIds
   For i = 0 To l.Size - 1
      Log("TimeZoneID: " & l.Get(i))
   Next
   
   tz.Initzialize2("Europe/Madrid") ' <- My example *****
   Log("---")
   Log("Choosen TimezoneID: " & tz.ID)
   tz.ID ="Europe/Madrid"
   Log("TimeZone: " & tz.GetDisplayName(True, tz.STYLE_LONG))
   Log("TimeZone in english: " & tz.GetDisplayName2(True, tz.STYLE_LONG, loc))
   Log("Offset to UTC: " & (tz.getOffset(DateTime.Now-10368000) / DateTime.TicksPerHour) & " hours") ' <- We calculate 120 days before now, when is summer time and DST is true *****
   Log("Is it DST now? " & tz.InDaylightTime(DateTime.Now-10368000))
   
End Sub