Child Objects Use in QTP

This script is to check checkbox in a page

Set obj=Description.Create
obj("html tag").value="INPUT"
obj("type").value="checkbox"

set ChkObj=Browser("name:=Email").Page("title:=q").ChildObjects(obj)
ChkObj (0).set"ON"