第12章-模塊與VBA設計

2024/9/19Access2013數(shù)據(jù)庫技術及應用

——配套電子課件主編:向隅第12章模塊與VBA設計【本章知識要點】了解VBA編程環(huán)境了解常量、變量、表達式及函數(shù)的概念掌握VBA流程控制了解VBA對象掌握VBA創(chuàng)建模塊的方法12.1VBA概述Access利用Office提供的統(tǒng)一VBA(VisualBasicforApplications)編輯器(Editor)來編寫過程代碼，它以微軟的VisualBasic編程環(huán)境為基礎，在VBA中可以編寫VBA函數(shù)和過程。實際上，VBA是一個集編輯、調(diào)試和編譯等功能于一體的編程環(huán)境。Access的VBA界面與Word、Excel和PowerPoint的VBA開發(fā)界面基本一致。

1.VBE界面MicrosoftAccess提供了多種啟動VBA編程環(huán)境的方法，方法如下：方法一：按Alt+F11組合鍵。方法二：在數(shù)據(jù)庫窗口中單擊菜單“工具”→“宏”→“VisualBasic編輯器”。方法三：單擊數(shù)據(jù)庫窗口中的“模塊”按鈕，然后雙擊要查看或編輯的模塊。方法四：單擊數(shù)據(jù)庫窗口的“模塊”按鈕，然后單擊數(shù)據(jù)庫窗口中的“新建”按鈕。12.1VBA概述12.1VBA概述菜單說明文件文件的保存、導入、導出、打印等基本操作編輯基本的編輯命令視圖控制VBA的視圖插入插入過程、模塊、類或文件調(diào)試調(diào)試程序的基本命令，包括監(jiān)視、設置斷點等運行運行程序的基本命令，如中斷、運行命令工具用來管理VB的類庫等的引用、宏以及VBA編輯器的選項外接程序管理外接程序窗口設置各窗口的顯示方式幫助用來獲取MicrosoftVisualBasic的鏈接幫助以及網(wǎng)絡幫助1.菜單12.1VBA概述2.工具欄12.1VBA概述3.窗口工程資源管理器窗口屬性窗口代碼窗口12.2VBA基礎知識VBA支持多種數(shù)據(jù)類型，為用戶編寫程序提供了方便。12.2.1VBA數(shù)據(jù)類型數(shù)據(jù)類型符號數(shù)據(jù)名稱取值范圍存儲空間Byte

字節(jié)0~2551字節(jié)Boolean

布爾True或False2字節(jié)Integer%整型-32768~327672字節(jié)Long&長整型-2147483648~21474836474字節(jié)Single!單精度浮點型負數(shù)：-3.402823E38~-1.401298E-45正數(shù)：1.401298E-45~3.402823E384字節(jié)Double#雙精度浮點型負數(shù)：-1.79769313486232E308~-4.9406545841247E-324正數(shù)：4.9406545841247E-324~1.79769313486232E3088字節(jié)Currency@貨幣-922337203685477.5808~922337203685477.58088字節(jié)Decimal

十進制小數(shù)

14字節(jié)Date

日期/時間100年1月1日~9999年12月31日8字節(jié)Object

對象任何對象引用4字節(jié)String(fixed)$定長字符串1~大約65400字符串長String(variable)

變長字符串0~大約20億10字節(jié)+字符串字長Variant(數(shù)字)

變體數(shù)字型任何數(shù)字值，最大可達Double的范圍16字節(jié)Variant(字符)

變體字符型與變長String具有相同的范圍22字節(jié)+字符串長Type

