在 Dictionary 对象中设置 key 。
object.Key(key) = newkey
object
必选项 。通常是 Dictionary 对象的名称 。
Key
必选项 。要改变的 Key 值 。
Newkey
必选项 。代替指定 key 值的新值 。
如果在更改 key 值时未找到 key,则出现运行时错误 。
下面例子举例说明如何使用 Key 属性:
Function DicDemo Dim d 创建变量 。 Set d = CreateObject("Scripting.Dictionary") d.Add "a", "Athens" 添加键和项目对 。 d.Add "b", "Belgrade" d.Add "c", "Cairo" d.Key("c") = "d" 将"c"的键设置为"d" 。 DicDemo = d.Item("d") 返回相关项目 。End Function
Function DicDemo Dim d
Set d = CreateObject("Scripting.Dictionary")
d.Add "a", "Athens"
d.Add "b", "Belgrade"
d.Add "c", "Cairo"
d.Key("c") = "d"
"c"
"d"
DicDemo = d.Item("d")
End Function