Access應(yīng)用技術(shù)（第二版）課件第07章

第7章

窗體對象功能設(shè)計(jì)本章學(xué)習(xí)目標(biāo)：學(xué)習(xí)Access2007窗體對象功能分析方法學(xué)習(xí)并掌握VBE的使用方法學(xué)習(xí)并掌握在窗體設(shè)計(jì)視圖中進(jìn)行窗體對象功能程序設(shè)計(jì)的方法完成“零售商店管理信息系統(tǒng)”中三個主要窗體的功能設(shè)計(jì)模仿實(shí)例，自行完成“零售商店管理信息系統(tǒng)”中其他窗體的功能設(shè)計(jì)通過第6章的學(xué)習(xí)，我們掌握了Access2007數(shù)據(jù)庫中窗體對象的界面設(shè)計(jì)方法。同時，通過實(shí)踐實(shí)現(xiàn)了“商品進(jìn)貨數(shù)據(jù)錄入”、“商品上柜數(shù)據(jù)錄入”、“銷售數(shù)據(jù)錄入”和“零售商店管理信息系統(tǒng)”等四個窗體對象的界面設(shè)計(jì)，但是它們的功能尚未實(shí)現(xiàn)。因此，本章先來分析一下這些窗體應(yīng)該具備一些什么樣的功能。第7章窗體對象功能設(shè)計(jì)7.1窗體對象功能分析

Access2007數(shù)據(jù)庫應(yīng)用系統(tǒng)中的窗體對象主要用于形成人機(jī)操作界面，操作者將在這個界面上完成自己份內(nèi)的工作?？梢跃偷?章中分析得到的三個窗體對象進(jìn)行功能分析。7.1.1“商品進(jìn)貨數(shù)據(jù)錄入”窗體功能分析這個窗體提供的操作界面供商店管理人員使用，商店管理人員通過在這個窗體界面上的操作，完成進(jìn)貨數(shù)據(jù)（包括商品貨號、商品名稱、商品規(guī)格、計(jì)量單位、進(jìn)貨單價、進(jìn)貨數(shù)量等等）的錄入。每一項(xiàng)進(jìn)貨數(shù)據(jù)輸入完畢，都必須根據(jù)本次進(jìn)貨商品數(shù)據(jù)修改“庫存數(shù)據(jù)記錄”數(shù)據(jù)表中的對應(yīng)數(shù)據(jù)（比如，庫存數(shù)量=原庫存數(shù)量+本次進(jìn)貨數(shù)量），以保證“庫存數(shù)據(jù)記錄”數(shù)據(jù)表中數(shù)據(jù)的正確性。同時，還應(yīng)該記錄的數(shù)據(jù)包括“進(jìn)貨日期”、“收貨人”和“供貨商”等數(shù)據(jù)?；谏鲜龇治?，需要在“商品進(jìn)貨數(shù)據(jù)錄入”窗體對象中編寫三段程序：“PrivateSubText19_AfterUpdate()”、“PrivateSubCommand35_Click()”和“PrivateSubCommand47_Click()”。其中假定標(biāo)簽為“進(jìn)貨貨號”的文本框“名稱”屬性值為“Text19”，位于窗體頁腳中的“保存記錄”命令按鈕的“名稱”屬性值為“Command35”，位于窗體頁腳中的“退出”命令按鈕的“名稱”屬性值為“Command47”。7.1.1“商品進(jìn)貨數(shù)據(jù)錄入”窗體功能分析這個窗體提供的操作界面也是供商店管理人員使用的，當(dāng)商店管理人員在發(fā)現(xiàn)某些商品的柜存數(shù)量偏少時，必須將這些商品由庫存中搬至銷售柜臺上?？疾焐唐窋?shù)據(jù)流，也就是減少“庫存數(shù)據(jù)記錄”數(shù)據(jù)表中的對應(yīng)商品庫存數(shù)據(jù)記錄，并增加“柜存數(shù)據(jù)記錄”數(shù)據(jù)表中的對應(yīng)商品柜存數(shù)據(jù)記錄。商店管理人員通過在這個窗體界面上的操作，完成上柜商品數(shù)據(jù)（包括商品貨號、商品名稱、商品規(guī)格、計(jì)量單位、銷售單價、上柜數(shù)量等等）的錄入。每一項(xiàng)上柜數(shù)據(jù)輸入完畢，都必須根據(jù)實(shí)際輸入的數(shù)據(jù)修改“庫存數(shù)據(jù)記錄”數(shù)據(jù)表中的對應(yīng)數(shù)據(jù)（庫存數(shù)量=原庫存數(shù)量-本次上柜數(shù)量），以保證“庫存數(shù)據(jù)記錄”數(shù)據(jù)表中數(shù)據(jù)的正確性。同時，還應(yīng)該修改“柜存數(shù)據(jù)記錄”數(shù)據(jù)表中的對應(yīng)數(shù)據(jù)（柜存數(shù)量=原柜存數(shù)量+本次上柜數(shù)量）。最后，還應(yīng)該記錄的數(shù)據(jù)包括“上柜日期”、“上柜人”和“營業(yè)員”等數(shù)據(jù)。7.1.2“商品上柜數(shù)據(jù)錄入”窗體功能分析基于上述分析，需要在“商品上柜數(shù)據(jù)錄入”窗體對象中編寫四段程序：“PrivateSubText19_AfterUpdate()”、“PrivateSubCommand35_Click()”、“PrivateSubCommand47_Click()”和“PrivateSubCommand63_Click()”。其中，假定標(biāo)簽為“商品貨號”的文本框“名稱”屬性值為“Text19”，位于窗體頁腳中的“保存數(shù)據(jù)”命令按鈕的“名稱”屬性值為“Command35”，位于窗體頁腳中的“退出”命令按鈕的“名稱”屬性值為“Command47”，位于窗體頁腳中的“查閱庫存商品數(shù)據(jù)記錄”命令按鈕的“名稱”屬性值為“Command63”。7.1.2“商品上柜數(shù)據(jù)錄入”窗體功能分析

