宏和模塊的應(yīng)用

宏和模塊的應(yīng)用第一頁，共三十四頁，2022年，8月28日

宏和模塊都是開發(fā)數(shù)據(jù)庫系統(tǒng)重要的對象，通過宏和模塊，可以實現(xiàn)眾多數(shù)據(jù)庫系統(tǒng)的自動化處理和交互功能。本章將詳細(xì)介紹宏和模塊的應(yīng)用。宏與宏組的定義宏的條件操作宏與宏組的創(chuàng)建模塊的概述模塊的創(chuàng)建模塊的應(yīng)用

第二頁，共三十四頁，2022年，8月28日7.1宏與宏組

宏是由一些操作組成的集合，創(chuàng)建這些操作可幫助用戶自動完成常規(guī)任務(wù)。共同存儲在一個宏名下的相關(guān)宏的集合，稱為宏組，它通常只作為一個宏引用。通過使用宏組，用戶可以同時執(zhí)行多個任務(wù)。本節(jié)將詳細(xì)介紹宏與宏組的應(yīng)用。7.1.1宏的定義宏是由一個或多個操作組成的集合，其中每個操作都實現(xiàn)特定的功能，例如打開某個窗體或打印某個報表，因此利用宏，可以自動完成一些常規(guī)任務(wù)。例如執(zhí)行一個宏，用于在用戶單擊某個命令按鈕時退出數(shù)據(jù)庫系統(tǒng)，如圖所示。第三頁，共三十四頁，2022年，8月28日7.1宏與宏組7.1.2宏組的定義

宏可以是由一系列操作組成的一個宏，也可以是一個宏組。如圖1所示的宏是由一系列操作組成的，當(dāng)每次運行該宏時，Access都將執(zhí)行這些操作。

如果宏組中包含很多宏，那么可以將相關(guān)的宏分到不同的宏組中，以便對數(shù)據(jù)庫的宏進(jìn)行管理（關(guān)于管理宏組的具體操作，請參考本章小節(jié)的介紹）。

在如圖2所示的宏組中，可以將宏組分成“系統(tǒng)”、“窗體”和“輔助功能”3個宏，其中“系統(tǒng)”宏執(zhí)行“Quit”操作；“輔助功能”宏執(zhí)行“Maximize”操作，而“窗體”宏則同時執(zhí)行“Close”、“OpenReport”、“OpenForm”3個操作。12第四頁，共三十四頁，2022年，8月28日7.1宏與宏組7.1.3宏的條件操作在某些特殊應(yīng)用下，需要為宏添加特定的條件，當(dāng)條件成立時才執(zhí)行宏中的一個或一系列操作。例如使用宏來驗證某個窗體的數(shù)據(jù)，當(dāng)用戶輸入一個特定值后，宏就自動顯示一條信息以作響應(yīng)，當(dāng)用戶輸入非特定的值后，宏就自動顯示另一條信息以作響應(yīng)，在這種情況下，即可為宏添加條件，以執(zhí)行滿足上述條件的宏的操作，控制宏的流程。1.條件操作的流程條件是一個計算結(jié)果為“True/False”或“是/否”的邏輯表達(dá)式，宏將根據(jù)條件結(jié)果的真或假進(jìn)行所設(shè)置的操作。運行宏時，Access將求出第一個條件表達(dá)式的結(jié)果。如果結(jié)果為真，Access就會執(zhí)行此行所設(shè)置的操作，以及緊接著此操作、且在“條件”列內(nèi)前加省略號的所有操作。然后，再執(zhí)行宏中所有其他“條件”列為空的操作，直到到達(dá)另一個表達(dá)式、宏名或宏的結(jié)尾為止。第五頁，共三十四頁，2022年，8月28日7.1宏與宏組

如果條件的結(jié)果為假，Access則會忽略相應(yīng)的操作以及緊接著此操作、且在【條件】字段內(nèi)前加省略號的操作，并移到下一個包含其他條件或“條件”列為空的操作行。2.條件操作的示例如圖1所示，名稱為“顯示分頁符”的宏只有在“條件”列的表達(dá)式為真（計數(shù)器文本框的值為10（代表10個記錄））時，才運行“SetValue”操作，即顯示分頁符控件。1第六頁，共三十四頁，2022年，8月28日7.2 宏與宏組的操作7.2.1通過設(shè)計視圖創(chuàng)建宏

