Access宏對象的其他應(yīng)用實用教案

1、 由于宏的設(shè)計過程是一個人機對話的過程，它不要求設(shè)計者刻意地記憶命令、參數(shù)及其相關(guān)語法，因此是一種非常方便的編程工具。實際上，宏本身就是程序，只不過是一種控制(kngzh)方式簡單的程序而已。它由若干操作組成，一般情況下采用順序執(zhí)行的方式運行，也可以通過設(shè)置操作執(zhí)行的條件來實現(xiàn)操作執(zhí)行順序的跳轉(zhuǎn)。 自然會考慮能否利用宏設(shè)計視圖以人機對話的方式設(shè)計宏，然后將其轉(zhuǎn)換為對應(yīng)的VBA程序 .8.6.1 8.6.1 利用利用(lyng)(lyng)宏生成宏生成VBAVBA程序代碼程序代碼 第1頁/共17頁第一頁，共18頁。 首先首先,在數(shù)據(jù)庫設(shè)計視圖宏對象選項卡上選中需要在數(shù)據(jù)庫設(shè)計視圖宏對象選項卡上選

2、中需要(xyo)轉(zhuǎn)換為轉(zhuǎn)換為VBA程序的宏對象，然后在窗口菜單欄上依次單擊【工具】程序的宏對象，然后在窗口菜單欄上依次單擊【工具】|【宏】【宏】|【將宏【將宏轉(zhuǎn)換為轉(zhuǎn)換為Visual Basic代碼】命令，隨即彈出代碼】命令，隨即彈出“轉(zhuǎn)換宏轉(zhuǎn)換宏”對話框，單擊其上對話框，單擊其上的的“轉(zhuǎn)換轉(zhuǎn)換”按鈕按鈕“ ”，即完成了將宏轉(zhuǎn)換為，即完成了將宏轉(zhuǎn)換為VBA程序的過程。程序的過程。 第2頁/共17頁第二頁，共18頁。 例如，可以將例如，可以將“零售商店管理信息系零售商店管理信息系統(tǒng)統(tǒng)”數(shù)據(jù)庫中的宏數(shù)據(jù)庫中的宏“銷售記錄銷售記錄”轉(zhuǎn)換為對應(yīng)的轉(zhuǎn)換為對應(yīng)的VBA程序。其操作過程為：在數(shù)據(jù)庫設(shè)計視圖程

3、序。其操作過程為：在數(shù)據(jù)庫設(shè)計視圖宏對象選項卡上選中宏宏對象選項卡上選中宏“銷售記錄銷售記錄”，在窗口，在窗口菜單欄上依次單擊【工具】菜單欄上依次單擊【工具】|【宏】【宏】|【將宏轉(zhuǎn)【將宏轉(zhuǎn)換為換為Visual Basic代碼】命令，隨即彈出的代碼】命令，隨即彈出的“轉(zhuǎn)換宏轉(zhuǎn)換宏”對話框如圖對話框如圖8-15所示。根據(jù)需要在所示。根據(jù)需要在這個對話框中完成兩個這個對話框中完成兩個(lin )選項的選定選項的選定操作后，單擊操作后，單擊“轉(zhuǎn)換轉(zhuǎn)換”按鈕按鈕“ ”，即可將宏對象即可將宏對象“銷售記錄銷售記錄”轉(zhuǎn)換成為一個名為轉(zhuǎn)換成為一個名為“被轉(zhuǎn)換的宏被轉(zhuǎn)換的宏銷售記錄銷售記錄”的模塊對象，其的模

4、塊對象，其間包含著與宏間包含著與宏“銷售記錄銷售記錄”的功能完全相同功的功能完全相同功能的能的VBA程序代碼。程序代碼。 第3頁/共17頁第三頁，共18頁。圖圖8-15 “8-15 “轉(zhuǎn)換轉(zhuǎn)換(zhunhun)(zhunhun)宏宏”對話框?qū)υ捒?第4頁/共17頁第四頁，共18頁。 在“轉(zhuǎn)換宏”對話框中有兩個選項，選中后依次表示：轉(zhuǎn)換形成(xngchng)的VBA程序中包含進行出錯處理的On Error子程序段；轉(zhuǎn)換形成(xngchng)的VBA程序中包含關(guān)于宏對象的注釋。 此處，讓我們來看看轉(zhuǎn)換成的VBA程序代碼，其間包含出錯處理程序段和宏注釋。 第5頁/共17頁第五頁，共18頁。- 銷售記

