第９章模塊與ＶＢＡ程序設計９.６數(shù)組９.７立即窗口９.８程序的調試９.９ＶＢＡ與宏上一頁返回９.１模塊９.１.１模塊的概念一、模塊與過程模塊是Ａｃｃｅｓｓ２０１３數(shù)據(jù)庫６個對象之一，每個模塊可以定義若干個“過程”，過程用于完成一個相對獨立的操作，以單元的形式存儲在模塊中。即模塊就是由ＶＢＡ通用聲明、一個或多個過程組成的集合。過程分兩種類型：Ｓｕｂ子過程和Ｆｕｎｃｔｉｏｎ函數(shù)過程。函數(shù)過程執(zhí)行一系列操作后返回一個函數(shù)值，子過程只執(zhí)行一個或多個操作，而不返回數(shù)值。模塊具有很強的通用性，通過窗體、報表對象可以調用模塊內部的過程。下一頁返回９.１模塊模塊可以在模塊對象中出現(xiàn)，也可以作為事件處理代碼出現(xiàn)在窗體和報表里，模塊構成了一個非常完整的Ａｃｃｅｓｓ２０１３功能區(qū)開發(fā)環(huán)境。二、模塊的功能（１）維護數(shù)據(jù)庫，可以將事件過程創(chuàng)建在窗體或報表的定義中，通過窗體或報表訪問數(shù)據(jù)庫，更有利于數(shù)據(jù)庫維護。（２）創(chuàng)建自定義函數(shù)，使用這些自定義函數(shù)完成相應的任務。（３）能夠提示詳細的錯誤信息，不僅可顯示錯誤提示信息，還有較好的用戶交互界面。對用戶的下一步操作提供幫助。上一頁下一頁返回９.１模塊（４）執(zhí)行系統(tǒng)級的操作，能應用Ｗｉｎｄｏｗｓ系統(tǒng)函數(shù)和數(shù)據(jù)通信，完成系統(tǒng)中的文件處理。三、模塊的分類模塊包括標準模塊、類模塊和對象模塊三種，按調用關系也可分為通用模塊和事件模塊。標準模塊是指當多個窗體共同執(zhí)行一段代碼時，為了避免重復，創(chuàng)建獨立公用代碼模塊。（１）一般標準模塊內部含有應用程序、允許其他模塊訪問的過程和聲明，可以包含變量、常數(shù)、類型、外部過程和全局聲明或模塊級聲明，此外還可以建立包含共享代碼與數(shù)據(jù)的類模塊。（２）用類模塊創(chuàng)建的對象可被應用程序內的過程調用。上一頁下一頁返回９.１模塊標準模塊只包含代碼，而類模塊既包含代碼又包含數(shù)據(jù)。窗體模塊和報表模塊都屬于類模塊，它們從屬于各自的窗體和報表。（３）對象模塊是指在窗體對象中為響應事件而執(zhí)行的程序段。事件模塊是指在窗體、報表控件屬性中的過程代碼，它只能在窗體和報表中出現(xiàn)。而通用模塊與事件屬性無關，只由事件模塊直接或間接調用。它既可在窗體、報表中出現(xiàn)，也可在模塊對象中出現(xiàn)。若程序過程不與任何Ａｃｃｅｓｓ對象相關聯(lián)，這些模塊只能是通用模塊。９.１.２對象、屬性、事件和方法一、對象（Ｏｂｊｅｃｔ）上一頁下一頁返回９.１模塊對象是描述客觀事物的實體。ＶＢＡ中的應用程序是由許多對象組成的，如表、窗體、查詢等。Ａｃｃｅｓｓ２０１３中除數(shù)據(jù)庫的６個對象外，還提供一個ＤｏＣｍｄ重要對象，它是除窗體、控件外用得最多的一個對象。使用該對象不僅可完成打開數(shù)據(jù)庫表、調用宏、關閉窗體等操作，還可以在ＶＢＡ中運行Ａｃｃｅｓｓ的操作。ＤｏＣｍｄ對象的常用方法有：ＤｏＣｍｄ.ＯｐｅｎＦｏｒｍ“ｓｔｕｄｅｎｔ”：表示打開當前數(shù)據(jù)庫中的“ｓｔｕｄｅｎｔ”窗體；上一頁下一頁返回９.１模塊ＤｏＣｍｄ.ＳｅｌｅｃｔＯｂｊｅｃｔａｃＦｏｒｍ，“ｓｔｕｄｅｎｔ”，Ｔｒｕｅ：表示選擇當前數(shù)據(jù)庫中“ｓｔｕｄｅｎｔ”窗體；ＤｏＣｍｄ.ＣｌｏｓｅａｃＦｏｒｍ，“ｓｔｕｄｅｎｔ”，ａｃＳａｖｅＹｅｓ：表示關閉當前“ｓｔｕｄｅｎｔ”窗體；ＤｏＣｍｄ.ＤｅｌｅｔｅＯｂｊｅｃｔ“ｓｔｕｄｅｎｔ”：表示刪除數(shù)據(jù)庫中的“ｓｔｕｄｅｎｔ”表。二、屬性（Ｐｒｏｐｅｒｔｙ）對象的屬性描述對象的具體特征，在ＶＢＡ代碼中，對象屬性的引用方式為：上一頁下一頁返回９.１模塊對象名.屬性＝屬性值ＶＢＡ編程中，根據(jù)對象進行設置，最常用對象有窗體、標簽、文本框和按鈕，它們的屬性說明如表９.１～表９.４所示。三、事件和方法（ＥｖｅｎｔａｎｄＭｏｔｈｏｄ）事件是指發(fā)生在一個對象上且能夠對該對象動作所識別，也稱作對象對外部操作的響應。事件的發(fā)生通常是用戶操作的結果。在Ａｃｃｅｓｓ２０１３中，使用宏對象和編寫ＶＢＡ事件代碼來設置事件屬性，完成指定動作或用來處理窗體、報表或控件的事件響應。上一頁下一頁返回９.１模塊常用的事件有鼠標單擊、按任意鍵、對象打開或關閉及多種操作類型的事件。具體內容如表９.５

～表９.１０所示。（１）針對窗體的常用事件如表９.５所示。（２）針對報表及命令按鈕的常用事件如表９.６所示。（３）針對標簽及文本框的常用事件如表９.７所示。（４）針對組合框的常用事件如表９.８所示。（５）針對選項組及單選按鈕的常用事件如表９.９所示。上一頁下一頁返回９.１模塊（６）針對復選框的常用事件如表９.１０所示。方法是系統(tǒng)事先設計好的，可以完成一定操作的特殊過程，是附屬于對象的行為和動作。在需要使用的時候可以直接調用。其調用格式為：對象名.方法名。上一頁返回９.２模塊及過程創(chuàng)建９.２.１新建模塊模塊由過程組成，而過程是由程序員根據(jù)不同任務編寫的程序集合。一、建立子過程Ｓｕｂ過程又稱為子過程，執(zhí)行一系列操作，無返回值。定義格式如下：[Public|Private]

Sub對象名_事件名()

...(事件過程代碼)或(程序代碼)

