常见字典用法集锦及代码详解

ni57

真厉害，收藏学习

zjm950326

查重复数据时，如果数据量超过32768，字典就不能用了，如何解决这个问题？我的数据量有24万多。

wzb5566

前几天在网上搜到了word和PDF两个版本，我还在想这个人好牛，太经典了，后来无意间看到了word上写了蓝版的名字，高人，十分有用！已经用过很多次，太棒了，早上还看了，每天都看，争取早日掌握！

guski216

老师太厉害了

blogexcel

好贴，认真学习，谢谢蓝桥玄霜老师的贡献。

huazai688

收藏学习！谢谢！

narutobleach

MARK：常见字典用法集锦及代码详解

zorsite

常用语句：
Dim d   
   Set d = CreateObject("Scripting.Dictionary")
   d.CompareMode = vbTextCompare
   d.Add "a", "Athens"   
   d.Add "b", "Belgrade"
   d.Add "c", "Cairo"
   d.Add " B ", " Baltimore"
代码详解
1、d.CompareMode = vbTextCompare  ：设置字典的比较模式是文本，在这种比较模式下不区分关键字的大小写，即关键字”b”和”B”是一样的。vbTextCompare的值为1，所以上式也可写为 d.CompareMode =1 。如果设置为vbBinaryCompare（值为0），则执行二进制比较，即区分关键字的大小写，此种情况下关键字”b”和”B”被认为是不一样的。
2、d.Add " B ", " Baltimore" ：添加一关键字”B”和对应于它的项”Baltimore”。由于前面已经设置了比较模式为文本模式，不区分关键字的大小写，即关键字”b”和”B”是一样的，此时发生错误添加失败，因为字典中已经存在”b”了，字典中的关键字是唯一的，不能添加重复的关键字。

这段代码并未像楼主所述会发生错误，原因在于最后一句

1. d.Add " B ", " Baltimore"

复制代码

多了两个空格。"B"和" B"
"Baltimore"和" Baltimore"
虽然比较模式vbTextCompare不区分大小写，可是新加的KEY为“空格B”，和小写“b”还是不一样的，所以这段代码并未报错。

bsszgz

蓝桥大神 名不虚传啊 膜拜不已

mkw2002

非常详细，但需要细细消化！