Dim ctxt As JavaObject
ctxt.InitializeContext
Dim PackageManager As JavaObject = ctxt.RunMethod("getPackageManager", Null)
Dim packages As List = PackageManager.RunMethod("getInstalledPackages", Array(0x00000004))
For Each pck As JavaObject In packages
Log(pck)
Next