與創(chuàng)建其他數(shù)據(jù)庫對象相比，宏的創(chuàng)建相對簡單得多，用戶只需在宏的設(shè)計視圖窗口上設(shè)置操作、注釋和操作參數(shù)即可。本例將為數(shù)據(jù)庫創(chuàng)建一個宏對象，并設(shè)置宏的操作為“OpenForm”，使之運行時可以打開指定的窗體。

通過設(shè)計視圖創(chuàng)建宏的操作步驟如下。（1）打開光盤中的“”練習(xí)文件，然后單擊【數(shù)據(jù)庫】窗口的【宏】按鈕，切換到【宏】窗格，接著單擊【新建】按鈕，如圖1所示。1

了解宏與宏組后，本節(jié)將重點介紹宏與宏組的創(chuàng)建、運行、調(diào)試等操作。第七頁，共三十四頁，2022年，8月28日7.2 宏與宏組的操作（2）打開宏的設(shè)計視圖窗口后，在【操作】列表框中選擇【OpenForm】選項，然后在【注釋】行中加入注釋，如圖1所示。（3）在【操作參數(shù)】欄的【窗體名稱】列表框中選擇【雇員部門】選項，指定操作的對象為【雇員部門】窗體，如圖2所示。（4）完成上述設(shè)置后，單擊窗口右上角的【關(guān)閉】按鈕，然后在彈出的對話框中單擊【是】按鈕，并在【另存為】對話框中設(shè)置宏的名稱為“OpenForm”，最后單擊【確定】按鈕，如圖3、圖4所示。1324第八頁，共三十四頁，2022年，8月28日7.2 宏與宏組的操作7.2.2通過宏生成器創(chuàng)建宏

使用上一小節(jié)創(chuàng)建的宏并沒有被對象指定為事件過程，即宏還是獨立的對象，不會因為其他對象的事件而響應(yīng)。如果要為對象創(chuàng)建作為其事件的宏，那么可以通過宏生成器來創(chuàng)建。操作過程很簡單，用戶只需打開對象的【屬性】對話框，然后指定事件，并通過宏生成器來創(chuàng)建宏即可。下面將為窗體中的命令按鈕對象的【單擊】事件創(chuàng)建一個打開窗口的宏。通過宏生成器創(chuàng)建宏的操作步驟如下。1（1）打開光盤中的“..\Example\Ch07\7.2.2.mdb”練習(xí)文件，然后單擊【數(shù)據(jù)庫】窗口的【窗體】按鈕切換到【窗體】窗格，接著打開【雇員】窗體的設(shè)計視圖，如圖1所示。第九頁，共三十四頁，2022年，8月28日7.2宏與宏組的操作（2）選擇窗體上的命名按鈕對象，然后單擊右鍵，并從打開的菜單中選擇【屬性】命令，打開命令按鈕的【屬性】對話框，如圖7-10所示。（3）打開命令按鈕的【屬性】對話框后，選擇【事件】選項卡，然后將光標(biāo)定位在【單擊】文本框內(nèi)，并單擊文本框后的按鈕，打開【選擇生成器】對話框后，選擇【宏生成器】選項，最后單擊【確定】按鈕，如圖2.圖3所示。（4）此時將打開【另存為】對話框和宏的設(shè)計視圖窗口，首先在【另存為】對話框中輸入宏的名稱，并單擊【確定】按鈕，如圖4所示。1234第十頁，共三十四頁，2022年，8月28日7.2 宏與宏組的操作