[ExitSub]下一頁返回９.２模塊及過程創(chuàng)建EndSub【說明】?Ｐｕｂｌｉｃ關鍵字可以使子程序在所有模塊中有效。Ｐｒｉｖａｔｅ關鍵字使子程序只在本模塊中有效。如果沒有顯式指定，缺省為公用。?子程序可以帶參數(shù)。?ＥｘｉｔＳｕｂ語句是退出子程序。?可以引用過程名來調用該子過程。ＶＢＡ提供了一個關鍵字Ｃａｌｌ，可顯示調用一個子過程，格式為：上一頁下一頁返回９.２模塊及過程創(chuàng)建Call過程名[(實參列表)]或過程名[(實參列表)]二、過程的編輯通用模塊創(chuàng)建方法是單擊【創(chuàng)建】選項卡中的“模塊”命令，即可打開模塊編輯窗口。事件模塊創(chuàng)建是在窗體或報表的對象中右擊，選擇“事件生成器”，再選擇“代碼生成器”打開模塊編輯窗口，如圖９.１所示。模塊中子過程和函數(shù)過程不是Ａｃｃｅｓｓ的一個獨立對象，不能單獨保存，只能存在于模塊中。上一頁下一頁返回９.２模塊及過程創(chuàng)建過程與過程之間相互隔離，系統(tǒng)不會從一個過程自動執(zhí)行到另一個過程，但一個過程可以通過調用執(zhí)行另一個過程。子過程的編寫有兩種形式：一是子過程以Ｓｕｂ開頭，以Ｅｎｄｓｕｂ結尾；二是函數(shù)過程以Ｆｕｎｃｔｉｏｎ開頭，以ＥｎｄＦｕｎｃｔｉｏｎ結尾。三、過程的運行模塊編輯及運行的工具欄命令如圖９.２所示。若要運行模塊程序，單擊工具欄中的“運行”圖標或按快捷鍵“Ｆ５”即可。上一頁下一頁返回９.２模塊及過程創(chuàng)建９.２.２模塊的使用例１：Subsub1()Msgbox(“歡迎使用sub過程”)EndSub結果如圖９.３所示。９.２.３新建函數(shù)及函數(shù)的使用一、建立函數(shù)過程的格式Ｆｕｎｃｔｉｏｎ過程，又稱為函數(shù)過程。它執(zhí)行一系列操作，有返回值。定義格式為：上一頁下一頁返回９.２模塊及過程創(chuàng)建[Public|Private]Function函數(shù)名([<參數(shù)>])[As數(shù)據(jù)類型][<語句組>][函數(shù)名=<表達式>][ExitFunction][<語句組>][函數(shù)名=<表達式>]EndFunction【說明】上一頁下一頁返回９.２模塊及過程創(chuàng)建?函數(shù)名：命名規(guī)則與變量名規(guī)則相同。但不能與系統(tǒng)的內部函數(shù)或其他通用子過程同名，也不能與已定義的全局變量和本模塊中模塊級變量同名。?定義函數(shù)時用Ｐｕｂｌｉｃ關鍵字，則所有模塊都可以調用它。用Ｐｒｉｖａｔｅ關鍵字，函數(shù)只用于同一模塊。如果沒有顯式指定，缺省為公用。?函數(shù)名末尾可使用Ａｓ子句來聲明返回值的數(shù)據(jù)類型，參數(shù)也可指定數(shù)據(jù)類型。若省略則函數(shù)返回變體類型值（Ｖａｒｉａｎｔ）。上一頁下一頁返回９.２模塊及過程創(chuàng)建?ＥｘｉｔＦｕｎｃｔｉｏｎ：表示退出函數(shù)過程，常常與選擇結構（Ｉｆ或ＳｅｌｅｃｔＣａｓｅ語句）聯(lián)用，即當滿足一定條件時，退出函數(shù)過程。?在函數(shù)體內，函數(shù)名可以當變量使用，函數(shù)的返回值就是通過對函數(shù)名的賦值語句來實現(xiàn)的，在函數(shù)過程中至少要對函數(shù)名賦值一次。?函數(shù)過程不能使用Ｃａｌｌ來調用執(zhí)行，需要直接引用函數(shù)過程名，并由接在函數(shù)過程名后的括號所辨別。?形參數(shù)列表：形參的定義與子過程完全相同。上一頁下一頁返回９.２模塊及過程創(chuàng)建二、函數(shù)參數(shù)傳遞函數(shù)過程調用中的參數(shù)傳遞方式有兩種：按地址傳遞和按值傳遞。（１）按地址傳遞。形參與實參在內存中占用相同的存儲單元。當被調過程的形參值發(fā)生變化時，實參值也產生同樣的變化。默認的參數(shù)傳遞方式是按地址。如果要顯式指定按地址傳遞方式，可在每個形參前增加關鍵字ＢｙＲｅｆ。（２）按值傳遞。實參和形參是兩個不同的變量，占用不同的內存單元。上一頁下一頁返回９.２模塊及過程創(chuàng)建實參將其值賦給形參，以后形參的變化不會影響到實參的值。若按值傳遞，必須在形參前冠以關鍵字ＢｙＶａｌ。９.２.４模塊案例案例十二創(chuàng)建模塊計算本學期平均成績在這個案例中，將重點講述使用Ａｃｃｅｓｓ２０１３制作模塊的過程，掌握利用窗體界面實現(xiàn)模塊編程的方法和步驟。一、案例說明圖９.８是制作好的Ａｃｃｅｓｓ２０１３模塊編程窗體界面，其建立窗體方法參照第５章案例五的步驟。上一頁下一頁返回９.２模塊及過程創(chuàng)建本界面上的對象有標題名稱、姓名及各科名稱標簽，相應的文本框顯示其內容，按鈕包括“計算平均”“清除”和“退出”項。使用ＶＢＡ語法規(guī)則，在“計算平均”事件模塊上編寫代碼，其建立的詳細過程見本章９.５.２小節(jié)例１２。二、知識點分析（１）事件模塊在窗體中的建立方法。（２）過程中添加ＶＢＡ代碼的步驟。（３）變量的使用。（４）文本框、標簽和按鈕對象與ＶＢＡ代碼之間的關系。（５）信息提示控件Ｍｓｇｂｏｘ的使用方法。上一頁下一頁返回９.２模塊及過程創(chuàng)建（６）文本框屬性的賦值。（７）標簽屬性的賦值使用。三、案例運行結果運行結果如圖９.８所示。上一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式９.３.１數(shù)據(jù)類型ＶＢＡ數(shù)據(jù)類型及占用空間如表９.１２所示。９.３.２常量與變量一、常量ＶＢＡ在運行時其值始終保持不變的量。常量有直接常量、符號常量、系統(tǒng)常量和內部常量，其中：?日期常量：放在雙引號內，日期／時間型常量放在一對＃內。?符號常量：用標識符保存一個常量值，一般使用Ｃｏｎｓｔ語句定義常量。下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式?系統(tǒng)常量：Ｔｒｕｅ和Ｆａｌｓｅ、Ｙｅｓ和Ｎｏ、Ｏｎ和Ｏｆｆ和ＮＵＬＬ。?內部常量：通常指明對象庫常量，來自Ａｃｃｅｓｓ庫的常量以“ａｃ”開頭，來自ＡＤＯ庫的常量以“ａｄ”開頭，而來自ＶｉｓｕａｌＢａｓｉｃ庫的常量則以“ｖｂ”開頭。二、變量變量是程序運行期間內值可以改變的量。變量在使用前應該進行聲明，用Ｄｉｍ或Ｓｔａｔｉｃ語句顯式聲明局部變量。１.變量名的命名規(guī)則（１）必須以字母（或漢字）開頭；上一頁下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式（２）可以包含字母、數(shù)字或下劃線字符；（３）不能包含標點符號或空格等；（４）最長不能超過２５５個字符；（５）不能是ＶＢＡ關鍵字（如Ｆｏｒ、Ｔｏ、Ｎｅｘｔ、Ｉｆ、Ｗｈｉｌｅ等）。２.格式：Dim<變量1>As<類型1>[,<變量2>As<類型2>[,...]]Static變量[As類型]StaticSub過程名[（實參列表）]上一頁下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式StaticFunction函數(shù)名[（實參列表）][As類型]語句中的“Ａｓ類型”子句是可缺省的。如果使用該子句，就可以定義變量的數(shù)據(jù)類型。未定義時默認變量的類型為變體型（Ｖａｒｉａｎｔ）。ＶＢＡ中允許不事先聲明而直接使用變量，若添加語句ＯｐｔｉｏｎＥｘｐｌｉｃｉｔ，則使用的變量必須事先聲明，否則ＶＢＡ會發(fā)出警告信息。強制實現(xiàn)變量先定義后使用也可以通過菜單實現(xiàn)，方法是單擊【模塊】菜單，選中“工具”命令下的“選項”對話框，在“要求變量聲明”復選框中打鉤，如圖９.１５所示。上一頁下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式聲明語句用于命名和定義常量、變量、數(shù)組和過程。在定義了這些內容的同時，也定義了它們的作用范圍，即局部、模塊或全局。與使用的關鍵字（Ｄｉｍ、Ｐｕｂｌｉｃ、Ｓｔａｔｉｃ或Ｇｌｏｂａｌ）有關。３.變量的作用域在ＶＢＡ編程中，變量定義的位置和方式不同，則它存在的時間和起作用的范圍也有所不同，這就是變量的作用域與生命周期。ＶＢＡ中變量的作用域分為下列３種：（１）全局變量（Ｐｕｂｌｉｃ）。上一頁下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式在標準模塊的所有過程之外的起始位置聲明的變量稱為全局變量，在標準模塊的變量聲明區(qū)域，用Ｐｕｂｌｉｃ．．．Ａｓ關鍵字聲明的變量的作用域就屬于全局范圍。在數(shù)據(jù)庫系統(tǒng)的所有地方都可使用。即可被本應用程序的任何過程或函數(shù)訪問。（２）局部變量（Ｌｏｃａｌ）。在模塊的過程內部聲明的變量稱為局部變量，一般在過程內用Ｄｉｍ語句或用Ｐｒｉｖａｔｅ語句聲明。在子過程或函數(shù)過程中聲明的變量或直接使用的變量，作用域都屬于局部范圍。局部變量僅在該過程范圍中有效。包括在窗體對象、報表對象、模塊對象之內定義的變量，不能跨越所在對象。上一頁下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式要在過程的運行時永遠保留局部變量的值，可以用Ｓｔａｔｉｃ關鍵詞代替Ｄｉｍ定義靜態(tài)變量。（３）模塊級變量（Ｍｏｄｕｌｅ）。在模塊中的所有過程之外的起始位置聲明的變量稱為模塊級變量。在模塊級變量聲明區(qū)域，用Ｄｉｍ．．．Ａｓ關鍵字聲明的變量的作用域就屬于模塊范圍。模塊級變量僅在該模塊范圍中有效，不能跨越所在對象。此變量只能在模塊的開始位置定義。４.變量的生命周期（１）變量的生命周期是指變量在運行時有效的持續(xù)時間。上一頁下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式變量的持續(xù)時間是指從變量聲明語句所在的過程第一次運行到代碼執(zhí)行完畢并將控制權交回調用它的過程為止的時間。（２）每次子過程或函數(shù)過程被調用時，以Ｄｉｍ．．．Ａｓ語句聲明的局部變量，會被設定默認值，數(shù)值類型變量的默認值為０，字符串型變量的默認值為空字符串（“”），布爾型變量的默認值為Ｆａｌｓｅ。這些局部變量，有著與子過程或函數(shù)過程等長的持續(xù)時間。９.３.３標識符及運算符的使用１.關鍵字Ｄｉｍ或Ｓｔａｔｉｃ的區(qū)別上一頁下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式Ｄｉｍ聲明：隨過程的調用而分配存儲單元，每次調用都對變量初始化；過程體結束，變量的內容自動消失，存儲單元釋放。Ｓｔａｔｉｃ聲明：Ｓｔａｔｉｃ聲明的變量，也稱為靜態(tài)變量。靜態(tài)變量在程序運行過程中一直保留其值，即每次調用過程，變量保持原來的值。２.注釋語句有兩種方式：（１）使用Ｒｅｍ語句；（２）用英文單引號“'”。上一頁下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式注釋語句可寫在某語句的后面，也可單獨一行，若把Ｒｅｍ語句寫在某語句的后面的同一行時，要在該語句與Ｒｅｍ之間用“：”分隔。３.標識符與運算符的命名規(guī)則標示符為程序中常量、變量、過程等對象的名字。ＶＢＡ標識符規(guī)定：（１）字符必須是字母，且包含的字符數(shù)不超過２５５個。（２）不得與ＶＢＡ的關鍵字同名，如不能使用Ｓｕｂ、Ｆｏｒ等。上一頁下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式（３）不能使用下列字符：?。溃Α纾＃崭瘢?。（４）從增強程序可讀性角度出發(fā)，標識符應盡量使用變量含義，增加程序的可讀性。４.常用運算符常用的運算符包含算術運算符、關系運算符、邏輯運算符、布爾量（Ｔｒｕｅ或Ｆａｌｓｅ）和連接運算符。其中，“＋”用于連接字符串，“＆”可將幾個不同類型的值連接成一個字符串。運算符如表９.１３所示。上一頁下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式５.運算符的使用（１）Ｌｉｋｅ運算符。Ｌｉｋｅ為字符串匹配運算符。格式："目標串"Like"匹配串"結果為邏輯值（２）Ｉｓ運算符。Ｉｓ為判斷一個表達式的值是否為空（ＮＵＬＬ），Ｉｓ和ＮＵＬＬ保留字聯(lián)用。格式：IsNull(表達式)或NotIsNull(表達式)上一頁下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式（３）Ｉｎ運算符。Ｉｎ為判斷一個表達式的值是否在一個指定范圍的值之內。格式：表達式[Not]In(Value1,Value2,...)（４）Ｂｅｔｗｅｅｎ．．．Ａｎｄ．．．運算符。Ｂｅｔｗｅｅｎ為判斷一個表達式的值是否在兩個數(shù)所確定的范圍之內。格式：表達式[Not]BetweenValue1AndValue2（５）！運算符。上一頁下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式“！”為取得一個對象的子集、子對象和屬性，而且要求這些子集、子對象是由用戶定義的，子屬性是Ａｃｃｅｓｓ內部定義的?！?！”運算符之后總是用方括號“［］”將內容括起來。（６）表達式。表達式：用運算符將常量、變量、函數(shù)等連接起來的式子，書寫在一行上。表達式可分為算術表達式、關系表達式和邏輯表達式等。算術表達式，例如：Ｓｕｍ１＝Ｃｏｕｎｔ＋１關系表達式，如：Ａｇｅ＜＞６０（Ａｇｅ≠６０）邏輯表達式，如：Ｇｒａｄｅ＜＝７０ＯｒＧｒａｇｅ＞＝６０上一頁下一頁返回９.３數(shù)據(jù)類型、常量、變量與表達式６.賦值語句格式：[Let]變量名=表達式功能：計算右端的表達式，并把結果賦值給左端的變量。Ｌｅｔ為可選項。符號“＝”被稱為賦值號。注意：賦值號“＝”左邊的變量可以是對象的屬性，但不能是常量。上一頁返回９.４ＶＢＡ的常用函數(shù)及常用控件９.４.１ＶＢＡ函數(shù)Ａｃｃｅｓｓ２０１３為用戶提供了大量函數(shù)，根據(jù)函數(shù)返回值類型，可以將函數(shù)分為：日期／時間函數(shù)、數(shù)學函數(shù)、文本函數(shù)、類型轉換函數(shù)、邏輯測試函數(shù)、消息函數(shù)和其他函數(shù)幾大類。１.日期／時間函數(shù)日期／時間函數(shù)如表９.１４所示。（１）ｄａｔｅＡｄｄ（）：添加日期。（２）ＤａｔｅＤｉｆｆ（）：判斷兩個日期之間的間隔。（３）ＤａｔｅＰａｒｔ（）：返回日期的某個部分。（４）Ｄａｙ（）：返回日期的１～３１日部分。下一頁返回９.４ＶＢＡ的常用函數(shù)及常用控件（５）ＩｓＤａｔｅ（）：判斷是否是日期，是日期則返回－１，不是日期則返回０。（６）Ｍｏｎｔｈ（）：返回日期的月份部分。（７）Ｙｅａｒ（）：返回某個日期的年份。（８）Ｈｏｕｒ（）：返回日期的小時。（９）Ｍｉｎｕｔｅ（）：返回日期的分鐘部分。（１０）Ｓｅｃｏｎｄ：返回日期的秒部分。（１１）Ｔｉｍｅ：返回當前的時間部分（即除去年／月／日的部分）。上一頁下一頁返回９.４ＶＢＡ的常用函數(shù)及常用控件（１２）Ｗｅｅｋｄａｙ：返回某個日期的當前星期（星期天為１，星期一為２，星期二為３……）。（１３）ＣＤａｔｅ：將字符串轉化成為日期。２.數(shù)學函數(shù)數(shù)學函數(shù)如表９.１５所示。對于隨機函數(shù)：（１）Ｒｎｄ可以產生一個（０，１）的隨機數(shù)。（２）使用Ｒａｎｄｏｍｉｚｅ語句可為隨機數(shù)生成器指定不同的初值，即可得到不同的隨機數(shù)序列。上一頁下一頁返回９.４ＶＢＡ的常用函數(shù)及常用控件（３）Ｒｎｄ通常與Ｉｎｔ函數(shù)配合使用，要生成［ａ，ｂ］區(qū)間范圍內的隨機整數(shù)，可采用：Ｉｎｔ（（ｂ－ａ＋１）?Ｒｎｄ＋ａ）３.字符函數(shù)字符函數(shù)如表９.１６所示。（１）ＭｙＳｔｒ＝Ｒｉｇｈｔ（ＡｎｙＳｔｒｉｎｇ，７）：返回ＶＢＡ程序設計（２）Ｌｅｆｔ（）：返回指定字符串左邊取出的指定數(shù)量的字符，格式為Ｌｅｆｔ（ｓｔｒｉｎｇ，ｌｅｎｇｔｈ）。上一頁下一頁返回９.４ＶＢＡ的常用函數(shù)及常用控件（３）ＩｎＳｔｒ（）：查找某字符串在另一個字符串中首次出現(xiàn)的位置。（４）Len("字符串")：返回字符串長度。４.類型轉換函數(shù)類型轉換函數(shù)如表９.１７所示。５.邏輯測試函數(shù)邏輯測試函數(shù)如表９.１８所示。６.輸入消息框函數(shù)上一頁下一頁返回９.４ＶＢＡ的常用函數(shù)及常用控件ＩｎｐｕｔＢｏｘ（）：表示打開一個輸入對話框，等待用戶鍵入文本或選擇一個按鈕。當用戶單擊“確定”按鈕或按Ｅｎｔｅｒ鍵后，函數(shù)返回文本框中輸入的值。格式：InputBox(提示[,標題][,缺省值][,x坐標位置][,y坐標位置])【參數(shù)說明】（１）“提示”：唯一不能省略的選項，是字符串表達式，在對話框中作為提示信息顯示。（２）“標題”：字符串表達式，在對話框的標題欄顯示，缺省標題為“ＭｉｃｒｏｓｏｆｔＯｆｆｉｃｅＡｃｃｅｓｓ”。上一頁下一頁返回９.４ＶＢＡ的常用函數(shù)及常用控件（３）“缺省值”：當無輸入新值時，則該缺省值作為輸入的內容。（４）“ｘ坐標位置”和“ｙ坐標位置”：確定對話框在屏幕上的位置。（５）若用戶單擊“取消”按鈕，該函數(shù)返回長度為零的字符串（""）。（６）ＩｎｐｕｔＢｏｘ（）函數(shù)返回值的類型由接收返回值變量的類型決定。７.輸出消息框函數(shù)ＭｓｇＢｏｘ（）：表示打開一個輸出消息對話框。上一頁下一頁返回９.４ＶＢＡ的常用函數(shù)及常用控件格式：MsgBox(提示[,按鈕][,標題])【參數(shù)說明】（１）“提示”和“標題”：與ＩｎｐｕｔＢｏｘ函數(shù)的意義相同。（２）ＭｓｇＢｏｘ函數(shù)與ＭｓｇＢｏｘ過程的格式區(qū)別，前者有一對圓括號，后者沒有圓括號。（３）按鈕個數(shù)及圖標：符號常量、返回值參數(shù)是可選的字符串或整型表達式，決定顯示按鈕的數(shù)目及形式，缺省值為０。按鈕參數(shù)設置方法如表９.１９所示。圖標顯示參數(shù)如表９.２０所示。上一頁下一頁返回９.４ＶＢＡ的常用函數(shù)及常用控件（４）按鈕返回的整數(shù)決定用戶選擇了對應按鈕，如表９.２１所示。（５）用戶選擇缺省按鈕也是可選項，對應值如表９.２２所示。８.其他函數(shù)條件函數(shù)：IIf()?格式：ＩＩｆ（條件表達式，表達式１，表達式２）【說明】條件表達式為邏輯表達式，當條件為“真”時結果取表達式１的值，反之，取表達式２的值。ＩＩｆ函數(shù)可以嵌套使用。上一頁下一頁返回９.４ＶＢＡ的常用函數(shù)及常用控件９.４.２功能語句（１）Ｂｅｅｐ：產生一次蜂鳴。（２）ＤｅｌｅｔｅＣｏｎｔｒｏｌ：從一個窗體中刪除一個指定控件。（３）ＤｅｌｅｔｅＲｅｐｏｒｔＣｏｎｔｒｏｌ：從一個報表中刪除一個指定控件。（４）Ｄｏｃｍｄ：執(zhí)行一個宏操作。（５）ＯｐｔｉｏｎＣｏｍｐａｒｅ：設置進行字符串比較運算時是否區(qū)分大小寫。（６）Ｒｅｓｕｍｅ：完成錯誤信息處理。上一頁下一頁返回９.４ＶＢＡ的常用函數(shù)及常用控件９.４.３ＶＢＡ編程常用控件?ＢｏｕｎｄＯｂｊｅｃｔＦｒａｍｅ綁定對象框?ＣｈｅｃｋＢｏｘ復選框?ＣｏｍｂｏＢｏｘ組合框?ＣｏｍｍａｎｄＢｕｔｔｏｎ命令按鈕?ＣｕｓｔｏｍＣｏｎｔｒｏｌＡｃｔｉｖｅＸ（自定義）控件?Ｉｍａｇｅ圖像?Ｌａｂｅｌ標簽?Ｌｉｎｅ線條上一頁下一頁返回９.４ＶＢＡ的常用函數(shù)及常用控件?ＬｉｓｔＢｏｘ列表框?ＯｂｊｅｃｔＦｒａｍｅ未綁定對象框或圖表?ＯｐｔｉｏｎＢｕｔｔｏｎ選項按鈕?ＯｐｔｉｏｎＧｒｏｕｐ選項組?Ｐａｇｅ頁?ＰａｇｅＢｒｅａｋ分頁符?Ｒｅｃｔａｎｇｌｅ矩形上一頁下一頁返回９.４ＶＢＡ的常用函數(shù)及常用控件?Ｓｕｂｆｏｒｍ子窗體／子報表?ＴａｂＣｔｌ選項卡?ＴｅｘｔＢｏｘ文本框?ＴｏｇｇｌｅＢｕｔｔｏｎ切換按鈕上一頁返回９.５ＶＢＡ程序流程控制９.５.１程序運行結構結構化程序設計由順序、選擇、循環(huán)這３種基本結構所組成，如圖９.２３所示。９.５.２條件選擇結構一、Ｉｆ．．．Ｔｈｅｎ．．．語句?語法格式１：If<關系表達式或邏輯表達式>Then<語句>關系表達式或邏輯表達式成立時執(zhí)行Ｔｈｅｎ后的語句，否則直接執(zhí)行Ｉｆ的下一條語句。下一頁返回９.５ＶＢＡ程序流程控制＜語句＞可以是一條語句，也可以是若干條用冒號“：”隔開的ＶＢＡ語句組。?語法格式２：If<關系或邏輯表達式>Then<語句1>Else<語句2>Ｉｆ后的表達式成立時執(zhí)行Ｔｈｅｎ后的語句，不成立時執(zhí)行Ｅｌｓｅ后的語句；然后程序繼續(xù)執(zhí)行Ｉｆ后的其他語句。?語法格式３（多條件選擇）：If<關系或邏輯表達式>Then<語句組>上一頁下一頁返回９.５ＶＢＡ程序流程控制EndIf或If<關系或邏輯表達式>Then<語句組1>Else<語句組2>EndIf二、案例十二的操作步驟例１２：制作案例十二中計算課程平均成績的窗體。其步驟如下：上一頁下一頁返回９.５ＶＢＡ程序流程控制（１）單擊【創(chuàng)建】選項卡中的“窗體設計”新建一個窗體，添加標簽、文本框和按鈕控件，并添加相應內容。（２）在【窗體設計工具】選項卡的“設計”中選擇“添加現(xiàn)有字段”，添加ｓｔｕｄｅｎｔ表，將學號、姓名和照片字段拖動到窗體上。（３）使用導航按鈕“下一項記錄”和“前一項記錄”進行查找，如圖９.２５所示。（４）通過文本框屬性修改４個成績文本框名分別是Ｔｅｘｔ１～Ｔｅｘｔ４，平均成績項為Ｔｅｘｔ５。上一頁下一頁返回９.５ＶＢＡ程序流程控制（５）通過按鈕屬性修改３個按鈕名為Ｃｏｍｍａｎｄ０、Ｃｏｍｍａｎｄ１和Ｃｏｍｍａｎｄ２，方便編程。（６）右擊“計算平均”按鈕（Ｃｏｍｍａｎｄ０），選擇“事件生成器”下的“代碼生成器”，打開模塊編輯窗口，鍵入程序代碼如下所示。運行結果見案例十二。（７）右擊“清除”按鈕（Ｃｏｍｍａｎｄ１），選擇“事件生成器”下的“代碼生成器”，打開模塊編輯窗口，鍵入程序代碼：PrivateSubCommand1_Click()Text1.Value=""上一頁下一頁返回９.５ＶＢＡ程序流程控制Text2.Value=""Text3.Value=""Text4.Value=""Text5.Value=""EndSub（８）右擊“退出”按鈕（Ｃｏｍｍａｎｄ２），選擇“事件生成器”下的“代碼生成器”，打開模塊編輯窗口，鍵入程序代碼：PrivateSubCommand2_Click()DoCmd.RunMacro"close_window"EndSub上一頁下一頁返回９.５ＶＢＡ程序流程控制三、注釋語句在程序中加上注釋語句有利于程序的維護和閱讀。格式：Rem注釋內容或使用單引號“'”注釋內容四、多條件語句如果條件復雜，程序需要多個分支，即要用多個Ｉｆ語句嵌套，這樣程序變得不易閱讀。此時可使用ＳｅｌｅｃｔＣａｓｅ語句來寫出結構清晰的程序。語法格式：SelectCase<條件表達式>上一頁下一頁返回９.５ＶＢＡ程序流程控制Case<表達式1>[<語句組1>]Case<表達式2>[<語句組2>]……CaseElse[<語句組n>]CaseElse[<語句組n+1>]EndSelect上一頁下一頁返回９.５ＶＢＡ程序流程控制其中的＜條件表達式＞是任何數(shù)值或字符串表達式。＜表達式＞可以是下列幾種形式：?數(shù)值表達式；?數(shù)值表達式Ｔｏ數(shù)值表達式；?Ｉｓ＜數(shù)值表達式＞。多條件語法流程結構如圖９.２６所示。９.５.３循環(huán)結構一、ＶＢＡ循環(huán)語句種類（１）ＤｏＷｈｉｌｅ．．．Ｌｏｏｐ循環(huán)；上一頁下一頁返回９.５ＶＢＡ程序流程控制（２）Ｗｈｉｌｅ．．．Ｗｅｎｄ循環(huán)；（３）Ｆｏｒ．．．Ｎｅｘｔ循環(huán)；（４）ＦｏｒＥａｃｈ．．．Ｎｅｘｔ循環(huán)。最常用的是Ｆｏｒ．．．Ｎｅｘｔ和ＤｏＷｈｉｌｅ．．．Ｌｏｏｐ循環(huán)。二、Ｄｏ．．．Ｌｏｏｐ循環(huán)語句（用于控制循環(huán)次數(shù)未知的情況）該循環(huán)的形式有：（１）ＤｏＷｈｉｌｅ．．．Ｌｏｏｐ語句；（２）ＤｏＵｎｔｉｌ．．．Ｌｏｏｐ語句；上一頁下一頁返回９.５ＶＢＡ程序流程控制（３）Ｄｏ．．．ＬｏｏｐＷｈｉｌｅ語句；（４）Ｄｏ．．．ＬｏｏｐＵｎｔｉｌ語句。Ｗｈｉｌｅ和Ｕｎｔｉｌ的作用正好相反，使用Ｗｈｉｌｅ，則當＜條件＞為真繼續(xù)循環(huán)。使用Ｕｎｔｉｌ，則當＜條件＞為真時，結束循環(huán)。把Ｗｈｉｌｅ或Ｕｎｔｉｌ放在Ｄｏ子句中，則先判斷后執(zhí)行。把一個Ｗｈｉｌｅ或Ｕｎｔｉｌ放在Ｌｏｏｐ子句中，則先執(zhí)行后判斷。?形式１：