5、錄(jl)_銷售記錄(jl)-Function 銷售記錄(jl)_銷售記錄(jl)()On Error GoTo 銷售記錄( jl)_銷售記錄(jl)_Err 打開“銷售數(shù)據(jù)錄入”窗體 D o C m d . O p e n F o r m 銷 售 數(shù) 據(jù) 錄 入 , acNormal, , , , acNormal If (Weekday(Date, 2) = 7) Then 若逢周日，給出提示 Beep MsgBox 今天周日，客流量較大，辛苦了！, vbOKOnly, 注意： End If第6頁/共17頁第六頁，共18頁。銷售記錄_銷售記錄_Exit: Exit Function銷售記錄

6、_銷售記錄_Err: MsgBox Error$ Resume 銷售記錄_銷售記錄_ExitEnd Function注意，由宏轉(zhuǎn)換成的VBA程序段是一個VBA函數(shù)(hnsh)“Function”，其調(diào)用方式不同于VBA子程序“Private Sub”。第7頁/共17頁第七頁，共18頁。 如果在一個Access數(shù)據(jù)庫中創(chuàng)建一個命名為“AutoExec”的宏對象，將得到這樣一種效果：一旦這個數(shù)據(jù)庫被打開，AutoExec宏對象中的第一個宏將得到執(zhí)行。這是因為，只要Access得到打開一個數(shù)據(jù)庫的操作(cozu)指令，它將在打開這個數(shù)據(jù)庫后立即去尋找其中是否存在一個命名為“AutoExec”的宏對象

7、，如果找到，則運行它。 8.6.2 8.6.2 啟動時自動啟動時自動(zdng)(zdng)運行的宏運行的宏AutoExec AutoExec 第8頁/共17頁第八頁，共18頁。合理地使用這個命名為AutoExec的特殊宏，可在首次打開數(shù)據(jù)庫時執(zhí)行一個或一系列的操作，包括某些應(yīng)用系統(tǒng)初始參量的設(shè)定、打開應(yīng)用系統(tǒng)操作主窗口等等。在實例(shl)“零售商店管理信息系統(tǒng)”數(shù)據(jù)庫中，設(shè)計有一個名為“AutoExec”的宏對象，其間包含一個操作：OpenForm 零售商店管理信息系統(tǒng), acNormal, , , , acNormal 這就使得當打開“零售商店管理信息系統(tǒng)”數(shù)據(jù)庫時，即會自動打開數(shù)據(jù)庫窗

8、體“零售商店管理信息系統(tǒng)”，而這個窗體是整個數(shù)據(jù)庫應(yīng)用系統(tǒng)的主控窗體。對于一個可以發(fā)布的數(shù)據(jù)庫應(yīng)用系統(tǒng)，這一項功能是非常必要的。 第9頁/共17頁第九頁，共18頁。 對于一個包含“AutoExec”宏的Access數(shù)據(jù)庫，如果想在打開(d ki)數(shù)據(jù)庫時阻止自動運行“AutoExec”宏，可在打開(d ki)數(shù)據(jù)庫時按住SHIFT鍵不放開，以此來阻止Access自動運行“AutoExec”宏。 除了可以利用“AutoExec”宏實現(xiàn)打開(d ki)數(shù)據(jù)庫時自動運行一個應(yīng)用程序以外，Access還提供另外一種實施方案：通過設(shè)置數(shù)據(jù)庫設(shè)計視圖窗口菜單欄上的【工具】|【啟動】命令，在隨即彈出的“啟動

9、”對話框中進行合適的選項設(shè)置，也可以控制如何啟動數(shù)據(jù)庫或應(yīng)用程序?！皢印睂υ捒蛉鐖D8-16所示，其中，我們設(shè)置啟動顯示窗體為“零售商店管理信息系統(tǒng)”。 第10頁/共17頁第十頁，共18頁。圖圖8-16 8-16 用于設(shè)置用于設(shè)置(shzh)(shzh)啟動程序的啟動程序的“啟動啟動”對話框?qū)υ捒?第11頁/共17頁第十一頁，共18頁。 在一般Windows應(yīng)用程序中，為了使用剪貼板進行對象的復制粘貼操作，除了可以利用菜單選項或工具按鈕實現(xiàn)以外，可能很多人都知道“C”是復制操作的組合式快捷鍵、“V”是粘貼操作的組合式快捷鍵，且非常習慣于使用它們。那么(n me)，在一個Access數(shù)據(jù)庫應(yīng)用系