自定義類型每個元素的范圍與它本身的數(shù)據(jù)類型的范圍相同所有元素所需數(shù)目12.2VBA基礎知識在Access2013中使用VBA時經(jīng)常要存儲程序的中間和最后結果，這時就要用到變量。1．變量變量是指程序執(zhí)行過程中其值發(fā)生變化的量。變量在使用前應該進行聲明。(1)變量的定義和引用VBA中通常使用Dim或Static語句顯示聲明局部變量。其定義格式如下：12.2.2變量和常量12.2VBA基礎知識Dim變量[As類型]Static變量[AS類型]例如：DimstrAsString聲明一個名為str的字符串變量str="Hello"給變量賦值VBA中對變量命名時必須遵守以下規(guī)則：1)變量名由字母、數(shù)字和下畫線組成，但必須以字母開頭。2)變量名的長度不能超過255個字符。3)變量名中不能出現(xiàn)空格、.、!、#、$、&等字符。4)變量名不能與關鍵字同名。5)在變量的作用域中，變量的名稱應該是唯一的。12.2.2變量和常量12.2VBA基礎知識(2)變量的作用域如果變量聲明語句出現(xiàn)在過程中，則該變量只可以在本過程中被調(diào)用；如果變量聲明語句出現(xiàn)在模塊中，則變量只能在該模塊的所有過程中使用。如果要擴大變量的使用范圍，如在項目中使它成為公用變量，可以在聲明語句中加入Public關鍵字。12.2.2變量和常量12.2VBA基礎知識1)Public語句作用：聲明一個公共模塊級別的變量，可應用于項目中的任何位置。語法：Public<變量>As<數(shù)據(jù)類型>示例：聲明一個公用的字符串類型變量：PublicStr1AsString2)Private語句作用：聲明一個私有的模塊級別的變量，該變量只能用在同一模塊的過程中。語法：Private<變量>As<數(shù)據(jù)類型>示例：定義一個私有型字符串變量。PrivateStr2AsString12.2.2變量和常量12.2VBA基礎知識3.Static語句使用該語句取代Dim語句時，所聲明的變量在調(diào)用時仍保留它原來的值。

4)OptionExplicit語句12.2.2變量和常量12.2VBA基礎知識(3)變量的默認值除Object類型外，其他數(shù)據(jù)類型的變量都有默認值。變量一經(jīng)聲明，則所有數(shù)值類型變量的初始值都為0，Boolean類型的初始值為False，String類型的初始值為空串，date類型的初始值為0時0分0秒。12.2.2變量和常量12.2VBA基礎知識(3)變量的默認值除Object類型外，其他數(shù)據(jù)類型的變量都有默認值。變量一經(jīng)聲明，則所有數(shù)值類型變量的初始值都為0，Boolean類型的初始值為False，String類型的初始值為空串，date類型的初始值為0時0分0秒。(4)數(shù)據(jù)類型之間的轉(zhuǎn)換類型轉(zhuǎn)換函數(shù)名(表達式)12.2.2變量和常量12.2VBA基礎知識數(shù)組數(shù)組表示一組具有相同數(shù)據(jù)類型的值。數(shù)組使用前需要聲明。聲明格式如下：Dim數(shù)組名稱(數(shù)組范圍)As數(shù)據(jù)類型。例：DimA(1to10)AsintegerDimB(10)AsString在VBA中可以定義多維數(shù)組，其格式如下：Dim數(shù)組名稱(數(shù)組范圍,數(shù)組范圍…)As數(shù)據(jù)類型。例：DimC(9,9)Asinteger12.2.2變量和常量12.2VBA基礎知識常量常量是指在程序執(zhí)行過程中其值不發(fā)生改變的量，即其值是固定的，不能被修改或賦予一個新值。字符串常量放在雙引號內(nèi)，日期/時間型常量放在一對#內(nèi)，如”中國”，#9/10/2017#。VBA中常量有兩種來源。系統(tǒng)內(nèi)部定義的常量用戶自定義的常量用戶使用Const語句自定義的常量。其語法格式如下：Const常量名[As類型]=表達式12.2.2變量和常量12.2VBA基礎知識1.算術運算符^、-、*、/、\、mod、+、-運算符的優(yōu)先順序^、-、(*,/)、\、mod、(+,-)從左到右依次降低。()中的運算符優(yōu)先順序相同。(2)對于整數(shù)整除運算符(\)，實際上就是求兩個整數(shù)之商的運算。(3)對于求模運算(Mod)，實際上就是求兩個整數(shù)相除后的余數(shù)。12.2.3VBA中的運算符與表達式12.2VBA基礎知識1.算術運算符date類型的數(shù)據(jù)也可進行算術運算，有下面幾種形式：①兩個日期型數(shù)據(jù)相減②一個日期型數(shù)據(jù)加一個整數(shù)③一個日期型數(shù)據(jù)減一個整數(shù)12.2.3VBA中的運算符與表達式12.2VBA基礎知識2.關系運算符關系運算符用來比較兩個操作數(shù)之間的大小關系，因此也稱為比較運算符。12.2.3VBA中的運算符與表達式運算符描述含義示例>

