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。