（5）接著在宏的設(shè)計視圖窗口中設(shè)置操作、注釋和操作參數(shù)，如圖1所示。（6）完成宏的設(shè)置后，單擊窗口右上角的【關(guān)閉】按鈕，然后在彈出的對話框中單擊【是】按鈕，保存宏的設(shè)計，如圖2、圖3所示。完成上述處理后，即可創(chuàng)建一個宏，而且這個宏被設(shè)置為命令按鈕的事件，如圖4所示。當(dāng)打開窗體后，只需單擊【打開雇員部門窗體】按鈕，即可打開【雇員部門】窗體，如圖5所示。12345第十一頁，共三十四頁，2022年，8月28日（1）打開光盤中的“..\Example\Ch07\7.2.3.mdb”練習(xí)文件，然后單擊【數(shù)據(jù)庫】窗口的【宏】按鈕切換到【宏】窗格，接著單擊【新建】按鈕，如圖1所示。7.2 宏與宏組的操作7.2.3創(chuàng)建與管理宏組宏組是宏的集合，它通常包括多個宏，可以執(zhí)行多個操作，幫助用戶完成不同的任務(wù)。當(dāng)宏組中包含了很多宏時，可以對這些宏進(jìn)行管理，讓每個宏都有對應(yīng)的名稱標(biāo)識，便于宏的應(yīng)用。本小節(jié)將介紹創(chuàng)建宏組、設(shè)置宏名稱以及管理宏組的方法。創(chuàng)建與管理宏組的操作步驟如下。1第十二頁，共三十四頁，2022年，8月28日7.2 宏與宏組的操作（2）打開宏的設(shè)計視圖窗口后，在【操作】列表框中選擇【OpenForm】選項，然后添加注釋，并從【窗體名稱】列表框中選擇【雇員】選項，如圖1所示。（3）再次在【操作】列表框中選擇【OpenForm】選項，然后添加注釋，并從【窗體名稱】列表框中選擇【雇員部門】選項，如圖2所示。（4）在【操作】列表框中選擇【OpenReport】選項，然后添加注釋，并從【報表名稱】列表框中選擇【雇員】選項，如圖3所示。123第十三頁，共三十四頁，2022年，8月28日7.2 宏與宏組的操作（5）此時在窗口的標(biāo)題欄上單擊右鍵，并從打開的菜單中選擇【宏名】命令，打開【宏名】列，如圖1所示。（6）在【宏名】列的第1行輸入宏名為“窗體”，然后在【宏名】列的第4行輸入宏名為“報表”，如圖2所示。（7）完成上述設(shè)置后，單擊窗口右上角的【關(guān)閉】按鈕，然后在彈出的對話框中單擊【是】按鈕，并在【另存為】對話框中設(shè)置宏的名稱為“OpenObject”，最后單擊【確定】按鈕，如圖3、圖4所示。1234第十四頁，共三十四頁，2022年，8月28日

（1）打開光盤中的“..\Example\Ch07\7.2.4.mdb”練習(xí)文件，然后單擊【數(shù)據(jù)庫】窗口的【窗體】按鈕切換到【窗體】窗格，接著打開【雇員】窗體的設(shè)計視圖。（2）在窗體的標(biāo)題欄上單擊右鍵，并從打開的菜單中選擇【屬性】命令，打開窗體的【屬性】對話框，如圖1所示。7.2 宏與宏組的操作7.2.4創(chuàng)建包含條件的宏為宏添加特定的條件，可以讓宏在滿足條件時才執(zhí)行宏中的一個或一系列操作。本例將為窗體的【打開】事件創(chuàng)建一個包含條件的宏，讓宏在窗體的【薪金】字段沒有數(shù)據(jù)時，打開提示對話框，并顯示“雇員薪金保密！”信息。創(chuàng)建包含條件的宏的操作步驟如下。1第十五頁，共三十四頁，2022年，8月28日（3）打開對話框后，選擇【事件】選項卡，然后將光標(biāo)定位在【打開】文本框上，并單擊文本框后面的按鈕，打開【選擇生成器】對話框后，選擇【宏生成器】選項，最后單擊【確定】按鈕，如圖1、圖2所示。（4）打開【另存為】對話框后，設(shè)置宏的名稱為“MsgBox”，然后單擊【確定】按鈕，創(chuàng)建一個宏，如圖3所示。（5）打開宏的設(shè)計視圖窗口后，分別設(shè)置宏的操作、注釋、操作參數(shù)，結(jié)果如圖4所示。7.2 宏與宏組的操作1234第十六頁，共三十四頁，2022年，8月28日（6）完成上述設(shè)置后，單擊窗口右上角的【關(guān)閉】按鈕，然后在彈出的對話框中單擊【是】按鈕，保存宏的設(shè)計，如圖1所示。（7）此時返回窗體的設(shè)計視圖，然后單擊窗口右上角的【關(guān)閉】按鈕，并在彈出的對話框中單擊【是】按鈕，保存窗體的設(shè)計，如圖2所示。（8）返回【數(shù)據(jù)庫】窗口后，雙擊【雇員】項目，打開【雇員】窗體，此時將運行宏，即打開信息提示框，并顯示“雇員薪金保密！”信息，如圖3所示。7.2 宏與宏組的操作123第十七頁，共三十四頁，2022年，8月28日1.運行宏運行宏有以下方法：（1）若要從【宏】窗口中執(zhí)行宏，可以單擊工具欄上的【運行】按鈕，如圖1所示。（2）若要從【數(shù)據(jù)庫】窗口中運行宏，可以先選擇宏對象，然后單擊【運行】按鈕，或者雙擊相應(yīng)的宏對象，如圖2所示。（3）若要通過菜單運行宏，可以選擇【工具】→【宏】→【運行宏】命令，然后在【執(zhí)行宏】對話框的【宏名】列表中選擇宏，并單擊【確定】按鈕即可，如圖3所示。7.2.5宏的運行

