Dim key As KeyGenerator
Dim r As Reflector
Dim o As JavaObject = r.RunStaticMethod("javax.crypto.KeyGenerator", "getInstance", Array("AES", "BC"), Array As String("java.lang.String", "java.lang.String"))
o.RunMethod("init", Array As Object(128))
key.key = o.RunMethod("generateKey", Null)