【正文】 Err 對(duì)象請(qǐng)參閱Description 屬性、Err 對(duì)象、HelpContext 屬性、HelpFile 屬性、LastDLLError 屬性、Number 屬性、On Error 語(yǔ)句、Raise 方法、Source 屬性。每一次與對(duì)象打交道之后都檢查 Err，則可消除代碼訪(fǎng)問(wèn)對(duì)象時(shí)的含混之處。 任何 On Error 語(yǔ)句。每當(dāng)執(zhí)行下列語(yǔ)句時(shí)就會(huì)自動(dòng)調(diào)用 Clear 方法： 語(yǔ)法 objec 總是 Err 對(duì)象。應(yīng)用于FileSystemObject 對(duì)象。要追加到已存在路徑上的名字。路徑可以是絕對(duì)的也可以是相對(duì)的，不必指定一個(gè)已存在的文件夾。path必需的。語(yǔ)法(path, name) BuildPath 方法語(yǔ)法有如下幾部分：部分描述object必需的。該確認(rèn)將在最后一個(gè)語(yǔ)句執(zhí)行之后使整個(gè)執(zhí)行停止，并且 行被突出顯式。當(dāng)示例運(yùn)行時(shí)，單擊 Command1 按紐使得按紐上的文本在 0 和 1 之間進(jìn)行切換。示例需要一個(gè)帶有兩個(gè)按紐控件的窗體。例如，即使一個(gè) And 表達(dá)式的第一部分被計(jì)算為 False，整個(gè)表達(dá)式還要被計(jì)算。當(dāng)模塊被編譯成為一個(gè)可執(zhí)行的文件時(shí)，調(diào)用 Debug 對(duì)象的方法就會(huì)被忽略。一個(gè)值為 True 或者 False 的表達(dá)式?？偸?Debug 對(duì)象。應(yīng)用于Folders 集合請(qǐng)參閱Add方法(Dictionary)Assert 方法有條件地在該方法出現(xiàn)的行上掛起執(zhí)行。新添加的Folder的名稱(chēng)。一個(gè)Folders集合的名稱(chēng)。應(yīng)用于Dictionary 對(duì)象請(qǐng)參閱ADD方法（Folder）、Exist方法、Items方法、Keys方法、Remove方法、RemoveAll方法Add 方法(Folders)描述添加一個(gè)新的 Folder 到 Folders 集合。與所添加的關(guān)鍵字相關(guān)聯(lián)的條目。與所添加的條目相關(guān)聯(lián)的關(guān)鍵字。一個(gè) Dictionary 對(duì)象的名字。 Set Inst = NothingLoop Until TheName = For Each x In MyClasses MsgBox , , Instance NameNextAdd方法(Dictionary)描述添加一對(duì)相對(duì)應(yīng)的關(guān)鍵字和條目到 Dictionary 對(duì)象。 item := Inst, key := CStr(Num) End If 39。 If Then 39。 39。 Press Cancel to see names in collection. TheName = InputBox(Msg, Name the Collection Items) = TheName 39。 Msg = Please enter a name for this object. amp。 Num = Num + 1 39。Do Dim Inst As New Class1 39。Dim MsgDim TheName 39。Dim Num As Integer 39。Dim MyClasses As New Collection 39。類(lèi)名就用缺省的 Class1。應(yīng)用于Collection 對(duì)象請(qǐng)參閱Item方法、Remove方法Add 方法示例本示例使用 Add 方法將 Inst 對(duì)象（類(lèi) Class1 之示例，其中包含 Public 變量 InstanceName ）加到 MyClasses 集合對(duì)象中。說(shuō)明before 或 after 參數(shù)是字符串表達(dá)式或數(shù)值表達(dá)式，均須引用集合中現(xiàn)有成員，否則將導(dǎo)致錯(cuò)誤發(fā)生。如果為一數(shù)值表達(dá)式，則 after 必須是介于 1 和集合 Count 屬性值之間的值；如果為一字符串表達(dá)式，則當(dāng)添加一個(gè)被引用的成員到集合時(shí)，after 必須對(duì)應(yīng)于指定的 key 值。表達(dá)式，指定集合中的相對(duì)位置。可以指定 before 位置或 after 位置，但不能同時(shí)指定這兩個(gè)位置。如果為一數(shù)值表達(dá)式，則 before 必須是介于 1 和集合 Count 屬性值之間的值。表達(dá)式，指定集合中的相對(duì)位置。唯一字符串表達(dá)式，指定可以使用的鍵字符串，代替位置索引來(lái)訪(fǎng)問(wèn)集合中的成員。任意類(lèi)型的表達(dá)式，指定要添加到集合中的成員。對(duì)象表達(dá)式，其值為“應(yīng)用于”列表中的對(duì)象。Excel2003VBA幫助文檔目錄一些對(duì)象的應(yīng)用方法 4Add 方法 5Add方法(Dictionary) 6Add 方法(Folders) 6Assert 方法 7BuildPath 方法 8Clear 方法 8Close 方法 9Copy 方法 10CopyFile 方法 10CopyFolder 方法 11CreateFolder 方法 12CreateTextFile 方法 13Delete 方法 14DeleteFile 方法 14DeleteFolder 方法 15DriveExists 方法 15Exists 方法 16FileExists 方法 16FolderExists 方法 17GetAbsolutePathName 方法 17GetBaseName 方法 18GetExtensionName 方法 18GetFile 方法 19GetFileName 方法 19GetFolder 方法 20GetParentFolderName 方法 20GetSpecialFolder 方法 21GetTempName 方法 22Hide 方法 22Item 方法 23Items 方法 24Keys方法 24Move 方法 25Move 方法（UseForm） 25應(yīng)用于 25請(qǐng)參閱 25MoveFile 方法 25MoveFolder 方法 26OpenAsTextStream 方法 27OpenTextFile 方法 28Print 方法 30PrintForm 方法 31Raise 方法 31Read 方法 33ReadAll 方法 33ReadLine 方法 34Remove 方法 34Remove 方法（FileSystemObject 對(duì)象） 35RemoveAll 方法 35Show 方法 36Skip 方法 37SkipLine 方法 37WhatsThisMode 方法 38Write 方法 38WriteBlankLines 方法 39WriteLine 方法 39一些對(duì)象的應(yīng)用方法Collection 對(duì)象⑴ADD 方法、⑵Item 方法、⑶Remove 方法Debug 對(duì)象⑴Assert 方法、⑵Print 方法Dictionary對(duì)象⑴Add方法(Dictionary)、⑵Exists 方法、⑶Items 方法、⑷Keys方法、⑸Remove 方法、⑹Remove 方法（FileSystemObject 對(duì)象）、⑺RemoveAll 方法、Err 對(duì)象⑴Clear 方法、⑵Raise 方法File 對(duì)象、Folder 對(duì)象⑴Copy 方法、⑵Delete 方法、⑶CreateTextFile 方法（Folder 對(duì)象）、⑷Move 方法、⑸OpenAsTextStream 方法（File 對(duì)象）Folders集合⑴Add 方法(Folders)FileSystemObject 對(duì)象⑴BuildPath 方法、⑵CopyFile 方法、⑶CopyFolder 方法、⑷CreateFolder 方法、⑸CreateTextFile 方法、⑹DeleteFile 方法、⑺DeleteFolder 方法、⑻DriveExists 方法、⑼FileExists 方法、⑽GetAbsolutePathName 方法、⑾GetBaseName 方法、⑿GetExtensionName 方法、⒀GetFile 方法、⒁GetFileName 方法、⒂GetFolder 方法、⒃GetParentFolderName 方法、⒄GetSpecialFolder 方法、⒅GetTempName 方法、⒆MoveFile 方法、⒇MoveFolder 方法、(21)OpenTextFile 方法UserForm 對(duì)象，UserForms 集合對(duì)象⑴Hide 方法、⑵PrintForm 方法、⑶Show 方法、⑷WhatsThisMode 方法TextStream 對(duì)象⑴Close 方法、⑵Read 方法、⑶ReadAll 方法、⑷ReadLine 方法、⑸Skip 方法、⑹SkipLine 方法、⑺Write 方法、⑻WriteBlankLines 方法、⑼WriteLine 方法Add 方法添加一個(gè)成員到 Collection 對(duì)象。語(yǔ)法 item, key, before, after Add 方法的語(yǔ)法具有下列對(duì)象限定符和命名參數(shù)：部分描述object必需的。item必需的。key可選的。before可選的。在集合中將添加的成員放置在 before 參數(shù)識(shí)別的成員之前。如果為一字符串表達(dá)式，則當(dāng)添加一個(gè)被引用的成員到集合時(shí)，before 必須對(duì)應(yīng)于指定的 key 值。after可選。在集合中將添加的成員放置在 After 參數(shù)識(shí)別的成員之后?？梢灾付?before 位置或 after 位置，但不能同時(shí)指定這兩個(gè)位置。如果指定的 key 和集合中現(xiàn)有成員的 key 發(fā)生重復(fù)，則也會(huì)導(dǎo)致錯(cuò)誤發(fā)生。若要觀察程序的運(yùn)作，插入一個(gè)類(lèi)模塊，并在 Class1 的模塊級(jí)中聲明公用變量 InstanceName（鍵入 Public InstanceName）來(lái)保存每個(gè)示例的名稱(chēng)。將下列代碼復(fù)制與粘貼到某個(gè)窗體模塊的 Form_Load 事件過(guò)程中。 建立集合對(duì)象。 定義計(jì)數(shù)變量。 用來(lái)保存用戶(hù)指定的名稱(chēng)的變量。 建立 Class1 的新示例。 將計(jì)數(shù)變量加一，并讓用戶(hù)輸入名稱(chēng)。 Chr(13) _ amp。 將輸入的名稱(chēng)存到對(duì)象的示例中。 如果名稱(chēng)不是空字符串，則將該示例加到集合對(duì)象中。 將該示例加到集合對(duì)象中。 清除對(duì)當(dāng)前示例的引用，以準(zhǔn)備下一個(gè)。語(yǔ)法 key, itemAdd方法的語(yǔ)法有如下幾部分：部分描述Object必需的。Key必需的。Item必需的。說(shuō)明如果該關(guān)鍵字已經(jīng)存在，則產(chǎn)生一個(gè)錯(cuò)誤。語(yǔ)法 folderNameAdd方法的語(yǔ)法有如下幾部分：部分描述Object必需的。FolderName必需的。說(shuō)明如果 folderName 已經(jīng)存在，則產(chǎn)生一個(gè)錯(cuò)誤。語(yǔ)法 booleanexpressionAssert 方法的語(yǔ)法有如下的對(duì)象限定符和參數(shù)：部分描述object必需的。booleanexpression必需的。說(shuō)明Assert 調(diào)用只在開(kāi)發(fā)環(huán)境中工作。全部 booleanexpression 常常被計(jì)算。應(yīng)用于Debug 對(duì)象請(qǐng)參閱Print 方法Assert 方法示例下面的示例說(shuō)明如何使用 Assert 方法。缺省的按紐名稱(chēng)是 Command1 和 Command2 。單擊 Command2 按紐可能不做任何事，也可能引起一個(gè)確認(rèn)，應(yīng)該執(zhí)行哪一個(gè)操作取決于 Command1 按紐上所顯示的值。Option ExplicitPrivate blnAssert As BooleanPrivate intNumber As IntegerPrivate Sub Command1_Click() blnAssert = Not blnAssert intNumber = IIf(intNumber 0, 0, 1) = intNumberEnd SubPrivate Sub Command2_Click() blnAssertEnd SubPrivate Sub Form_Load() = intNumber = Assert TesterEnd SubBuildPath 方法描述追加一個(gè)名字到一個(gè)已經(jīng)存在的路徑。始終是 FileSystemObject 的名字。要對(duì)其追加名字的已存在路徑。name必需的。說(shuō)明只有在需要時(shí)，BuildPath 方法才在已存在路徑和名字之間插入一個(gè)附加的路徑分隔符。Clear 方法清除 Err 對(duì)象的所有屬性設(shè)置。說(shuō)明在處理錯(cuò)誤之后使用 Clear 來(lái)清除 Err 對(duì)象，例如，在對(duì) On Error Resume Next 使用拖延錯(cuò)誤處理時(shí)就可使用 Clear。 任意類(lèi)型的 Resume 語(yǔ)句。 Exit Sub, Exit Function, Exit Property 注意 當(dāng)處理因訪(fǎng)問(wèn)其他對(duì)象產(chǎn)生的錯(cuò)誤時(shí)，與其使用 On Error GoTo，不如使用 On Error Resume Next?？梢源_認(rèn)是哪個(gè)對(duì)象將錯(cuò)誤引入 中，也可以確認(rèn)最初是哪個(gè)對(duì)象產(chǎn)生了這個(gè)錯(cuò)誤（ 中指定的對(duì)象）。Clear 方法示例本示例使用 Err 對(duì)象的 Clear 方法將 Err 對(duì)象之?dāng)?shù)值屬性重新設(shè)置為零，并將其字符串屬性設(shè)置為零長(zhǎng)度字符串。Dim Result(10) As Integer 39。其元素容易溢出Dim indxOn Error