在Access2003中，用戶可以直接運行某個宏，也可以運行宏組中的宏、另一個宏或事件過程中的宏，還可以為響應(yīng)窗體、報表上或窗體、報表的控件上所發(fā)生的事件而運行宏。7.2 宏與宏組的操作123第十八頁，共三十四頁，2022年，8月28日2.運行宏組中的宏運行宏組的宏有以下方法：（1）將宏指定為窗體或報表的事件屬性時，使用以下語法來運行宏組的宏：宏組名.宏名。例如，如果宏組“OpenObject”中有一個宏的名稱為“報表”（如圖1所示），則為事件屬性設(shè)置以下的語法，即可運行“報表”宏：OpenObject.報表，如圖2所示。（2）若要通過菜單運行宏組的宏，可以選擇【工具】→【宏】→【運行宏】命令，然后在【執(zhí)行宏】對話框的【宏名】文本框中輸入以“宏組名.宏名”為格式的宏代碼，即可運行該宏，如圖3所示。7.2 宏與宏組的操作123第十九頁，共三十四頁，2022年，8月28日

模塊基本上是由聲明、語句和過程組成的集合，它們作為一個已命名的單元存儲在一起，對MicrosoftVisualBasic代碼進(jìn)行組織。本節(jié)將對模塊進(jìn)行詳細(xì)的介紹。7.3 模塊的概述17.3.1模塊的類型

Access有“標(biāo)準(zhǔn)模塊”和“類模塊”兩種類型的模塊，它們的說明如下。1.標(biāo)準(zhǔn)模塊標(biāo)準(zhǔn)模塊包含與任何其他對象都無關(guān)的常規(guī)過程，以及可以從數(shù)據(jù)庫任何位置運行的、經(jīng)常使用的過程。標(biāo)準(zhǔn)模塊和與某個特定對象無關(guān)的類模塊的主要區(qū)別在于其范圍和生命周期，在沒有相關(guān)對象的類模塊中，聲明或存在的任何變量或常量的值都僅在該代碼運行時、僅在該對象中可用。在標(biāo)準(zhǔn)模塊中，可以放置希望供整個數(shù)據(jù)庫的其他過程使用的Sub和Function過程，如圖1所示。第二十頁，共三十四頁，2022年，8月28日7.3 模塊的概述12.類模塊

該模塊可以包含新對象的定義的模塊，一個類的每個實例都新建一個對象，而且在模塊中定義的過程將成為該對象的屬性和方法。另外，類模塊可以單獨存在，也可以與窗體和報表一起存在，其中窗體模塊包含了在指定的窗體或控件上，事件發(fā)生時所觸發(fā)的所有事件過程的代碼；而報表模塊則包含了由在指定的報表或控件上，事件發(fā)生時所觸發(fā)的所有事件過程的代碼。

窗體模塊和報表模塊通常都含有事件過程，事件過程的運行用于響應(yīng)窗體或報表上的事件，用戶可以使用事件過程來控制窗體或報表的行為，以及它們對用戶操作的響應(yīng)，如打開窗體，如圖1所示。第二十一頁，共三十四頁，2022年，8月28日7.3.2模塊的過程