營業(yè)員出售商品并將其出售商品的種類與數(shù)量等信息記錄在“銷售數(shù)據(jù)記錄”數(shù)據(jù)表中，這一職責(zé)稱為“銷售數(shù)據(jù)錄入”。從管理職能上講，售貨員僅有權(quán)以銷售單價出售存放在銷售柜臺上的商品，無權(quán)訪問庫存商品記錄。而任一商品的銷售單價均由管理人員通過“商品上柜數(shù)據(jù)錄入”操作予以指定，售貨員無權(quán)更改。在為營業(yè)員設(shè)計(jì)操作方式時，可以這樣考慮，營業(yè)員首先必須在位于“銷售數(shù)據(jù)錄入”窗體頁眉中的標(biāo)簽為“銷售日期”的文本框控件中輸入當(dāng)天的日期，而后在位于“銷售數(shù)據(jù)錄入”窗體頁眉中的標(biāo)簽為“營業(yè)員”的組合框控件中選定自己的姓名。此時，位于“銷售數(shù)據(jù)錄入”窗體主體中的子數(shù)據(jù)表中顯示該營業(yè)員當(dāng)天的全部銷售數(shù)據(jù)。7.1.3“銷售數(shù)據(jù)錄入”窗體功能分析基于上述分析，需要在“銷售數(shù)據(jù)錄入”窗體對象中編寫五段程序：“PrivateSubCombo45_AfterUpdate()”、“PrivateSubText19_AfterUpdate()”、“PrivateSubCommand35_Click()”、“PrivateSubCommand47_Click()”和“PrivateSubText27_LostFocus()”。其中，假定位于窗體頁眉中的標(biāo)簽為“營業(yè)員”的組合框“名稱”屬性值為“Combo45”，位于窗體頁眉中的標(biāo)簽為“商品貨號”的文本框“名稱”屬性值為“Text19”，位于窗體頁腳中的“現(xiàn)金收訖”命令按鈕的“名稱”屬性值為“Command35”，位于窗體頁腳中的“退出”命令按鈕的“名稱”屬性值為“Command47”，位于窗體頁眉中的標(biāo)簽為“銷售數(shù)量”的文本框“名稱”屬性值為“Text27”。除此之外，還需要為位于窗體頁腳中的“柜存信息”命令按鈕編寫調(diào)用宏對象的方法，這將留待后續(xù)章節(jié)介紹。7.1.3“銷售數(shù)據(jù)錄入”窗體功能分析7.2Access2007編程環(huán)境

