测试共享,雁过留痕

关于QTP的一些控件的操作

上一篇 / 下一篇  2007-01-17 14:18:19 / 个人分类:QTP

51Testing软件测试网{5i+a(p8t

Dim i
Zxk_D\8H D(c0Set m_WebCheckBox=Descrīption.Create()
d1WF8ot ~I6Tv0      m_WebCheckBox("type").Value="checkbox"
M? os#c:O0      set All_WebCheckBox=Browser("Untitled Page").Page("Untitled Page").Childobjects(m_WebCheckBox)
\w vq#b,|y"z_0      n=All_WebCheckBox.Count()51Testing软件测试网$p)k0g4m,MR B6Fw;v
     for i=0 to n-1
*Y4hAz\eZv0      All_WebCheckBox(i).Set "ON"51Testing软件测试网T N2[:Ei8Eh#E0q4vv
     next51Testing软件测试网%n:zvx4f vn

r7skL9E$t0 

vzf%b~%op t;\0 51Testing软件测试网w DyG(eE'G T

--------------

!Rd/U*B!a`6`yzv!x0 51Testing软件测试网Sj_tq,Y9ub?#p

     创建一个空对象,可以将所有包含WebCheckBox属性的得到,然后把所有WebCheckBox的个数count得出来,用个循环set值为ON,或者就你想要的选项进行操作51Testing软件测试网Ce p7rP tm rS


TAG: QTP

引用 删除 lwt0227   /   2008-11-20 15:20:45
背景颜色名字弄成这样,根本看不清你写了什么,郁闷 !!!
烧白也是人 引用 删除 wyscorpion   /   2007-01-20 12:17:21
这种情况在table套table的时候用过...对于内层table中元素的操作.再次让我重温习了下.呵呵.
 

评分:0

我来说两句

Open Toolbar