关于QTP的一些控件的操作

        Dim i

        Set m_WebCheckBox=Descrīption.Create()

              m_WebCheckBox("type").Value="checkbox"

              set All_WebCheckBox=Browser("Untitled Page").Page("Untitled Page").Childobjects(m_WebCheckBox)

              n=All_WebCheckBox.Count()

             for i=0 to n-1

              All_WebCheckBox(i).Set "ON"

             next