Access2007的編程環(huán)境為MicrosoftVisualBasicEditor（簡稱為VBE）。這是一個MicrosoftOffice套件軟件公用的一個程序編輯系統(tǒng)，具有豐富的功能。7.2.1啟動VBE

Access2007數(shù)據(jù)庫中包含的程序創(chuàng)建與編輯調(diào)試環(huán)境均為VBE，但是啟動VBE的方式可以不同。1．創(chuàng)建VBA程序模塊所謂VBA程序模塊是指包含在窗體、報表等數(shù)據(jù)庫基本對象之中的事件處理方法，這樣的程序模塊僅在本對象處于活動狀態(tài)下有效。例如，在上一節(jié)中分析得到的那些方法（程序）即屬于這一類型?，F(xiàn)以“商品進(jìn)貨數(shù)據(jù)錄入”窗體對象中包含的VBA程序模塊編寫為例，說明啟動VBE的方法。首先進(jìn)入“商品進(jìn)貨數(shù)據(jù)錄入”窗體設(shè)計(jì)視圖；接著選定需要對之編寫方法的對象，例如選定位于窗體頁眉中標(biāo)簽為“進(jìn)貨貨號”的文本框控件；單擊“工具”邏輯組中的“屬性標(biāo)”按鈕，隨之出現(xiàn)這個文本框控件的屬性表對話框，如圖7-2-1所示。圖7-2-1Text19文本框控件屬性表對話框中的事件屬性卡1．創(chuàng)建VBA程序模塊由于Access2007中的程序?qū)嵸|(zhì)上是處理相關(guān)事件的方法，因此需要選擇屬性對話框中的“事件”屬性卡。觀察圖7-2-1所示，可以看到文本框控件可以處理的事件包括“單擊”、“更新前”、“更新后”等等共17項(xiàng)，每一項(xiàng)事件的含義如同事件名稱所述。為了編寫位于“商品進(jìn)貨數(shù)據(jù)錄入”窗體頁眉中標(biāo)簽為“進(jìn)貨貨號”的文本框控件處理“更新后”事件的VBA程序，應(yīng)該在“Text19”文本框控件的“更新后”事件行右側(cè)單擊“生成器”按鈕

，出現(xiàn)“選擇生成器”對話框，如圖7-2-2所示。1．創(chuàng)建VBA程序模塊圖7-2-2“選擇生成器”對話框1．創(chuàng)建VBA程序模塊圖7-2-3VBE界面1．創(chuàng)建VBA程序模塊2．編輯VBA程序模塊如果已經(jīng)在一個窗體中編寫了一些VBA程序，需要對之進(jìn)行修改編輯，當(dāng)然也可以采用上述方式啟動VBE。另外，還可以有一個更加方便的方式。在一個窗體對象設(shè)計(jì)視圖中，單擊“工具”邏輯組中的“查看代碼”按鈕，也可以啟動VBE。采用這樣的方式啟動VBE，在VBE代碼窗口中將顯示當(dāng)前選中的窗體對象包含的代碼。在VBE代碼窗口中，即可針對這個窗體對象包含的VBA程序代碼實(shí)施編輯操作。7.2.2VBE界面在圖7-2-3所示VBE界面的頂部，包含三行工具欄。自上而下，這三行工具欄分別為：（1）“標(biāo)準(zhǔn)”工具欄“標(biāo)準(zhǔn)”工具欄包含幾個常用的菜單項(xiàng)快捷方式的按鈕。（2）“編輯”工具欄“編輯”工具欄包含幾個在編輯代碼時經(jīng)常使用的常用菜單項(xiàng)快捷方式的按鈕。（3）“調(diào)試”工具欄“調(diào)試”工具欄包含了在調(diào)試代碼中常用的菜單快捷方式的按鈕。1．VBE工具欄2．VBE窗口

