VBA模塊的編程過(guò)程

教學(xué)重點(diǎn)與難點(diǎn)

VBA的編程環(huán)境

常量、變量和數(shù)組

程序流程控制

創(chuàng)建VBA模塊12.1VBA編程環(huán)境Access利用VisualBasic編輯器(VBE)來(lái)編寫過(guò)程代碼，它以微軟的VisualBasic編程環(huán)境的布局為基礎(chǔ)，實(shí)際上是一個(gè)集編輯、調(diào)試、編譯等功能于一體的編程環(huán)境。所有的Office應(yīng)用程序都支持VisualBasic編程環(huán)境，而且其編程接口都是相同的。使用該編輯器可以創(chuàng)建過(guò)程，也可以編輯已有的過(guò)程。

幫助輸入

顯示提示信息

形成良好的程序設(shè)計(jì)風(fēng)格

使用書簽調(diào)試手段

下圖為一個(gè)VBE窗口，窗口中的各個(gè)部分已經(jīng)給出了相應(yīng)標(biāo)識(shí)。

12.2VBA程序設(shè)計(jì)基礎(chǔ)

VBA(VisualBasicforApplication)是VisualBasic語(yǔ)言的一個(gè)子集，集成了整個(gè)Office產(chǎn)品套件中的開發(fā)語(yǔ)言和開發(fā)環(huán)境。作為Office產(chǎn)品系列的一個(gè)重要組成部分，MicrosoftAccess也是使用VBA語(yǔ)言作為其代碼設(shè)計(jì)的開發(fā)語(yǔ)言。本節(jié)將簡(jiǎn)要介紹VBA語(yǔ)言的基本結(jié)構(gòu)和語(yǔ)法。

常量、變量和數(shù)組

數(shù)據(jù)類型

在VBA中，程序是由過(guò)程組成的，過(guò)程又由根據(jù)VBA規(guī)則書寫的指令組成。一個(gè)程序包括常量、變量、運(yùn)算符、語(yǔ)句、函數(shù)、數(shù)據(jù)庫(kù)對(duì)象和事件等基本要素。

常量變量數(shù)組

12.2.1常量、變量和數(shù)組

VBA語(yǔ)言的數(shù)據(jù)類型包括布爾型(Boolean)、日期型(Date)、字符串(String)、貨幣型(Currency)、字節(jié)型(Byte)、整數(shù)型(Integer)、長(zhǎng)整型(Long)、單精度型(Single)、雙精度型(Double)以及變體型(Variant)和用戶自定義型。

12.2.2數(shù)據(jù)類型12.3程序流程控制

與傳統(tǒng)的程序設(shè)計(jì)語(yǔ)言一樣，VisualBasic也具有結(jié)構(gòu)化程序設(shè)計(jì)的3種結(jié)構(gòu)：順序結(jié)構(gòu)、選擇(分支)結(jié)構(gòu)和循環(huán)結(jié)構(gòu)，下面重點(diǎn)介紹選擇結(jié)構(gòu)和循環(huán)結(jié)構(gòu)。

選擇結(jié)構(gòu)

循環(huán)結(jié)構(gòu)

選擇結(jié)構(gòu)有If語(yǔ)句和SelectCase語(yǔ)句兩種。

If語(yǔ)句是一類比較簡(jiǎn)單的條件控制語(yǔ)句，可以通過(guò)緊跟在If后面的表達(dá)式的值，判斷出在其影響范圍下的語(yǔ)句是否被執(zhí)行。

如果在If語(yǔ)句中，一個(gè)表達(dá)式有多個(gè)可選值，并且需要為這些可選值建立不同的執(zhí)行語(yǔ)句，例如選項(xiàng)組控件可以通過(guò)不同的值來(lái)判斷選項(xiàng)組中到底是按下哪個(gè)按鈕，這樣的語(yǔ)句設(shè)計(jì)通過(guò)If語(yǔ)句不方便實(shí)現(xiàn)，這時(shí)就需要使用SelectCase語(yǔ)句。

12.3.1選擇結(jié)構(gòu)

編程中經(jīng)常要需要重復(fù)執(zhí)行某些操作，這時(shí)就需要通過(guò)循環(huán)語(yǔ)句來(lái)判斷并執(zhí)行這些循環(huán)操作。VBA提供了多種循環(huán)控制語(yǔ)句，其中常用的包括Do…Loop語(yǔ)句、For…Next語(yǔ)句以及While…Wend語(yǔ)句等。

Do…Loop語(yǔ)句

For…Next語(yǔ)句

While…Wend語(yǔ)句

GoTo語(yǔ)句12.3.2循環(huán)結(jié)構(gòu)12.4Access對(duì)象模型Access提供的對(duì)象模型可以將數(shù)據(jù)庫(kù)功能與自定義的解決方案集成起來(lái)。通過(guò)使用Access對(duì)象模型，可以實(shí)現(xiàn)對(duì)事件編程、創(chuàng)建Access窗體和報(bào)表以及設(shè)置引用等。對(duì)象模型提供了一些對(duì)象，Access內(nèi)部應(yīng)用程序可以使用這些對(duì)象。

對(duì)象

對(duì)象集合對(duì)象模型

