QTP Set Ele_name=description.Create()

Dim Ele_name
Set Ele_name=description.Create()
Ele_name("Class Name").value="JavaEdit"
Dim obj
set obj = JavaWindow("title:=test1").JavaObject("name:=test2").ChildObjects(Ele_name)
For i=0 to obj.count-1
print obj(i).GetROProperty("developer name")
Next