Do{While|Until}<條件>上一頁下一頁返回９.５ＶＢＡ程序流程控制循環(huán)體語句塊

[ExitDo]

[語句塊]

Loop該循環(huán)方式稱為當循環(huán)，即：當Ｗｈｉｌｅ條件語句第一次不滿足時，其循環(huán)體不會執(zhí)行，程序流程圖如圖９.２９所示。?形式２：上一頁下一頁返回９.５ＶＢＡ程序流程控制Do循環(huán)體語句塊

[ExitDo]

[語句塊]LoopWhile<條件>該循環(huán)方式稱為直到循環(huán)，當?shù)谝淮螚l件不成立時，該循環(huán)至少執(zhí)行一次循環(huán)體。循環(huán)變量必須有初值，且循環(huán)體內有改變以防止產生死循環(huán)，其執(zhí)行的流程圖如圖９.３１所示。上一頁下一頁返回９.５ＶＢＡ程序流程控制?形式３：DoUntil<條件>循環(huán)體語句塊

[ExitDo]

[語句塊]Loop該循環(huán)當條件成立時，結束執(zhí)行循環(huán)體，循環(huán)變量必須有初值，且循環(huán)體內有改變循環(huán)變量的語句，防止產生死循環(huán)，當條件第一次成立時，不執(zhí)行循環(huán)體，屬于當循環(huán)。上一頁下一頁返回９.５ＶＢＡ程序流程控制?形式４：Do循環(huán)體語句塊