大于若a>b成立，則結果為True，否則結果為False1>2返回False>=大于等于若a>=b成立，則結果為True，否則結果為False3>=3返回True=等于若a=b成立，則結果為True，否則結果為False1=2返回False<

小于若a<b成立，則結果為True，否則結果為False1<2返回True<=小于等于若a<=b成立，則結果為True，否則結果為False2<=2返回True<>

不等于若a<>b成立，則結果為True，否則結果為False2<>2返回False12.2VBA基礎知識3.邏輯運算符邏輯運算符用來進行邏輯判斷。12.2.3VBA中的運算符與表達式abaandbaorbnotaaEqvbaXorbTrueTrueTrueTrueFalseTrueFalseTrueFalseFalseTrueFalseFalseTrueFalseTrueFalseTrueTrueFalseTrueFalseFalseFalseFalseTrueTrueFalse12.2VBA基礎知識4.字符串連接運算符VBA提供了兩個運算符號“&”和“+”用于字符串的連接運算。&運算符：強制兩個表達式執(zhí)行字符串的首尾連接。+運算符：若兩個表達式都是字符串，則執(zhí)行字符串的首尾連接，否則執(zhí)行算術加法運算。12.2.3VBA中的運算符與表達式12.2VBA基礎知識5.布爾運算符(1)Like(2)Is(3)In(4)Between…and…(5)!6.表達式表達式是用運算符將常量、變量、函數(shù)等連接起來的式子，書寫在一行上。表達式可分為算術表達式、關系表達式和邏輯表達式等。12.2.3VBA中的運算符與表達式12.2VBA基礎知識1.數(shù)學標準函數(shù)(1)abs(n)(2)sgn(n)(3)sqrt(n)(4)round(n,m)(5)Int(n)(6)Fix(n)(7)sin(n)(8)Cos(n)(9)Tan(n)(10)exp(n)12.2.4常用的標準函數(shù)12.2VBA基礎知識2.字符串函數(shù)(1)asc(C)(2)chr(N)(3)len(C)(4)trim(C)(5)Ltrim(C)(6)Rtrim(C)(7)Left(C,N)(8)Right(C,N)(9)Mid(C,m,n)(10)Instr(N,C1,C2)12.2.4常用的標準函數(shù)12.2VBA基礎知識3.日期/時間函數(shù)(1)Date(2)Time(3)Now()(4)Year(C|N)(5)Month(C|N)12.2.4常用的標準函數(shù)12.2VBA基礎知識4.轉(zhuǎn)換函數(shù)(1)val(C)(2)str(N)(3)cint(N)(4)hex(N)(5)OCT(N)12.2.4常用的標準函數(shù)12.2VBA基礎知識5.常用的驗證函數(shù)(1)IsNumeric(2)IsDate(3)IsNull(4)IsEmpty(5)IsArray(6)IsError(7)IsObject12.2.4常用的標準函數(shù)12.2VBA基礎知識1.書寫代碼的規(guī)則(1)不區(qū)分大小寫(2)使用注釋

