CompareMode屬性

CompareMode屬性，在電子表格的字典中，功能是設(shè)置或者返回在 Dictionary 對象中進(jìn)行字符串關(guān)鍵字比較時所使用的比較模式。

語法為：object.CompareMode[ = compare]

參數(shù)介紹

object 必選項?？偸且粋€ Dictionary 對象的名稱。

compare 可選項。如果提供了此項，compare 就是一個代表比較模式的值。可以使用的值是 0 (二進(jìn)制)

1 (文本), 2 (數(shù)據(jù)庫)。

相關(guān)說明

如果試圖改變一個已經(jīng)包含有數(shù)據(jù)的 Dictionary 對象的比較模式，那么將導(dǎo)致一個錯誤。

代碼示例：

Dim d

Set d = CreateObject("Scripting.Dictionary")

d.CompareMode = vbTextCompare

d.Add "a", "dzwebs"

d.Add "b", "dz37w"

d.Add "c", "netcom"

d.Add " B ", " LGANMMB"

部分代碼示例

1、d.CompareMode = vbTextCompare ：設(shè)置字典的比較模式是文本，在這種比較模式下不區(qū)分關(guān)鍵字的大小寫，即關(guān)鍵字”b”和”B”是一樣的。vbTextCompare的值為1，所以上式也可寫為 d.CompareMode =1 。如果設(shè)置為vbBinaryCompare(值為0)，則執(zhí)行二進(jìn)制比較，即區(qū)分關(guān)鍵字的大小寫，此種情況下關(guān)鍵字”b”和”B”被認(rèn)為是不一樣的。

2、d.Add " B ", " Baltimore" ：添加一關(guān)鍵字”B”和對應(yīng)于它的項”LGANMMB”。由于前面已經(jīng)設(shè)置了比較模式為文本模式，不區(qū)分關(guān)鍵字的大小寫，即關(guān)鍵字”b”和”B”是一樣的，此時發(fā)生錯誤添加失敗，因為字典中已經(jīng)存在”b”了，字典中的關(guān)鍵字是唯一的，不能添加重復(fù)的關(guān)鍵字。