QTP的Test参数以及顶级Action参数的使用

hsjzfling

赞一个~~

这个循环可以帮助我们检查下参数~楼主应该是方便我们扩展应用就留下来了吧`~
cnt = pDefColl.Count
Indx = 1
' Display the names and values of each of the parameters in the collection.

While Indx <= cnt

    Set pDef = pDefColl.Item(Indx)

    MsgBox "Param name: " & pDef.Name & "; Type: " & pDef.Type & "; InOut: " & pDef.InOut & "; Description: " _
        & pDef.Description & "Default value: " & pDef.DefaultValue

    Indx = Indx + 1

Wend