VBE使用多種不同窗口來顯示不同對象或是完成不同任務(wù)。VBE中的窗口有：代碼窗口、立即窗口、本地窗口、對象瀏覽器、工程資源管理器、屬性窗口、工具箱、用戶窗體窗口和監(jiān)視窗口等。在VBE窗口的“視圖”菜單中包括了用于打開各種窗口的菜單命令。下面分別介紹各種窗口的使用。7.2.2VBE界面（1）代碼窗口圖7-2-7VBE代碼窗口2．VBE窗口圖7-2-8立即窗口示例2．VBE窗口（2）立即窗口圖7-2-9本地窗口2．VBE窗口（3）本地窗口圖7-2-10監(jiān)視窗口2．VBE窗口（4）監(jiān)視窗口圖7-2-11對象瀏覽器2．VBE窗口（5）對象瀏覽器圖7-2-12工程資源管理器2．VBE窗口（6）工程資源管理器圖7-2-13屬性窗口2．VBE窗口（7）屬性窗口7.3VBA程序設(shè)計(jì)基礎(chǔ)

VBA數(shù)據(jù)類型繼承了傳統(tǒng)的Basic語言（如MicrosoftQuickBasic）的特點(diǎn)，在VBA應(yīng)用程序中，也需要對變量的數(shù)據(jù)類型進(jìn)行說明。VBA提供了較為完備的數(shù)據(jù)類型，Access2007數(shù)據(jù)表中的字段使用的主要數(shù)據(jù)類型在VBA中都有與之對應(yīng)的類型。

VBA數(shù)據(jù)類型、類型聲明符、數(shù)據(jù)類型和取值范圍如表7-3-1所示。7.3.1數(shù)據(jù)類型常量是指在程序運(yùn)行的過程中，其值不能被改變的量。常量的使用可以增加代碼的可讀性，并且使代碼更加容易維護(hù)。此外，使用固有常量——MicrosoftAccess、MicrosoftforAccessApplications以及MicrosoftVisualBasic等支持的常量，可以保證即使常量所代表的基礎(chǔ)值在MicrosoftAccess版本升級換代后也能使代碼正常運(yùn)行。除了直接常量（即通常的數(shù)值或字符串值常量，如：123，"Lee"等，也稱為字面常量）外，MicrosoftAccess2007還支持三種類型的常量。符號常量：用Const語句創(chuàng)建，并且在模塊中使用的常量。固有常量：是MicrosoftAccess2007或引用庫的一部分。系統(tǒng)定義常量：True、False和Null。1．常量7.3.2常量、變量與數(shù)組2．變量

變量實(shí)際上是一個符號地址，它代表了命名的存儲位置，包含在程序執(zhí)行階段修改的數(shù)據(jù)。每個變量都有變量名，在其作用域范圍內(nèi)可惟一識別。使用前可以指定數(shù)據(jù)類型（即采用顯式聲明），也可以不指定（即采用隱式聲明）。7.3.2常量、變量與數(shù)組變量名必須以字母字符開頭，在同一范圍內(nèi)必須是惟一的，不能超過255個字符，而且中間不能包含句點(diǎn)或類型聲明字符。雖然在代碼中允許使用未經(jīng)聲明的變量，但一個良好的編程習(xí)慣應(yīng)該是在程序開始幾行聲明將用于本程序的所有變量。這樣做的目的是為了避免數(shù)據(jù)輸入的錯誤，提高應(yīng)用程序的可維護(hù)性。對變量進(jìn)行聲明可以使用類型說明符號、Dim語句和DefType語句。2．變量（1）變量的聲明2．變量表7-3-2DefType語句和相應(yīng)的數(shù)據(jù)類型在聲明變量作用域時可以將變量聲明為Locate（本地）、Private（私有，Module模塊級）或Public（公共）。