使用rem或’(3)關于續(xù)行行尾加_2.賦值語句VBA中使用賦值號“=”對變量進行賦值。賦值語句的格式如下：[Let]<變量名>=<表達式>12.2.5程序流程控制12.2VBA基礎知識3.交互式輸入輸出(1)Inputbox函數(shù)InputBox函數(shù)格式如下：InputBox(prompt[,title][,default][,xpos][,ypos][,helpfile,context])(1)

prompt：必選項，消息框顯示的文本信息。(2)

title：可選項，對話框標題欄的文字。默認情況下，系統(tǒng)把應用程序名放入標題欄中。(3)

default：可選項。用于顯示文本框中的字符串表達式。(4)

xpos：可選項。為數(shù)字表達式，與ypos成對出現(xiàn)，指定對話框左側與屏幕左側的水平距離。如果省略xpos，則對話框會在水平方向居中。(5)

ypos：可選項。為數(shù)字表達式，與xpos成對出現(xiàn)，指定對話框上側與屏幕上側的距離。如果省略xpos，則對話框顯示在屏幕垂直方向距下側大約三分之一的位置。(6)

helpfile：可選項。為字符串表達式，可識別幫助文件，用該文件為對話框提供上下文相關的幫助。如果已提供helpfile，則必須提供context。(7)

context：可選項。為數(shù)字表達式，由幫助文件的作者指定某個幫助主題的幫助上下文編號。12.2.5程序流程控制12.2VBA基礎知識3.交互式輸入輸出(2)Msgbox函數(shù)MsgBox(prompt,[buttons][,title][,helpfile,context])參數(shù)說明：(1)

Prompt：必需，為字符串表達式，即顯示在對話框中的消息。Prompt的最大長度大約為1024個字符，由所用字符的寬度決定。(2)

Buttons：可選，用來指定顯示按鈕的數(shù)目及形式、使用的圖標樣式、默認按鈕是什么以及消息框的強制響應等。如果省略，則Buttons的默認值為0。(3)

Title：可選，為字符串表達式，顯示在對話框的標題欄中。如果省略title，則將應用程序名放在標題欄中。(4)

Helpfile：可選，為字符串表達式，識別用來向?qū)υ捒蛱峁┥舷挛南嚓P幫助的幫助文件。如果提供了helpfile，則必須提供context。(5)

Context：可選，數(shù)值表達式，由幫助文件的作者給適當?shù)膸椭黝}指定上下文編號。如果提供了context，則必須提供helpfile。12.2.5程序流程控制12.2VBA基礎知識4.流程控制語句(1)選擇結構語句

1)if語句

2)switch語句

3)Choose語句(2)循環(huán)結構

1)for…next循環(huán)

2)do…loop循環(huán)

3)while…wend循環(huán)12.2.5程序流程控制12.3VBA對象1.對象在面向?qū)ο笙到y(tǒng)中將一切事物(客觀存在的或抽象的)都抽象或模擬為一個整體，稱為對象。任何對象都有自己的特征和行為。特征是由它的各種屬性來描述，行為則由事件和方法來表達。2.屬性對象所具有的特征稱為對象的屬性。不同的對象具有不同的屬性。VBA是一種面向?qū)ο蟮木幊陶Z言，進行VBA開發(fā)，必須理解對象、屬性、方法和事件這幾個概念12.3VBA對象屬性的引用：對象.屬性名例：Text1.enabled=true3.方法方法是定義在對象上的操作，它可以對對象內(nèi)的數(shù)據(jù)進行操作、可以改變對象的屬性。方法是對象定義中的一部分。4.事件事件(Event)是指由系統(tǒng)預先定義，而后由用戶或系統(tǒng)觸發(fā)的一個動作。事件作用于對象，由對象來識別并做出相應的動作。12.3VBA對象Access常見事件表事件觸發(fā)方式打開(Open)打開窗體，但第一條記錄尚未顯示加載(Load)窗體打開并顯示記錄調(diào)整大小(Resize)窗體打開后，窗體大小被調(diào)整激活(Activate