Sub DisplayDouble2(language As String, region As String, number As Double, minDecimals As Int, maxDecimals As Int) As String
Dim jo As JavaObject
jo = jo.InitializeNewInstance("java.util.Locale.Builder", Null)
Dim locale As JavaObject = jo.RunMethodJO("setLanguage", Array As Object(language)).RunMethodJO("setRegion", Array As Object(region)).RunMethod("build", Null)
Dim numberFormatter As JavaObject = jo.InitializeStatic("java.text.NumberFormat").RunMethod("getNumberInstance", Array As Object(locale))
numberFormatter.RunMethod("setMinimumFractionDigits", Array As Object (minDecimals))
numberFormatter.RunMethod("setMaximumFractionDigits", Array As Object (maxDecimals))
Dim retVal As String = numberFormatter.RunMethod("format", Array As Object(number))
Return retVal
End Sub