本地變量：僅在聲明變量的過程中有效。在過程和函數(shù)內(nèi)部所聲明的變量，不管是否使用Dim語句，都是本地變量。本地變量具有在本地使用的最高優(yōu)先級，即當(dāng)存在與本地變量同名的模塊級的私有或公共變量時，模塊級的變量則被屏蔽。

私有變量：在所聲明的模塊中的所有函數(shù)和過程都有效。私有變量必須在模塊的通用聲明部分使用“Private變量名As數(shù)據(jù)類型”進(jìn)行聲明。

公共變量：在所有模塊的所有過程和函數(shù)都可以使用。在模塊通用聲明中使用“Public變量名As數(shù)據(jù)類型”聲明公共變量。2．變量（2）變量的作用域和生命周期2．變量模塊對象模塊APublicintA1asintegerPrivateintA2asintegerSubA1()本地變量私有變量intA2公共變量intA1,intB1EndSubSubA2()本地變量私有變量intA2公共變量intA1,intB1EndSub模塊BPublicintB1asintegerPrivateintB2asintegerSubB1()本地變量私有變量intB2公共變量intB1,intA1EndSubSubB2()本地變量私有變量inBt2公共變量intB1,intA1EndSub圖7-3-2變量作用域3．VBA數(shù)組

數(shù)組是由一組具有相同數(shù)據(jù)類型的變量（稱為數(shù)組元素）構(gòu)成的集合。（1）數(shù)組的聲明在VBA中不允許隱式說明數(shù)組，用戶可用Dim語句來聲明數(shù)組，聲明方式為：

Dim數(shù)組名(數(shù)組下標(biāo)上界)As數(shù)據(jù)類型（2）數(shù)組的使用數(shù)組聲明后，數(shù)組中的每個元素都可以當(dāng)作單個變量來使用，其使用方法與相同類型的普通變量一樣。其元素引用格式為：數(shù)組名(下標(biāo)值表)7.3.2常量、變量與數(shù)組7.3.3運(yùn)算符與表達(dá)式運(yùn)算是對數(shù)據(jù)的加工，最基本的運(yùn)算形式常?？梢杂靡恍┖啙嵉姆杹砻枋觯@些符號稱為運(yùn)算符或操作符。VBA提供了豐富的運(yùn)算符，可以構(gòu)成多種表達(dá)式。表達(dá)式是許多MicrosoftAccess2007操作的基本組成部分，是運(yùn)算符、常量、文字值、函數(shù)和字段名、控件和屬性的任何組合，可以使用表達(dá)式作為很多屬性和操作參數(shù)的設(shè)置；在窗體、報表和數(shù)據(jù)訪問頁中定義計(jì)算控件；在查詢中設(shè)置準(zhǔn)則或定義計(jì)算字段以及在宏中設(shè)置條件等等。算術(shù)運(yùn)算符是常用的運(yùn)算符，用來執(zhí)行簡單的算術(shù)運(yùn)算。VBA提供了8個算術(shù)運(yùn)算符，表6-7列出了這些算術(shù)運(yùn)算符。在8個算術(shù)運(yùn)算符中，除取負(fù)（-）是單目運(yùn)算符外，其它均為雙目運(yùn)算符。加（+），減（-），乘（*），取負(fù)（-）等1．算術(shù)運(yùn)算符與算術(shù)表達(dá)式

表6-7算術(shù)運(yùn)算符

1．算術(shù)運(yùn)算符與算術(shù)表達(dá)式

