Dim jo As JavaObject
jo.InitializeStatic("anywheresoftware.b4a.keywords.DateTime")
Dim TimeZone As JavaObject
TimeZone.InitializeStatic("java.util.TimeZone")
TimeZone = TimeZone.RunMethod("getTimeZone", Array("Australia/Sydney"))
jo.RunMethod("setTimeZoneInternal", Array(TimeZone))
Log(jo.RunMethodJO("getInst", Null).GetField("timeZone"))
'test
Log(DateTime.GetTimeZoneOffsetAt(DateTime.DateParse("08/01/2010")))
Log(DateTime.GetTimeZoneOffsetAt(DateTime.DateParse("01/01/2010")))