# Key

object.Key(key) = newkey

在 Dictionary 对象中设置 key。

参数 描述
object 必选项。为集合或 Dictionary对象的名称。
key 必选项。与检索或添加的 item 相关联的 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
1
2
3
4
5
6
7
8
9
应用于