[ExitDo]

[語句塊]LoopUntil<條件>該循環(huán)當條件成立時，執(zhí)行循環(huán)體，循環(huán)變量也必須有初值，且循環(huán)體內有改變循環(huán)變量的語句，防止產生死循環(huán)，當條件第一次不成立時，至少執(zhí)行一次循環(huán)體，屬于直到循環(huán)。上一頁下一頁返回９.５ＶＢＡ程序流程控制三、Ｗｈｉｌｅ．．．Ｗｅｎｄ語句１.語法格式While<條件>

<循環(huán)塊>Wend２.說明該語句的功能與ＤｏＷｈｉｌｅ＜條件＞．．．Ｌｏｏｐ實現(xiàn)的循環(huán)完全相同，循環(huán)變量也必須有初值，且循環(huán)體內有改變循環(huán)變量的語句，防止產生死循環(huán)，當條件第一次成立時，不執(zhí)行循環(huán)體，屬于當循環(huán)。上一頁下一頁返回９.５ＶＢＡ程序流程控制四、Ｆｏｒ．．．Ｎｅｘｔ循環(huán)Ｆｏｒ．．．Ｎｅｘｔ循環(huán)一般用于循環(huán)次數(shù)已知的過程。１.語法格式For<循環(huán)變量>=初值To終值[Step<步長值>]