10、統(tǒng)中，是否也可能出現(xiàn)對這種組合式快捷鍵的應(yīng)用需求呢？如果確實有這樣的需求，又該如何滿足它呢？ 8.6.3 8.6.3 響應(yīng)響應(yīng)(xingyng)(xingyng)組合鍵的宏組組合鍵的宏組AutoKeys AutoKeys 第12頁/共17頁第十二頁，共18頁。 為了滿足這種對于組合式快捷鍵的應(yīng)用需求，Access提供了另一個特殊(tsh)的宏對象名“AutoKeys”。在命名為“AutoKeys”的宏對象中，我們可以采用宏組的形式定義某些組合鍵按下后應(yīng)該進行的操作，從而為Access數(shù)據(jù)庫應(yīng)用系統(tǒng)提供一整套組合式快捷鍵功能。 第13頁/共17頁第十三頁，共18頁。 例如例如(lr):在實例在實

11、例“零售商店管理信息零售商店管理信息系統(tǒng)系統(tǒng) ”數(shù)據(jù)庫中，設(shè)計有一個名為數(shù)據(jù)庫中，設(shè)計有一個名為“AutoKeys”的宏對象，其間包含五個宏，每的宏對象，其間包含五個宏，每個宏包含一個個宏包含一個“RunMacro”操作，分別定義操作，分別定義了：了：“g”組合鍵執(zhí)行宏組合鍵執(zhí)行宏“柜存信息柜存信息”，“j”組合鍵執(zhí)行宏組合鍵執(zhí)行宏“進貨數(shù)據(jù)進貨數(shù)據(jù)”，“k”組合鍵執(zhí)組合鍵執(zhí)行宏行宏“庫存數(shù)據(jù)庫存數(shù)據(jù)”，“s”組合鍵執(zhí)行宏組合鍵執(zhí)行宏“上上柜數(shù)據(jù)柜數(shù)據(jù)”，“x”組合鍵執(zhí)行宏組合鍵執(zhí)行宏“銷售數(shù)據(jù)銷售數(shù)據(jù)”。在這個宏對象的支持下，按下上述任一組合鍵即在這個宏對象的支持下，按下上述任一組合鍵即可運

12、行相應(yīng)的宏，而這些宏又都分別包含打開某可運行相應(yīng)的宏，而這些宏又都分別包含打開某一個窗體對象的操作，因此使得打開相應(yīng)窗體對一個窗體對象的操作，因此使得打開相應(yīng)窗體對象的操作可以采用上述快捷鍵的方式進行，從而象的操作可以采用上述快捷鍵的方式進行，從而方便了操作者的操作過程。方便了操作者的操作過程。 實例實例“零售商店管理信息系統(tǒng)零售商店管理信息系統(tǒng) ”數(shù)據(jù)庫中的宏數(shù)據(jù)庫中的宏對象對象“AutoKeys”設(shè)計視圖及其對應(yīng)操作參數(shù)設(shè)計視圖及其對應(yīng)操作參數(shù)設(shè)置如圖設(shè)置如圖8-17所示。所示。 第14頁/共17頁第十四頁，共18頁。圖圖8-17 “AutoKeys”8-17 “AutoKeys”設(shè)計視圖

13、及其對設(shè)計視圖及其對應(yīng)應(yīng)(duyng)(duyng)操作參數(shù)設(shè)置操作參數(shù)設(shè)置 第15頁/共17頁第十五頁，共18頁。 注意注意:Access:Access本身已經(jīng)具有一些默認的組合式快捷鍵功能，如果本身已經(jīng)具有一些默認的組合式快捷鍵功能，如果(rgu)(rgu)利用利用AutoKeysAutoKeys宏對象定義的組合式快捷鍵與某一些宏對象定義的組合式快捷鍵與某一些AccessAccess默認默認的組合式快捷鍵功能沖突，則利用的組合式快捷鍵功能沖突，則利用AutoKeysAutoKeys宏對象定義的組合式快捷鍵功宏對象定義的組合式快捷鍵功能有效，而那些能有效，而那些AccessAccess默認的組合式快捷鍵功能無效。默認的組合式快捷鍵功能無效。 第16頁/共17頁第十六頁，共18頁。感謝您的觀看(gunkn)！第17頁/共17頁第十七頁