if we want to get all the objects with in a window then we
will use the child object method..add the window in the
object repository then it will select all the objects in the
window..then call a function with getroproperty method in it
to get all child objects one by one

Child object method Returns the collection of child objects
contained within the object. 

Example for  how to use This method

Public Function CheckObjectDesription(parent, descr) 

Dim oDesc 

' Create description object 

Set oDesc = Description.Create() 

arProps = Split(descr, ",") 

For i = 0 To UBound(arProps) 

arProp = Split(arProps(i), ":=") 

    If UBound(arProp) = 1 Then 

      PropName = Trim(arProp(0)) 

      PropValue = arProp(1) 

      oDesc(PropName).Value = PropValue 

    End If 

Next 

 

' Get all child objects with the given description 

Set children = parent.ChildObjects(oDesc) 

 

If children.Count = 1 Then 

CheckObjectDesription = "Object Unique" 

ElseIf children.Count = 0 Then 

CheckObjectDesription = "Object Not Found" 

Else 

CheckObjectDesription = "Object Not Unique" 

End If 

End Function