[循環(huán)體]

[ExitFor]Next[循環(huán)變量]２.說明若步長值為１時可省略Ｓｔｅｐ子句；ＥｘｉｔＦｏｒ為強制退出循環(huán)語句。上一頁下一頁返回９.５ＶＢＡ程序流程控制五、ＦｏｒＥａｃｈ．．．Ｎｅｘｔ循環(huán)１.語法格式ForEachelementIngroup

[循環(huán)體]

[ExitFor]

[語句]Next２.說明上一頁下一頁返回９.５ＶＢＡ程序流程控制該循環(huán)不是將語句運行指定的次數(shù)，而是對于數(shù)組中的每個元素或對象集合中的每一項重復一組語句。這在不知道集合中元素的數(shù)目時非常有用。六、雙重循環(huán)和多重循環(huán)雙重循環(huán)：循環(huán)語句的循環(huán)體本身也是一個循環(huán)。對于一個ｍ行ｎ列的數(shù)據(jù)行列陣來說，常常需要用雙重循環(huán)才能計算到行列陣中的每一個數(shù)據(jù)。上一頁返回９.６數(shù)組９.６.１數(shù)組的概念１.數(shù)組存儲數(shù)組是一種數(shù)據(jù)存儲結構，是用一個標識符保存若干具有相同數(shù)據(jù)類型的一組變量集合。數(shù)組中的不同元素通過下標加以區(qū)分。數(shù)組的聲明方式和其他的變量是一樣的，可以使用Ｄｉｍ、Ｓｔａｔｉｃ、Ｐｒｉｖａｔｅ或Ｐｕｂｌｉｃ語句來聲明。若數(shù)組的大小被指定，則它是個固定大小數(shù)組。若程序運行時數(shù)組的大小可以被改變，則它是個動態(tài)數(shù)組。數(shù)組下標從０還是從１開始，可由ＯｐｔｉｏｎＢａｓｅ語句確定。下一頁返回９.６數(shù)組如果ＯｐｔｉｏｎＢａｓｅ沒有指定為１，則數(shù)組下標從０開始到ｎ。數(shù)組Ａｒｒａｙ下標（０）（１）（２）（３）（４）（５）在聲明數(shù)組時，不指定下標的上界，即括號內為空，則數(shù)組為動態(tài)數(shù)組。動態(tài)數(shù)組可以在執(zhí)行代碼時改變大小。動態(tài)數(shù)組聲明后，可以在程序中用ＲｅＤｉｍ語句重新定義數(shù)組的維數(shù)以及每個維的上界。上一頁下一頁返回９.６數(shù)組重新聲明數(shù)組，數(shù)組中存在的值會丟失。若要保存數(shù)組中原先的值，可以使用ＲｅＤｉｍＰｒｅｓｅｒｖｅ語句來擴充數(shù)組。２.數(shù)組特性（數(shù)組中的每個數(shù)據(jù)稱為元素）（１）每個元素類型相同，占用同樣大小的存儲空間。（２）數(shù)組中的元素在內存中連續(xù)存放。（３）通過下標可訪問數(shù)組中的每個元素。下標的類型可以是整數(shù)、常量、變量或算術表達式。（４）數(shù)組分為一維數(shù)組、二維數(shù)組和多維數(shù)組。９.６.２一維數(shù)組和二維數(shù)組上一頁下一頁返回９.６數(shù)組一、一維數(shù)組１.一維數(shù)組的定義一維數(shù)組中的元素呈直線狀排列，每個下標對應一個元素。數(shù)組在使用前必須先行定義，語法格式是：Dim<數(shù)組名>([<下界>]To上界)As數(shù)據(jù)類型若省略下標下界，則數(shù)組的最小下標為０。２.說明（１）定義數(shù)組時，下標的下界值和上界值必須是常量或符號常量，不能使用變量。上一頁下一頁返回９.６數(shù)組Dimx(n)或：n=Inputbox(＂輸入n＂)Dimx(n)AsSingle均是錯誤的聲明。（２）引用數(shù)組元素時，下標不得超出所定義的下界和上界，否則程序的執(zhí)行將被中斷，同時系統(tǒng)報錯。（３）使用數(shù)組時，用ＬＢｏｕｎｄ（）和ＵＢｏｕｎｄ（）函數(shù)可得到該數(shù)組下標的下界和上界值。上一頁下一頁返回９.６數(shù)組二、動態(tài)數(shù)組動態(tài)數(shù)組指在聲明數(shù)組時給出數(shù)組的大小需要改變時，可用ＲｅＤｉｍ語句重新指出數(shù)組大小。１.語法格式ReDim數(shù)組名(下標[,下標2...])[As類型]２.說明（１）動態(tài)數(shù)組在運行時分配存儲單元，過程中可多次使用ＲｅＤｉｍ來改變數(shù)組元素的個數(shù)。（２）ＲｅＤｉｍ中的下標可以是常量，也可以是有了確定值的變量，即：上一頁下一頁返回９.６數(shù)組n=InputBox("輸入n的值")ReDimArr(n)三、二維數(shù)組二維數(shù)組中數(shù)據(jù)排列成矩陣，保存在一個二維表中。１.語法格式Dim<數(shù)組名>(下標1,下標2)As數(shù)據(jù)類型或Dim<數(shù)組名>([<下界>To]上界,[<下界>To]上界)As數(shù)據(jù)類型２.數(shù)組說明上一頁下一頁返回９.６數(shù)組（１）下標１指定行，下標２指定列，若省略定義下標值，則下標值默認為０；（２）二維數(shù)組在內存的存放順序是“先行后列”，若定義ａ（２，３），則存放順序是：ａ（０，０）→ａ（０，１）→ａ（０，２）→ａ（０，３）ａ（１，０）→ａ（１，１）→ａ（１，２）→ａ（１，３）ａ（２，０）→ａ（２，１）→ａ（２，２）→ａ（２，３）上一頁下一頁返回９.６數(shù)組３.數(shù)組參數(shù)的傳遞方法數(shù)組參數(shù)的傳遞只能使用按地址傳遞的方式，在被調用過程中，用ＬＢｏｕｎｄ（）函數(shù)和ＵＢｏｕｎｄ（）函數(shù)可測出形參數(shù)組的下標下界與下標上界。上一頁返回９.７立即窗口９.７.１立即窗口的功能１.功能立即窗口能立即顯示代碼中調試語句的信息，或顯示直接鍵入窗口命令所生成的信息。使用立即窗口能夠：（１）檢測有問題的或新編寫的代碼。（２）當執(zhí)行應用程序時查詢或改變變量的值。當應用程序中斷時，將一個你所想的新值指定給程序中的變量。（３）當執(zhí)行應用程序時查詢或改變屬性值。（４）在代碼中調用如你所需的過程。（５）當運行應用程序時查看調試的輸出。下一頁返回９.７立即窗口２.打開“立即”窗口的方法（１）單擊【創(chuàng)建】選項卡中的“模塊”，從【視圖】菜單中選定立即窗口。（２）直接按“Ｃｔｒｌ”＋“Ｇ”組合鍵。打開的立即窗口如圖９.４３所示。９.７.２立即窗口的使用１.在立即窗口中執(zhí)行代碼在立即窗口中鍵入一行或幾行代碼，單擊“Ｅｎｔｅｒ”鍵來執(zhí)行代碼。上一頁下一頁返回９.７立即窗口在立即窗口輸入語句：Ｄｅｂｕｇ.Ｐｒｉｎｔ２?９或Ｐｒｉｎｔ２?９，則輸出結果是１８。若在立即窗口中輸入幾行代碼，每行以回車結束，在最后一行回車時，會出現(xiàn)結果，如圖９.４４所示?！菊f明】立即窗口的代碼是不能存儲的。２.執(zhí)行方法上一頁下一頁返回９.７立即窗口在立即窗口執(zhí)行代碼的時候，如果需要有關函數(shù)、語句、屬性或方法的語法幫助，則可選定關鍵字、屬性名或是方法名稱，然后按Ｆ１鍵。使用立即窗口Ｄｅｂｕｇ.ｐｒｉｎｔ輸出命令可以輸出結果。但需要在單擊運行按鈕前打開“立即窗口”，即在【視圖】菜單下，單擊“立即窗口”命令。上一頁返回９.８程序的調試９.８.１程序代碼顏色說明從代碼窗口中可以看到，程序代碼中每一行的每一個單詞都具有自己的顏色，這樣用戶可以從復雜的代碼中輕松地辨別出程序的各個部分。代碼行中各種顏色所代表的含義為：?綠色：表示注釋行，它不會被執(zhí)行，只用于對代碼進行說明。?藍色：表示ＶＢＡ預定義的關鍵字名。?黑色：表示存儲數(shù)值的內容，如賦值語句、變量名。?紅色：表示有語法錯誤的語句。下一頁返回９.８程序的調試９.８.２程序調試程序調試和運行菜單如圖９.４７所示，調試中可設置斷點或單步調試。１.設置斷點在過程的某個特定語句上設置一個位置點以中斷程序的執(zhí)行。其作用主要是為了更好地觀察程序的運行情況。一般來講，在程序中的適當位置設置了斷點后，程序暫停時，就可以在立即窗口中顯示程序中各個變量的情況。除了Ｄｉｍ語句以外，用戶可以在程序的任何地方設置斷點。上一頁下一頁返回９.８程序的調試斷點的設置與取消可以使用：在“調試”工具欄使用Ｆ９功能鍵；切除所有斷點使用“Ｃｔｒｌ”＋“Ｓｈｉｆｔ”＋“Ｆ９”組合鍵。２.單步調試（１）執(zhí)行“調試”→“逐語句”命令（快捷鍵是Ｆ８）。（２）在逐語句執(zhí)行過程中，遇到調用過程不想進入其中停留時，按“Ｓｈｉｆｔ”＋“Ｆ８”組合鍵，能逐過程執(zhí)行而不進入，調試菜單如圖９.４７所示。上一頁下一頁返回９.８程序的調試（３）跳出過程。執(zhí)行“調試”→“跳出”命令（快捷鍵是“Ｃｔｒｌ”＋“Ｓｈｉｆｔ”＋“Ｆ８”），可以運行當前過程剩余語句代碼，轉到調用該過程語句的下一個語句去。（４）執(zhí)行特定的語句塊。繞過不想執(zhí)行的語句塊常使用的一個方法：在中斷模式下，把光標移到要執(zhí)行的語句行處，執(zhí)行“調試”→“設置下一條語句”命令，用它可以設置下次要執(zhí)行的語句。再把光標移到要停止的語句處，執(zhí)行“調試”→“運行到光標處”命令（快捷鍵是“Ｃｔｒｌ”＋“Ｆ８”），則可以運行到該語句處。上一頁下一頁返回９.８程序的調試（５）跟蹤嵌套過程。若調用另外某幾個過程、模塊或窗體，可以用“調用堆?！睆南峦巷@示已執(zhí)行的模塊、窗體名稱和過程名稱。操作方法如下：按“Ｃｔｒｌ”＋“Ｌ”→用鼠標選中某個過程→顯示這時，代碼窗口顯示出該過程，光標處于即將調用下一個過程的調用語句處。此時，按“Ｓｈｉｆｔ”＋“Ｆ９”組合鍵，用“快速監(jiān)視”或按“Ｃｔｒｌ”＋“Ｇ”組合鍵打開立即窗口，可以顯示有關變量。上一頁返回９.９ＶＢＡ與宏９.９.１ＶＢＡ與宏的區(qū)別宏相當于ＶＢＡ里面的Ｓｕｂ過程，即沒有返回值的函數(shù)，宏的用途是自動化頻繁使用的序列或者是獲得一種更強大抽象能力的一個快捷鍵。它和ＶＢＡ均屬于Ａｃｃｅｓｓ的編程工具，編程時，可以在ＶＢＡ代碼中執(zhí)行宏，也可以在宏操作中使用ＶＢＡ代碼。ＶＢＡ能對數(shù)據(jù)進行復雜的操作和分析，若要在Ａｃｃｅｓｓ２０１３代碼中運行宏操作，可使用ＤｏＣｍｄ對象及其方法。ＶＢＡ可以訪問操作系統(tǒng)函數(shù)并支持文檔打開時自動執(zhí)行宏。在Ａｃｃｅｓｓ中，通過宏或者用戶界面可以完成多項任務。而在其他數(shù)據(jù)庫系統(tǒng)中，要完成相同的任務就必須通過編程實現(xiàn)。下一頁返回９.９ＶＢＡ與宏使用宏還是使用ＶＢＡ取決于需要完成的任務。對于簡單的細節(jié)工作，如打開和關閉窗體、運行報表等，使用宏是一種很方便的方法，它可簡捷迅速地將已經(jīng)創(chuàng)建的數(shù)據(jù)庫對象聯(lián)系在一起?？烧J為宏是用ＶＢＡ代碼編寫的函數(shù)模塊，它不需要記住各種語法，通過“宏”名即可調用完成相應的任務。但對于下列情況，應該使用ＶＢＡ而不要使用宏。（１）維護數(shù)據(jù)庫。（２）使用內置函數(shù)或自行創(chuàng)建函數(shù)。（３）處理錯誤消息。上一頁下一頁返回９.９ＶＢＡ與宏９.９.２在ＶＢＡ中執(zhí)行宏一、ＶＢＡ與宏的聯(lián)用在ＶＢＡ代碼中，使用ＤｏＣｍｄ對象的ＲｕｎＭａｃｒｏ方法，可以執(zhí)行已創(chuàng)建好的宏。１.語法格式DoCmd.RunMacroMacroName[，RepeatCount][，RepeatExpression]２.說明ＭａｃｒｏＮａｍｅ：必選項,表示當前數(shù)據(jù)庫中要執(zhí)行的宏名稱。上一頁下一頁返回９.９ＶＢＡ與宏ＲｅｐｅａｔＣｏｕｎｔ：可選項，表示要執(zhí)行宏的次數(shù)，省略時只運行一次宏。ＲｅｐｅａｔＣｏｕｎｔ是一個整數(shù)值。ＲｅｐｅａｔＥｘｐｒｅｓｓｉｏｎ：可選項，在每次執(zhí)行宏時進行計算，當結果為Ｆａｌｓｅ（值為０）時，停止執(zhí)行宏。ＲｅｐｅａｔＥｘｐｒｅｓｓｉｏｎ是一個數(shù)值型表達式。９.９.３ＶＢＡ編程與數(shù)據(jù)庫一、數(shù)據(jù)庫引擎及其接口數(shù)據(jù)庫引擎是一組動態(tài)鏈接庫ＤＬＬ（ＤｙｎａｍｉｃＬｉｎｋＬｉｂｒａｒｙ），在程序運行時被連接到ＶＢＡ，實現(xiàn)對數(shù)據(jù)庫的數(shù)據(jù)訪問功能。上一頁下一頁返回９.９ＶＢＡ與宏它是應用程序與物理數(shù)據(jù)庫之間的橋梁。ＶＢＡ中可以使用訪問數(shù)據(jù)庫的三種接口：（１）ＯＤＢＣＡＰＩ（ＯｐｅｎＤａｔａＢａｓｅＣｏｎｎｅｃｔｉｖｉｔｙＡＰＩ）：“開放式數(shù)據(jù)庫連接”，是一種關系數(shù)據(jù)源的接口界面。ＯＤＢＣ基于ＳＱＬ（ＳｔｒｕｃｔｕｒｅｄＱｕｅｒｙＬａｎｇｕａｇｅ），把ＳＱＬ作為訪問數(shù)據(jù)庫的標準，一個應用程序通過一組通用代碼訪問不同的數(shù)據(jù)庫管理系統(tǒng)。使用ＯＤＢＣ方法進行連接數(shù)據(jù)庫時，微軟提供了開放服務結構，并建立了一組對數(shù)據(jù)庫的訪問標準ＡＰＩ，這些ＡＰＩ利用ＳＱＬ來完成其大部分任務。上一頁下一頁返回９.９ＶＢＡ與宏目前操作系統(tǒng)支持ＶＢＡ、Ｃ語言、Ｊａｖａ等多種語言連接數(shù)據(jù)庫，這些程序要訪問一個數(shù)據(jù)庫，首先必須用ＯＤＢＣ管理器注冊一個數(shù)據(jù)源，管理器根據(jù)數(shù)據(jù)源提供的數(shù)據(jù)庫位置、數(shù)據(jù)庫類型及ＯＤＢＣ驅動程序等信息，建立起ＯＤＢＣ與具體數(shù)據(jù)庫的聯(lián)系。只要應用程序將數(shù)據(jù)源名提供給ＯＤＢＣ，ＯＤＢＣ就能建立起與相應數(shù)據(jù)庫的連接，其使用步驟如下：?設置連接字符串。?實例化Ｃｏｍｍａｎｄ連接對象。?執(zhí)行Ｏｐｅｎ方法打開連接。上一頁下一頁返回９.９ＶＢＡ與宏?執(zhí)行ＳＱＬ語句。?將查詢操作結果賦給ＧｒｉｄＶｉｅｗ，將輸出表格中的一行數(shù)據(jù)源。?綁定ＧｒｉｄＶｉｅｗ。?關閉連接。（２）ＤＡＯ（ＤａｔａＡｃｃｅｓｓＯｂｊｅｃｔｓ）：“數(shù)據(jù)訪問對象”，是一種面向對象的界面接口，提供一個訪問數(shù)據(jù)庫的對象模型，用其中定義的一系列數(shù)據(jù)訪問對象，實現(xiàn)對數(shù)據(jù)庫的各種操作。使用ＤＡＯ的程序編碼非常簡單。上一頁下一頁返回９.９ＶＢＡ與宏ＶＢＡ通過ＤＡＯ和數(shù)據(jù)引擎既可以識別Ａｃｃｅｓｓ本身的數(shù)據(jù)庫，也可以識別外部數(shù)據(jù)庫，如ＶＦＰ（ＶｉｓｕａｌＦｏｘＰｒｏ）、文本文件數(shù)據(jù)庫和ＭｉｃｒｏｓｏｆｔＥｘｃｅｌ或Ｌｏｔｕｓ１－２－３電子表格等。ＤＡＯ模型是設計關系數(shù)據(jù)庫系統(tǒng)結構的對象類的集合，它們提供了管理關系型數(shù)據(jù)庫系統(tǒng)所需的全部操作的屬性和方法，這其中包括對數(shù)據(jù)庫連接、創(chuàng)建定義表、字段和索引命令、建立表之間的關系、定位和查詢數(shù)據(jù)庫等。其使用步驟如圖９.４８所示。（３）ＡＤＯ（ＡｃｔｉｖｅＸＤａｔａＯｂｊｅｃｔｓ）：“Ａｃｔｉｖｅ數(shù)據(jù)對象”，是基于組件的數(shù)據(jù)庫編程接口。上一頁下一頁返回９.９ＶＢＡ與宏ＡＤＯ實際是一種提供訪問各種數(shù)據(jù)類型的連接機制，是一個與編程語言無關的ＣＯＭ（ＣｏｍｐｏｎｅｎｔＯｂｊｅｃｔＭｏｄｅｌ）組件系統(tǒng)。ＡＤＯ設計為一種極簡單的格式，可以方便地連接任何符合ＯＤＢＣ標準的數(shù)據(jù)庫。其使用步驟如下：?使用Ｃｏｎｎｅｃｔｉｏｎ對象建立與數(shù)據(jù)庫的連接。?使用Ｃｏｍｍａｎｄ對象設置命令參數(shù)并發(fā)出命令。?使用ＲｅｃｏｒｄＳｅｔ對象存儲數(shù)據(jù)操作返回的記錄集。?使用Ｆｉｅｌｄ對象對記錄集中的字段數(shù)據(jù)進行操作，包括：定義和創(chuàng)建ＡＤＯ對象實例變量、返回Ｓｅｌｅｃｔ語句記錄集、采用Ｄｅｌｅｔｅ（刪除）、Ｕｐｄａｔｅ（更新）、Ｉｎｓｅｒｔ（插入）記錄操作。上一頁下一頁返回９.９ＶＢＡ與宏?關閉、回收相關對象。二、使用ＡＤＯ連接數(shù)據(jù)庫１.設置ＡＤＯ連接使用ＡＤＯ連接數(shù)據(jù)庫時，需要單擊【工具】菜單下的“引用”，在可使用的引用中將ＭｉｃｒｏｓｏｆｔＡｃｔｉｖｅＸＤａｔａＯｂｊｅｃｔｓ２.６選中，如圖９.４９所示。２.定義和創(chuàng)建ＡＤＯ對象實例變量?ＤｉｍｃｎｎＡｓＮｅｗＡＤＯＤＢ.Ｃｏｎｎｅｃｔｉｏｎ。?ＤｉｍｃｍＡｓＮｅｗＡＤＯＤＢ.Ｃｏｍｍａｎｄ。上一頁下一頁返回９.９ＶＢＡ與宏?ＤｉｍｒｓＡｓＮｅｗＡＤＯＤＢ.ＲｅｃｏｒｄＳｅｔ。?ＤｉｍｆｄＡｓＡＤＯＤＢ.Ｆｉｅｌｄ。３.打開數(shù)據(jù)庫連接cnn.Open[ConnectionStirng][,UserID][,PassWord][,