VBA與傳統(tǒng)語(yǔ)言的重要區(qū)別之一就是它是面向?qū)ο蟮摹?duì)象是VisualBasic程序設(shè)計(jì)的核心。事實(shí)上，窗體和控件都是對(duì)象，數(shù)據(jù)庫(kù)也是對(duì)象，對(duì)象到處都存在。一旦理解如何引用應(yīng)用程序?qū)ο竽Ｐ椭械膶?duì)象，就能夠使用對(duì)象及其特性來(lái)建立自己的解決方案。當(dāng)然，也可以將對(duì)象理解為封裝數(shù)據(jù)和代碼的客體，它是代碼和數(shù)據(jù)的集合。

屬性

方法事件12.4.1對(duì)象

對(duì)象集合是一個(gè)包含幾個(gè)其他對(duì)象的對(duì)象，而這些對(duì)象可具有不同的類型，并且對(duì)象的位置均可改變。Access窗體具有以下3種集合，如下圖所示，其中填充色為灰色的表示集合。

12.4.2對(duì)象集合

對(duì)象模型實(shí)際上給出了基于對(duì)象程序的結(jié)構(gòu)，通過(guò)定義程序中所使用對(duì)象之間的關(guān)系，對(duì)象模型能夠以一種比編程更容易的方式來(lái)組織對(duì)象。

Access中的窗體模型包括的對(duì)象類型有：控件、集合和集合中的對(duì)象。窗體對(duì)象模型的每個(gè)元素都具有一系列的屬性、方法和事件，可以利用方法使應(yīng)用程序按照要求進(jìn)行工作。在VBA中，各個(gè)對(duì)象之間也不是孤立的，而是彼此之間存在著包含與被包含的關(guān)系。

12.4.3對(duì)象模型12.5創(chuàng)建VBA模塊

模塊是將VBA代碼的聲明、語(yǔ)句和過(guò)程作為一個(gè)單元進(jìn)行保存的集合，是基本語(yǔ)言的一種數(shù)據(jù)庫(kù)對(duì)象，數(shù)據(jù)庫(kù)中的所有對(duì)象都可以在模塊中進(jìn)行引用。利用模塊可以創(chuàng)建自定義函數(shù)、子程序以及事件過(guò)程等，以便完成復(fù)雜的計(jì)算功能。模塊可以代替宏，并可以執(zhí)行標(biāo)準(zhǔn)宏所不能執(zhí)行的功能。模塊的定義和創(chuàng)建

過(guò)程的創(chuàng)建

過(guò)程的調(diào)用

Access模塊有兩種基本類型：類模塊和標(biāo)準(zhǔn)模塊。模塊中的每一個(gè)過(guò)程都可以是一個(gè)Function過(guò)程或一個(gè)Sub過(guò)程。

類模塊

標(biāo)準(zhǔn)模塊12.5.1模塊的定義和創(chuàng)建

過(guò)程是包含VBA代碼的基本單位，可以完成一系列指定的操作。過(guò)程由計(jì)算的語(yǔ)句和方法組成，通常分為Sub過(guò)程、Function過(guò)程和Property過(guò)程。其中，Sub過(guò)程是最常用的過(guò)程類型，也稱為命令宏，可以傳送參數(shù)和使用參數(shù)來(lái)調(diào)用它，但不返回任何值；Function過(guò)程也稱為自定義函數(shù)過(guò)程，其運(yùn)行方式和使用程序的內(nèi)置函數(shù)一樣，即通過(guò)調(diào)用Function過(guò)程獲得函數(shù)的返回值；Property過(guò)程能夠處理對(duì)象的屬性。

12.5.2過(guò)程的創(chuàng)建Call語(yǔ)句用來(lái)調(diào)用過(guò)程，也可調(diào)用VisualBasic的函數(shù)和自定義函數(shù)，兩者均采用如下的格式：

[Call]name[argumentlist]

其中name表示被調(diào)用過(guò)程的名稱，argumentlist表示參數(shù)列表，各參數(shù)間必須以逗號(hào)隔開。在窗體過(guò)程(例如事件過(guò)程)中可以直接調(diào)用標(biāo)準(zhǔn)模塊中的過(guò)程，但也可通過(guò)標(biāo)準(zhǔn)模塊的名稱來(lái)調(diào)用。在標(biāo)準(zhǔn)模塊的過(guò)程中調(diào)用窗體模塊中的過(guò)程時(shí)，必須以VisualBasic格式指出窗體名，例如“Form_員工信息.name”。12.5.3過(guò)程的調(diào)用12.6VBA代碼的保護(hù)

在開發(fā)數(shù)據(jù)庫(kù)產(chǎn)品以后，為了防止其他人查看或更改VBA代碼，需要對(duì)該數(shù)據(jù)庫(kù)的VBA代碼進(jìn)行保護(hù)。保護(hù)VBA代碼的措施主要有兩種：對(duì)VBA代碼設(shè)置密碼保護(hù)或生成MDE文件保護(hù)。

設(shè)置密碼保護(hù)VisualBasic代碼

生成ACCDE文件

用戶可以通過(guò)對(duì)VBA代碼設(shè)置密碼來(lái)防止其他非法用戶查