Dim ComDevice As JavaObject
ComDevice.InitializeNewInstance("jp.co.company.vx.framework.device.IButton",Array As Object())
status = ComDevice.RunMethod("open",Array As Object(ComDevice.GetField("OPENMODE_COMMON"),ComDevice.GetField("DEVICE_HOST_LOCALHOST")))
Dim prova1, prova2,prova3 As JavaObject
Dim Act, NativeMe As JavaObject
Dim obj As JavaObject, Ref As Reflector
Act = Act.InitializeContext
obj = ComDevice.CreateEvent("jp.co.company.vx.framework.device.IButton.StatCallback","test",False)
'I tried
status = obj.RunMethod("setCallback",Array As Object(Act))
'and
status = ComDevice.RunMethod("setCallback",Array As Object(Act))