在QTP中使用Dictionary对象

最新推荐文章于 2023-11-07 17:26:42 发布

原创最新推荐文章于 2023-11-07 17:26:42 发布 · 5.7k 阅读

1 ·

CC 4.0 BY-SA版权

文章标签：

#dictionary #iterator #vbscript #存储 #perl

自动化测试 \ 框架设计同时被 2 个专栏收录

350 篇文章

订阅专栏

QTP

213 篇文章

订阅专栏

本文介绍了如何使用VBScript的Dictionary对象，包括创建、添加键值对、遍历读取及删除等操作。Dictionary对象类似于PERL的关联数组，可用于存储任何类型的数据，并可通过唯一键进行访问。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

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