大众计算机学习网

专门提供各种电脑教程

Excel Dictionary中的Items的使用

Admin | 2012-8-10 9:41:38 | 被阅次数 | 3782

  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单元格开始的单元格区域中。