excel vba 常見字典用法集錦及代碼詳解(全)

1、常見字典用法集錦及代碼詳解前言凡是上過學(xué)校的人都使用過字典，從新華字典、成語詞典，到英漢字典以及各種各樣數(shù)不勝數(shù)的專業(yè)字典，字典是上學(xué)必備的、經(jīng)常查閱的工具書。有了它們，我們可以很方便的通過查找某個關(guān)鍵字，進而查到這個關(guān)鍵字的種種解釋，非?？旖輰嵱谩７彩巧线^EH論壇的想學(xué)習(xí)VBA里面字典用法的，幾乎都看過研究過nthwolves狼版主、oobird版主的有關(guān)字典的精華貼和經(jīng)典代碼。我也是從這里接觸到和學(xué)習(xí)到字典的，在此，對他們表示深深的

2、謝意，同時也對很多把字典用得出神入化的高手們致敬，從他們那里我們也學(xué)到了很多，也得到了提高。字典對象只有4個屬性和6個方法，相對其它的對象要簡潔得多，而且容易理解使用方便，功能強大，運行速度非?？?，效率極高。深受大家的喜愛。本文希望通過對一些字典應(yīng)用的典型實例的代碼的詳細解釋來給初次接觸字典和想要進一步了解字典用法的朋友提供一點備查的參考資料，希望大家能喜歡。給代碼注釋估計是大家都怕做的，因為往往是出力不討好的，稍不留神或者自己確實理解

3、得不對，還會貽誤他人。所以下面的這些注釋如果有不對或者不妥當(dāng)?shù)牡胤?，請大家跟帖時指正批評，及時改正。字典的簡介字典（Dictionary）對象是微軟Windows腳本語言中的一個很有用的對象。附帶提一下，有名的正則表達式（RegExp）對象和能方便處理驅(qū)動器、文件夾和文件的（FileSystemObject）對象也是微軟Windows腳本語言中的一份子。字典對象相當(dāng)于一種聯(lián)合數(shù)組，它是由具有唯一性的關(guān)鍵字（Key）和它的項（Item）聯(lián)

4、合組成。就好像一本字典書一樣，是由很多生字和對它們對應(yīng)的注解所組成。比如字典的“典”字的解釋是這樣的：“典”字就是具有唯一性的關(guān)鍵字，后面的解釋就是它的項，和“典”字聯(lián)合組成一對數(shù)據(jù)。3Exists方法如果Dictionary對象中存在所指定的關(guān)鍵字則返回true，否則返回false。object.Exists(key)參數(shù)object必選項?？偸且粋€Dictionary對象的名稱。key必選項。需要在Dictionary對象中搜索的k

5、ey值。常用語句：Dimdmsg$Setd=CreateObject(“ing.Dictionary“)d.Add“a““Athens“d.Add“b““Belgrade“d.Add“c““Cairo“Ifd.Exists(“c“)Thenmsg=“指定的關(guān)鍵字已經(jīng)存在?！癊lsemsg=“指定的關(guān)鍵字不存在。“EndIf代碼詳解代碼詳解1、Dimdmsg$：聲明變量，d見前例；msg$聲明為字符串?dāng)?shù)據(jù)類型(String)，一般寫法為D

6、immsgAsString。String的類型聲明字符為美元號($)。2、Ifd.Exists(“c“)Then：如果字典中存在關(guān)鍵字”c”，那么執(zhí)行下面的語句。3、msg=“指定的關(guān)鍵字已經(jīng)存在。“：把“指定的關(guān)鍵字已經(jīng)存在。“字符串賦給變量msg。4、Else：否則執(zhí)行下面的語句。5、msg=“指定的關(guān)鍵字不存在。“：把“指定的關(guān)鍵字不存在?！白址x給變量msg。6、EndIf：結(jié)束If…Else…Endif判斷。Keys方法返回