過程是由MicrosoftVisualBasic代碼組成的單元，它包含一系列執(zhí)行操作或計算值的語句和方法。例如下列代碼表示的事件過程即使用“OpenForm”方法打開【登錄】窗體：

PrivateSubOpenOrders_Click()DoCmd.OpenForm"登錄“

EndSub

在Access2003中，模塊的過程分為“Sub過程”和“Function過程”兩種類型，它們的說明如下：7.3 模塊的概述11.Sub過程

Sub過程是用于執(zhí)行操作的過程。與Function過程不同，Sub過程不返回值，并使用Sub語句開始Sub過程，使用EndSub語句結(jié)束過程，如圖1所示。第二十二頁，共三十四頁，2022年，8月28日

數(shù)據(jù)庫中每個窗體和報表都有內(nèi)置的窗體模塊（該模塊包含了在指定的窗體或其控件上事件發(fā)生時所觸發(fā)的所有事件過程的代碼）或報表模塊（該模塊包含了由在指定報表或其控件上發(fā)生的事件所觸發(fā)的所有事件過程的代碼），這些模塊是包含事件過程模板。用戶可以向其中添加代碼，使得當(dāng)窗體、報表或其上的控件發(fā)生相應(yīng)的事件時，運行這些代碼。2.Function過程

Function過程是返回一個值并可用于表達(dá)式的過程。用Function語句可聲明一個函數(shù)，并用EndFunction語句結(jié)束該函數(shù)。因為函數(shù)有返回值，所以可以在表達(dá)式中使用。以下是Function過程的一個示例，F(xiàn)irstOfNextMonth函數(shù)返回下個月第一天的日期：

FunctionFirstOfNextMonth()FirstOfNextMonth=_DateSerial(Year(Now),Month(Now)+1,1)EndFunction

7.3 模塊的概述第二十三頁，共三十四頁，2022年，8月28日

這個自定義函數(shù)包含一個賦值語句，將表達(dá)式的結(jié)果（位于等號右側(cè)）賦予函數(shù)名FirstOfNextMonth（位于等號左側(cè)）。該函數(shù)使用了內(nèi)置的VisualBasic函數(shù)DateSerial、Year、Now和Month來計算結(jié)果，如圖1所示。7.3 模塊的概述1第二十四頁，共三十四頁，2022年，8月28日

在Access2003中，創(chuàng)建模塊需要通過MicrosoftVisualBasic編輯器編寫代碼來實現(xiàn)。本節(jié)將詳細(xì)介紹創(chuàng)建模塊的方法，以及相關(guān)模塊的應(yīng)用。7.4 模塊的創(chuàng)建

17.4.1創(chuàng)建模塊的方法想要創(chuàng)建模塊，可以先打開數(shù)據(jù)庫文件，然后在【數(shù)據(jù)庫】窗口中單擊【模塊】按鈕，切換到【模塊】窗格，接著單擊【新建】按鈕。此時系統(tǒng)將打開MicrosoftVisualBasic編輯器，用戶可以在打開的模塊代碼窗口中編寫模塊的代碼，如圖1所示。第二十五頁，共三十四頁，2022年，8月28日7.4 模塊的創(chuàng)建

12

本例將介紹為數(shù)據(jù)庫創(chuàng)建一個名為“OpenForm”的模塊，并通過MicrosoftVisualBasic編輯器添加模塊代碼，使該模塊可以打開【雇員部門】窗體。創(chuàng)建打開窗體模塊的操作步驟如下。（1）打開光盤中的“..\Example\Ch07\7.4.2.mdb”練習(xí)文件，然后在【數(shù)據(jù)庫】窗口中單擊【模塊】按鈕，切換到【模塊】窗格，再單擊【新建】按鈕，新建模塊，如圖1所示。（2）打開MicrosoftVisualBasic編輯器后，在代碼窗口中輸入模塊的代碼，如圖2所示。7.4.2創(chuàng)建打開窗體模塊第二十六頁，共三十四頁，2022年，8月28日7.4 模塊的創(chuàng)建

