Dim B(32) As Byte = Array As Byte(0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31)
Dim bint As JavaObject
bint.InitializeNewInstance("java.math.BigInteger",Array(1,B))
Dim Format As JavaObject
Format.InitializeStatic("java.lang.String")
Dim FormatStr As String = "%032x"
Dim Val(1) As Object
Val(0) = bint
Log(Format.RunMethod("format",Array(FormatStr,Val)))