Excel Dictionary中的Items的使用

核心提示：Items方法，在Excel Dictionary的字典里面，Excel Dictionary中的Items的使用，它的功能是返回一个数组，其中包含了一个 Dictionary 对象中的所有项目，这是数组的默认形式，3、[C1].Resize(d.Count,1)=Application.Transpose(t) ：有

Items方法，在Excel Dictionary的字典里面，它的功能是返回一个数组，其中包含了一个 Dictionary 对象中的所有项目。下面为你介绍相关的知识。

object.Items( )

其中 object 总是一个 Dictionary 对象的名称。

代码示例如下：

Dim d, t　
　　Set d = CreateObject("Scripting.Dictionary")
　　d.Add "a", "dzwebs"　
　　d.Add "b", "dz37w"
　　d.Add "c", "netcom"
　　t=d.Items
　　[C1].Resize(d.Count,1)=Application.Transpose(t)

代码详解

1、Dim d, t ：声明变量，d见前例；t默认是可变型数据类型(Variant)。

2、t=d.Items ：把字典中所有的关键字对应的项赋给变量t。得到的也是一个一维数组，下限为0，上限为d.Count-1。这是数组的默认形式。

3、[C1].Resize(d.Count,1)=Application.Transpose(t) ：有了上面Keys方法的解释这句代码就不用多说了，就是把字典中所有的关键字对应的项赋给以C1单元格开始的单元格区域中。