在QTP中使用Dictionary对象
2008-03-18 22:13
459 查看
VBScript的Dictionary 对象与PERL的关联数组(associative array)类似,其中存储的内容可以是任何数据,每一个存储的数据都与一个唯一的键(Key)关联,键用于获取每一项数据,键通常是整型或字符串类型。
在QTP中,可以把Dictionary 当成数组来用,而且可以随时添加数据,而不需要预先定义大小。下面是一个使用的例子:
' 创建Dictionary对象
Set Dic = CreateObject("Scripting.Dictionary")
' 添加Dictionary的key和value
For Iterator = 1 To 3 Step 1
Dic.Add CStr(Iterator),Iterator & "_Value"
Next
' 循环读取Dictionary的key和value
For Iterator = 1 To Dic.Count Step 1
Msgbox Dic.Item(CStr(Iterator))
Next
DicArray = Dic.Items
'For I = 0 To Dic.Count
For I = 0 To UBound(DicArray)
Msgbox DicArray(I)
Next
' 判断是否存在某个Key,如果存在,则把其去掉
If Dic.Exists("2") Then
Msgbox Dic.Item("2")
Dic.Remove("2")
End If
Msgbox Dic.Count
' 清空所有 Key和Value
Dic.RemoveAll()
Msgbox Dic.Count
在QTP中,可以把Dictionary 当成数组来用,而且可以随时添加数据,而不需要预先定义大小。下面是一个使用的例子:
' 创建Dictionary对象
Set Dic = CreateObject("Scripting.Dictionary")
' 添加Dictionary的key和value
For Iterator = 1 To 3 Step 1
Dic.Add CStr(Iterator),Iterator & "_Value"
Next
' 循环读取Dictionary的key和value
For Iterator = 1 To Dic.Count Step 1
Msgbox Dic.Item(CStr(Iterator))
Next
DicArray = Dic.Items
'For I = 0 To Dic.Count
For I = 0 To UBound(DicArray)
Msgbox DicArray(I)
Next
' 判断是否存在某个Key,如果存在,则把其去掉
If Dic.Exists("2") Then
Msgbox Dic.Item("2")
Dic.Remove("2")
End If
Msgbox Dic.Count
' 清空所有 Key和Value
Dic.RemoveAll()
Msgbox Dic.Count
相关文章推荐
- 在QTP中使用Dictionary对象来替代环境变量
- Asp:Scripting.Dictionary对象的使用
- 使用QTP统计页面加载时间(加载IE对象)
- 使用QTP测试ActiveX对象
- 使用QTP管理wap页面对象心得小结 [ 光影人像 东海陈光剑 的博客 ]
- 【VBS】-【VBS使用Scripting.Dictionary字典对象】
- VBA中Dictionary对象使用小结
- QTP中的DeviceReplay对象的使用
- VBA中Dictionary对象使用(Key,Value)
- 读取 XML 数据时,超出最大字符串内容长度配额 (8192)。通过更改在创建 XML 读取器时所使用的 XmlDictionaryReaderQuotas 对象的 MaxStringContentLength 属性,可增加此配额。
- WCF:读取 XML 数据时,超出最大字符串内容长度配额 (8192)。通过更改在创建 XML 读取器时所使用的 XmlDictionaryReaderQuotas 对象的 MaxStringContentLength 属性,可增加此配额。
- VBA中Dictionary对象使用小结
- 读取XML数据时,已超过最大字符串内容长度配额(8192)。可以通过更改创建XML阅读器时使用的XmlDictionaryReaderQuotas对象上的MaxStringContentLength属
- 通过QTP的XMLUTIL将XML和字典对象Dictionary之间的互相转换
- VBA中Dictionary对象使用小结
- VBA中Dictionary对象使用小结
- 使用QTP9.0的一点心得——对象仓库
- 使用ASP的Scripting.Dictionary对象打造完美购物车
- 通过更改在创建 XML 读取器时所使用的 XmlDictionaryReaderQuotas 对象的 MaxArrayLength 属性,可增加此配额
- QTP,在描述性编程中使用Run-time属性来定义对象