Item 属性

设置或返回 [b]Dictionary[/b] 对象中指定的 [b]key[/b] 对应的 [b]item[/b]，或返回集合中基于指定的 [b]key[/b] 的 [b]item[/b]。可读写。 [code][i]object.[/i][b]Item[/b][i](key) [= newitem] [/i][/code] [h3]参数[/h3]object 必选项。应为集合或 [b]Dictionary[/b] 对象的名称。 key 必选项。与检索或添加的 [b]item[/b] 相关联的 [b]key[/b]。 newitem 可选项。仅用于 [b]Dictionary[/b] 对象，不能应用于集合。如果提供此参数，则 [b]newitem[/b] 是与指定的 [b]key[/b] 相关联的项目的新值。 [h3]说明[/h3]如果更改 [b]item[/b] 时未找到 [b]key[/b]，则使用指定的 [b]newitem[/b] 创建一个新的 [b]key[/b]。如果试图返回一个已有项目时未找到 [b]key[/b]，则创建一个新的 [b]key[/b] 并且它对应的项目为空值。 下面例子举例说明如何使用 [b]Item[/b] 属性：

[code]Function ItemDemo  Dim d                   '[/code]创建变量[code].[/code][code]  Set d = CreateObject("Scripting.Dictionary")[/code][code]  d.Add "a", "Athens"     '[/code]添加键和项目对[code].[/code][code]  d.Add "b", "Belgrade"[/code][code]  d.Add "c", "Cairo"[/code][code]  ItemDemo = [b]d.Item([/b]"c"[b])[/b]  '[/code]得到项目[code].         [/code][code]End Function[/code]