Excel Dictionary中的Remove和RemoveAll的使用

核心提示：Excel Dictionary的各种对象中，Remove和RemoveAll的使用方法极为相似，Excel Dictionary中的Remove和RemoveAll的使用，下面逐一为你介绍，①Remove方法Remove 方法从一个 Dictionary 对象中清除一个关键字，一般写法为Dim n As Intege

Excel Dictionary的各种对象中，Remove和RemoveAll的使用方法极为相似，下面逐一为你介绍。

①Remove方法

Remove 方法从一个 Dictionary 对象中清除一个关键字，项目对。

object.Remove(key )

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

key 必选项。key 与要从 Dictionary 对象中删除的关键字，项目对相关联。

说明：如果所指定的关键字，项目对不存在，那么将导致一个错误。

示例代码：

Dim d　
　　Set d = CreateObject("Scripting.Dictionary")
　　d.Add "a", "dzwebs"　
　　d.Add "b", "dz37w"
　　d.Add "c", "netcom"
　　……
　　d.Remove(“b”)

代码示例：

1、d.Remove(“b”)：清除字典中”b”关键字和与它对应的项。清除之后,现在字典里只有2个关键字了。

②RemoveAll方法

RemoveAll 方法从一个 Dictionary 对象中清除所有的关键字，项目对。

object.RemoveAll( )

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

示例代码：

Dim d　
　　Set d = CreateObject("Scripting.Dictionary")
　　d.Add "a", "dzwebs"　
　　d.Add "b", "dz37w"
　　d.Add "c", "netcom"
　　……
　　d.RemoveAll

示例代码

1、d.RemoveAll：清除字典中所有的数据。也就是清空这字典，然后可以添加新的关键字和项，形成一本新字典。

字典对象的属性有4个：Count属性、Key属性、Item属性、CompareMode属性。

Count属性，返回一个Dictionary 对象中的项目数。只读属性。

object.Count

其中 object一个字典对象的名称。

示例代码如下：

Dim d,n%　
　　Set d = CreateObject("Scripting.Dictionary")
　　d.Add "a", "dzwebs"　
　　d.Add "b", "dz37w"
　　d.Add "c", "netcom"
　　n = d.Count

示例代码：

1、Dim d, n% ：声明变量，d见前例；n被声明为整型数据类型(Integer)。一般写法为Dim n As Integer 。 Integer 的类型声明字符为百分比号 (%)。

2、n = d.Count  ：把字典中所有的关键字的数量赋给变量n。