|
Microsoft(R) Visual Basic(R) Scripting Edition Items 方法 |
语言参考 起始页 | 版本 2 |
返回一个数组,其中包含有 Dictionary 对象中的所有项目。
object.Itemsobject 应为 Dictionary 对象的名称。
以下代码举例说明如何使用 Items 方法:s = s & a(i) & "<BR>" '创建返回字符串 Next DicDemo = s End FunctionFunction DicDemo Dim a,d,I,s '创建一些变量 Set d = CreateObject("Scripting.Dictionary") d.Add "a","Athens" '添加键和项目 d.Add "b","Belgrade" d.Add "c","Cairo" a = d.Items '获取项目 For i = 0 To d.Count -1 '循环使用数组