字符串連接（&）用來連接多個字符串（字符串相加）。例如：A$="My"B$="Home"C$=A$+B$運(yùn)算結(jié)果為：變量C$的值為"MyHome"。在VBA中，“+”既可用作加法運(yùn)算符，還可以用作字符串連接符，但“&”專門用作字符串連接運(yùn)算符，其作用與“+”相同。在有些情況下，用“&”比用“+”可能更安全。2．字符串連接符與字符串表達(dá)式(1)關(guān)系運(yùn)算符與關(guān)系表達(dá)式關(guān)系運(yùn)算符也稱比較運(yùn)算符，用來對兩個表達(dá)式的值進(jìn)行比較，比較的結(jié)果是一個邏輯值，即真（True）或假（False）。用關(guān)系運(yùn)算符連接兩個算術(shù)表達(dá)式所組成的表達(dá)式叫做關(guān)系表達(dá)式。VBA提供了6個關(guān)系運(yùn)算符，如表6-8所示。3．關(guān)系與邏輯運(yùn)算符、邏輯表達(dá)式及其取值3．關(guān)系與邏輯運(yùn)算符、邏輯表達(dá)式及其取值在VBA中，允許部分不同數(shù)據(jù)類型的量進(jìn)行比較，但要注意其運(yùn)算方法。關(guān)系運(yùn)算符的優(yōu)先次序如下：（1）=、<>或><的優(yōu)先級別相同，<、>、>=、<=優(yōu)先級別也相同，前兩種關(guān)系運(yùn)算符的優(yōu)先級別低于后四種關(guān)系運(yùn)算符。（最好不要出現(xiàn)連續(xù)的關(guān)系運(yùn)算，可以考慮將其轉(zhuǎn)化成多個關(guān)系表達(dá)式。）（2）關(guān)系運(yùn)算符的優(yōu)先級低于算術(shù)運(yùn)算符。（3）關(guān)系運(yùn)算符的優(yōu)先級高于賦值運(yùn)算符（=）。3．關(guān)系與邏輯運(yùn)算符、邏輯表達(dá)式及其取值(2)邏輯運(yùn)算符邏輯運(yùn)算也稱布爾運(yùn)算，由邏輯運(yùn)算符連接兩個或多個關(guān)系式，組成一個布爾表達(dá)式。

VBA的邏輯運(yùn)算符有表6-9所列6種：表6-10列出了邏輯運(yùn)算真值表。3．關(guān)系與邏輯運(yùn)算符、邏輯表達(dá)式及其取值3．關(guān)系與邏輯運(yùn)算符、邏輯表達(dá)式及其取值表6-10邏輯運(yùn)算真值表

3．關(guān)系與邏輯運(yùn)算符、邏輯表達(dá)式及其取值（1）對象運(yùn)算符對象運(yùn)算表達(dá)式中使用!和.

兩種運(yùn)算符，使用對象運(yùn)算符指示隨后將出現(xiàn)的項(xiàng)目類型。①！運(yùn)算符！運(yùn)算符的作用是指出隨后為用戶定義的內(nèi)容。使用!運(yùn)算符可以引用一個開啟的窗體、報表或開啟窗體或報表上的控件。表9-7列出了3種引用方式。②.(點(diǎn))運(yùn)算符.(點(diǎn))運(yùn)算符通常指出隨后為MicrosoftAccess定義的內(nèi)容。例如，使用.(點(diǎn))運(yùn)算符可引用窗體、報表或控件等對象的屬性。4．對象運(yùn)算符與對象運(yùn)算表達(dá)式（2）在表達(dá)式中引用對象在表達(dá)式中可以使用標(biāo)識符來引用一個對象或?qū)ο蟮膶傩?。例如，可以引用一個開啟的報表的Visible屬性：Reports！[發(fā)貨單]！[貨主國家].Visible，[發(fā)貨單]引用“報表”集合中的“發(fā)貨單”報表，[貨主國家]引用“發(fā)貨單”報表上的“運(yùn)貨商”控件。例如：將標(biāo)簽0的顏色設(shè)置為紅