123（3）此時單擊工具欄的【保存】按鈕，打開【另存為】對話框后，輸入模塊的名稱，然后單擊【確定】按鈕，如圖1所示。（4）選擇【文件】→【關(guān)閉并返回到MicrosoftOfficeAccess】命令，關(guān)閉MicrosoftVisualBasic編輯器并返回Access程序，此時可以發(fā)現(xiàn)【數(shù)據(jù)庫】窗口中已經(jīng)創(chuàng)建了一個模塊對象，如圖2所示。（5）當(dāng)需要測試模塊的效果時，可以雙擊打開模塊對象，然后在MicrosoftVisualBasic編輯器中單擊【運行子過程/用戶窗體】按鈕運行模塊，如圖3所示。運行模塊的結(jié)果將打開【雇員部門】窗體。第二十七頁，共三十四頁，2022年，8月28日7.5 職業(yè)上機(jī)實戰(zhàn)—

編輯費用記錄數(shù)據(jù)庫1

本章針對數(shù)據(jù)庫的宏和模塊進(jìn)行了詳細(xì)的介紹，為了讓讀者更深刻地掌握宏和模塊的應(yīng)用，本節(jié)將通過一個例子，綜合介紹利用宏和模塊設(shè)計數(shù)據(jù)庫系統(tǒng)的方法。為費用記錄數(shù)據(jù)庫添加宏和模塊的操作步驟如下。

（1）打開光盤中的“..\Example\Ch07\7.5.mdb”練習(xí)文件，然后關(guān)閉數(shù)據(jù)庫的啟動窗體，并打開【按職員分類的費用報表】窗體的設(shè)計視圖，如圖1所示。第二十八頁，共三十四頁，2022年，8月28日7.5 職業(yè)上機(jī)實戰(zhàn)—

編輯費用記錄數(shù)據(jù)庫123（2）選擇窗體中的【費用報表】按鈕，然后在按鈕上單擊右鍵，并從打開的菜單中選擇【屬性】命令，如圖1所示。（3）打開對話框后選擇【事件】選項卡，然后將光標(biāo)定位在【單擊】文本框上，再單擊文本框后面的按鈕，打開【選擇生成器】對話框后，選擇【代碼生成器】選項，最后單擊【確定】按鈕，如圖2、圖3所示。第二十九頁，共三十四頁，2022年，8月28日（4）打開MicrosoftVisualBasic編輯器后，在代碼窗口中輸入以下代碼，使得用戶單擊【費用報表】按鈕后即打開【費用報表】窗體，如圖1所示。

OnErrorGoToErr_ExpenseReport_ClickIfIsNull(Me![EmployeeID])ThenMsgBox"進(jìn)入費用報表前輸入職員。"ElseDoCmd.DoMenuItemacFormBar,acRecordsMenu,acSaveRecord,,acMenuVer70DoCmd.OpenForm"費用報表"EndIfExit_ExpenseReport_Click:ExitSubErr_ExpenseReport_Click:MsgBoxErr.DescriptionResumeExit_ExpenseReport_Click7.5 職業(yè)上機(jī)實戰(zhàn)—

編輯費用記錄數(shù)據(jù)庫1第三十頁，共三十四頁，2022年，8月28日（5）輸入代碼后，單擊工具欄上的【保存】按鈕保存設(shè)置，然后選擇【文件】→【關(guān)閉并返回到MicrosoftOfficeAccess】命令，返回Access中，如圖1所示。（6）返回【數(shù)據(jù)庫】窗口后，切換到【宏】窗格，然后單擊【新建】按鈕，打開宏的設(shè)計視圖窗口后，設(shè)置如圖2所示的宏內(nèi)容。7.5 職業(yè)上機(jī)實戰(zhàn)—

編輯費用記錄數(shù)據(jù)庫12第三十一頁，共三十四頁，2022年，8月28日（7）此時單擊窗口右上角的【關(guān)閉】按鈕，并在彈出的對話框中單擊【是】按鈕，然后設(shè)置宏的名稱為“MsgBox”，最后保存起來，如圖1、圖2所示。（8）再次打開【按職員分類的費用報表】窗體的設(shè)計視圖，然后打開窗體的【屬性】對話框，并選擇【事件】選項卡，接著為“打開”事件應(yīng)用“MsgBox