VBS教程：對(duì)象-Dictionary

Dictionary

保存數(shù)據(jù)鍵和項(xiàng)目對(duì)的對(duì)象。

說明
Dictionary 對(duì)象與 PERL 關(guān)聯(lián)數(shù)組是等價(jià)的。項(xiàng)目（可以是任何形式的數(shù)據(jù)）被保存在數(shù)組中。每項(xiàng)都與唯一的鍵相關(guān)聯(lián)。鍵值用于檢索單個(gè)項(xiàng)目，通常是整數(shù)或字符串，但不能為數(shù)組。

下面代碼示范如何創(chuàng)建 Dictionary 對(duì)象：

Dim d '創(chuàng)建一個(gè)變量。
Set d = CreateObject("Scripting.Dictionary")
d.Add "a", "Athens" '添加鍵和項(xiàng)目。
d.Add "b", "Belgrade"
d.Add "c", "Cairo"

VBS中存在一個(gè)特殊的對(duì)象－dictionnary，是一個(gè)集合對(duì)象。一般情況霞，我把這個(gè)特殊的集合想象為數(shù)組，可以使用其中內(nèi)建的函數(shù)完成存儲(chǔ)和操縱數(shù)據(jù)等基本任務(wù)，無須擔(dān)心數(shù)據(jù)是在哪些行列，而是使用唯一的鍵進(jìn)行訪問或者是一個(gè)只能運(yùn)行在內(nèi)存中的數(shù)據(jù)庫(kù)，并只有兩個(gè)字段分別是：key和item，在使用中，字段key是索引字段。

set sdict=CreateObject("Scripting.Dictionary")
sdict.add "a","apple"
sdict.add "b","banana"
sdict.add "c","copy"

for each key in sdict.keys
msgbox "鍵名"  key  "是"  " = "  sdict (key)
next

sdict.removeall

這個(gè)腳本很簡(jiǎn)單，就是定義了一個(gè) dictionary 對(duì)象的實(shí)例sdict，并加入了三條數(shù)據(jù)，然后對(duì)每一條數(shù)據(jù)進(jìn)行了枚舉，最后，將對(duì)象的實(shí)例清空。

Dictionary 對(duì)象的成員概要

屬性和說明

CompareMode 設(shè)定或返回鍵的字符串比較模式
Count 只讀。返回 Dictionary 里的鍵/條目對(duì)的數(shù)量
Item(key) 設(shè)定或返回指定的鍵的條目值
Key(key) 設(shè)定鍵值

方法和說明

Add(key,item) 增加鍵/條目對(duì)到 Dictionary
Exists(key) 如果指定的鍵存在，返回 True，否則返回 False
Items() 返回一個(gè)包含 Dictionary 對(duì)象中所有條目的數(shù)組
Keys() 返回一個(gè)包含 Dictionary 對(duì)象中所有鍵的數(shù)組
Remove(key) 刪除一個(gè)指定的鍵/條目對(duì)
RemoveAll() 刪除全部鍵/條目對(duì)