access模塊PPT課件

1、10101 1模塊的基本知識模塊的基本知識 模塊是Access 2003對象之一，起著存放用戶為實現(xiàn)某種操作而編寫的VBA代碼的作用，模塊中的每一個過程都可以是一個子程序或一個函數(shù)過程。其中子程序又稱為Sub過程，它完成某一特定的操作，沒有返回值，通常以Sub開始， End Sub結(jié)束。函數(shù)過程又稱為Function過程，是一種能返回具體值的過程，通常以Function，并以End Function語句結(jié)束。 第1頁/共85頁10101 11 1模塊的分類模塊的分類 在Access 2003中，有類模塊和標準模塊兩種。1 1類模塊類模塊 類模塊是指包含新對象定義的模塊，用戶每創(chuàng)建一個新對象，就

2、會新建一個類模塊。窗體模塊和報表模塊都是類模塊，它們各自與某一窗體或報表相聯(lián)。窗體和報表模塊通常都有含有事件過程，該過程用于響應(yīng)窗體或報表中的事件?？梢允褂檬录^程來控制窗體或報表的行為，以及它們對用戶操作的響應(yīng)。例如：用鼠標單擊某個命令按鈕。2 2標準模塊標準模塊 標準模塊是指存放在整個數(shù)據(jù)庫中可用的函數(shù)和子程序的模塊。標準模塊包括通用過程和常用過程。通用過程不與任何對象相關(guān)聯(lián)，常用過程可在數(shù)據(jù)庫的任何位置運行。 第2頁/共85頁10101 12 Microsoft Visual Basic2 Microsoft Visual Basic編輯編輯器器 Microsoft Visual Bas

3、ic編輯器是用于創(chuàng)建模塊的一個開發(fā)工具。1 1打開打開Microsoft Visual BasicMicrosoft Visual Basic編輯器編輯器 啟動Microsoft Visual Basic編輯器的方法主要有以下幾種。 (1)在數(shù)據(jù)庫窗口中，單擊“工具”菜單的“宏”命令，然后在“宏”子菜單中單擊“Visual Basic編輯”命令。 (2)在數(shù)據(jù)庫窗口中單擊“模塊”對象，然后單擊工具欄的“新建”按鈕。 (3)單擊“插入”菜單中的“模塊”命令。 (4)在窗體或報表的設(shè)計視圖中單擊工具欄中的“代碼”按鈕。 啟動后的Microsoft Visual Basic編輯器窗口如圖10-1所示

4、。 第3頁/共85頁圖10-1 Microsoft Visual Basic編輯器窗口第4頁/共85頁 在圖10-1窗口中，分為左右兩部分，其中左邊部分是“工程資源管理器”，當前數(shù)據(jù)庫中的所有模塊及Access 2003類對象都列在該窗口中，用戶可在窗口中選擇各種模塊或?qū)ο?，只要雙擊某模塊的名字，就能打開或查看其代碼。窗口的右邊是代碼窗口，它用來顯示當前選定過程的代碼，也可在該窗口中輸入當前選定過程的代碼。 第5頁/共85頁10102VBA2VBA程序設(shè)計基礎(chǔ)程序設(shè)計基礎(chǔ) 一個好的數(shù)據(jù)庫應(yīng)用系統(tǒng)離不開模塊，而要設(shè)計一個好的模塊，更離不開VBA程序設(shè)計。因此，我們必須掌握VBA程序設(shè)計基本知識，

5、才能設(shè)計出一個理想的數(shù)據(jù)庫應(yīng)用系統(tǒng)。 10102 21 1程序書寫的格式程序書寫的格式1注釋語句 注釋是對程序的說明，有時也利用注釋語句屏蔽一條語句以觀察變化、發(fā)現(xiàn)問題和錯誤。Visual Basic中的注釋語句有兩個，分別是Rem和撇號“”，Rem通常放在某程序或程序段的首行，對整個程序或程序段的功能作說明，“”通常放在某語句行的后面，對所在行的功能作說明。其格式如下： 第6頁/共85頁 Rem 注釋內(nèi)容 或 注釋內(nèi)容 說明：說明： （1）在Rem關(guān)鍵字與注釋內(nèi)容之間要加一個空格。例如：Rem 這是一個標題 這是一個標題 （2）任何字符都可以放在注釋行中作為注釋內(nèi)容。注釋語句通常放在過程、模

6、塊的開頭作為標題，也可以放在執(zhí)行語句的后面。在這種情況下，注釋語句必須是最后一個語句，且Rem前必須用冒號（:）與語句隔開。但若用撇號，則在其他語句后不必加冒號。例如：第7頁/共85頁Text1.text=Good morning! This is a testText1.text=Good morning! :Rem This is a test （3）注釋語句不能放在續(xù)行符的后面。 2 2連寫和換行連寫和換行 (1)連寫 在VBA中，通常一行書寫一個VBA語句，也可以在一行書寫多個VBA語句，這時需要用“：”將幾個VBA語句分隔。 如：Dim No As Integer Dim Name

7、As String可寫成下面一行 Dim No As Integer ：Dim Name As String (2)換行 有時代碼太長，書寫起來很不方便，這時可將其分成多行書寫，但必須在行尾加上“ ”。第8頁/共85頁10102 22VBA2VBA中的數(shù)據(jù)類型中的數(shù)據(jù)類型 數(shù)據(jù)是指能夠輸入到計算機中，并能被計算機識別和加工處理的符號的集合。數(shù)值、字符、圖形、圖像和聲音等都是數(shù)據(jù)。數(shù)據(jù)是計算機程序處理的對象，也是運算產(chǎn)生的結(jié)果。計算機處理的數(shù)據(jù)必須是有組織的，并按一定結(jié)構(gòu)進行存儲的數(shù)據(jù)。因此，計算機中的數(shù)據(jù)都有自己的數(shù)據(jù)類型。不同類型的數(shù)據(jù)其取值范圍、所適應(yīng)的運算都不相同，在內(nèi)存中所分配的存儲單

8、元數(shù)目也不同，因此，正確區(qū)分和使用不同的數(shù)據(jù)類型，可使程序在運行時占用較少的內(nèi)存，確保程序運行的正確性和可靠性。VBA的標準數(shù)據(jù)類型有11種，如表10-1所示。 第9頁/共85頁表表10-1 VBA變量的標準數(shù)據(jù)類型變量的標準數(shù)據(jù)類型數(shù)據(jù)類型數(shù)據(jù)類型關(guān)鍵字關(guān)鍵字說明符說明符數(shù)據(jù)范圍數(shù)據(jù)范圍所占字節(jié)數(shù)所占字節(jié)數(shù)整型整型IntegerInteger% %-32768-3276832767327672 2長整型長整型LongLong& &-2147483648-2147483648214748364721474836474 4單精度型單精度型SingleSingle! !1.401298E-451.

9、401298E-453.402823E383.402823E38-1.79769313486232E308-1.79769313486232E308- -4.9406564584124E3244.9406564584124E3244 4雙精度型雙精度型DoubleDouble# #4.9406564584124E3244.9406564584124E3241.79769313486232E3081.79769313486232E3088 8貨幣型貨幣型CurrencyCurrency -922337203685477.5808-922337203685477.580892 337203 92

10、337203 685477.5807685477.58078 8字符型字符型StringString$ $與字符長度有關(guān)與字符長度有關(guān)字節(jié)型字節(jié)型ByteByte無無0 02552551 1布爾型布爾型BooleanBoolean無無TrueTrue、FalseFalse2 2日期型日期型DateDate無無100100年年1 1月月1 1日日99999999年年1212月月3131日日8 8對象型對象型ObjectObject無無任何任何ObjectObject4 4變體型變體型VariantVariant無無根據(jù)需要分配根據(jù)需要分配第10頁/共85頁1 1數(shù)值型數(shù)據(jù)數(shù)值型數(shù)據(jù) VBA的數(shù)值

11、型（Numeric）數(shù)據(jù)主要分為整型和浮點型（實型），另外還有貨幣型和字節(jié)型。其中整型可分為整型和長整型，浮點型可分為單精度和雙精度浮點型。2 2字符型數(shù)據(jù)字符型數(shù)據(jù) 字符型數(shù)據(jù)是一組由計算機字符組成的序列，即字符串，每個字符都以ASCII編碼表示，即用一個字節(jié)表示。在VBA中，字符串要用雙引號括起來，其中長度為0的字符串稱為空字符串。字符型的類型說明符為“$”。 第11頁/共85頁 VBA有兩種類型的字符串：變長字符串和定長字符串。變長字符串是指字符的長度是不固定的，隨著對字符串變量賦予新的字符串，它的長度可隨時變化，最大長度為251-1個字符，如果沒有說明一個字符是哪種類型，默認為變長字符

12、串。 定長字符串是指它在程序執(zhí)行過程中，始終保持其長度不變的字符串，定長字符串的最大長度為65535個字符。例如，可規(guī)定學生學號的長度為8位，如果不足8位則用空格將不足的部分填滿，如果長度超過8位則截去超出部分的字符。 第12頁/共85頁3 3布爾型（布爾型（BooleanBoolean）數(shù)據(jù)）數(shù)據(jù) 布爾型數(shù)據(jù)是一個邏輯值，用兩個字節(jié)存儲，它有兩種取值，即True（真）或False（假）。任何只有兩種狀態(tài)的數(shù)據(jù)，如True/False、Yes/No、On/Off等，都可以表示為布爾型。當把數(shù)值型轉(zhuǎn)換為布爾型時，0會轉(zhuǎn)換為False，其他非0值轉(zhuǎn)換為True；當把布爾值轉(zhuǎn)換為數(shù)值型時，F(xiàn)alse

13、轉(zhuǎn)換為0，True轉(zhuǎn)換為1。 4 4日期型（日期型（DateDate）數(shù)據(jù)）數(shù)據(jù) 日期型數(shù)據(jù)用來表示日期和時間，可以表示多種格式的日期和時間。日期型數(shù)據(jù)用兩個“#”符號把表示日期和時間的值括起來，就像字符串數(shù)據(jù)用雙引號括起來一樣。例如，#10/28/2001#、#10-28-2001#、#10/28/2001 10:46:01 pm#等。 第13頁/共85頁5 5對象型（對象型（ObjectObject）數(shù)據(jù)）數(shù)據(jù) Object變量可用來引用應(yīng)用程序中或某些其他應(yīng)用程序中的對象。然后用Set語句指定一個被聲明為Object的變量去引用應(yīng)用程序所識別的任何實際對象。例如：Dim ObjDb As

14、 ObjectDim ObjDb As ObjectSet ObjDb=OpenDatabase(C:Vb6student.mdb)Set ObjDb=OpenDatabase(C:Vb6student.mdb)6 6變體型（變體型（VariantVariant）數(shù)據(jù)）數(shù)據(jù) 變體型數(shù)據(jù)是一種可變的數(shù)據(jù)類型，可以表示任何值，包括數(shù)值、字符串、日期等。變體型數(shù)據(jù)表示數(shù)值型數(shù)據(jù)時，占用16個字節(jié)的存儲空間，最大可達Double類型的取值范圍。表示字符串時，則占用的存儲空間等于字符串的長度。 第14頁/共85頁7 7自定義數(shù)據(jù)類型自定義數(shù)據(jù)類型 在VBA語言中，用戶自定義的數(shù)據(jù)類型通過Type語句來實

15、現(xiàn)。其格式如下： Type 數(shù)據(jù)類型名 數(shù)據(jù)類型 元素名 As 類型名 數(shù)據(jù)類型 元素名 As 類型名 數(shù)據(jù)類型 元素名 As 類型名 End Type第15頁/共85頁10102 23 3常量常量 常量是指在整個程序運行期間其值不會發(fā)生變化的量。VBA的常量包括數(shù)值常量、字符常量、符號常量、固有常量和系統(tǒng)定義常量5種。其中數(shù)值常量和字符常量最常用。數(shù)值常量由數(shù)字組成，表示具體的數(shù)值，如23876。字符常量由定界（引號）將字符括起來，如abc。下面介紹其他3種常量。 1 1符號常量符號常量 對于一個具有特定意義的數(shù)字或字符串，或在程序中需要反復使用的相同值，可以用符號常量來代表。一般用Cons

16、t語句來說明符號常量，例如：Const cpi=3.1415 第16頁/共85頁2.2.固有常量固有常量 固有常量是Access 2003或VBA的一部分，是在Access或VBA的類庫中定義的。Access或VBA包含了許多預定義的固有常量。固有常量使用兩個字母的前綴，表示該常量所在的對象庫。來自VB的固有常量以“VB”開頭，來自Access的固有常量以“AC”開頭，而來自ADO（ActiveX Data Objects）庫的常量以“AD”開頭。所有的固有常量都包含在類型庫中，只有在模塊引用了常量，被引用的常量才能裝到內(nèi)存中。要查看這些常量可以使用Access中的對象瀏覽器。例如：acfor

17、m, adAddNew, vbCurrency。第17頁/共85頁10102 24 4 變量變量 在程序中處理數(shù)據(jù)時，對于輸入的數(shù)據(jù)、參加運算的數(shù)據(jù)、運行結(jié)果等臨時數(shù)據(jù)，通常將它暫時存儲在計算機的內(nèi)存中。在VBA中，可以用名稱表示內(nèi)存位置，這樣就能訪問內(nèi)存中的數(shù)據(jù)。一個有名稱的內(nèi)存位置稱為變量（Variable）。和其他語言一樣，VBA也用變量存儲數(shù)據(jù)值。每個變量都有一個名稱和相應(yīng)的數(shù)據(jù)類型，通過名稱來引用一個變量。數(shù)據(jù)類型決定了該變量的存儲方式。第18頁/共85頁1 1變量的命名規(guī)則變量的命名規(guī)則 變量代表在程序執(zhí)行過程中其值可以改變的存儲單元，這個存儲單元的名稱稱為變量名。VBA變量名的命

18、名規(guī)則如下： （1）以字母或漢字開頭，后可跟字母、數(shù)字或下畫線，長度小于等于255個字符。 （2）不能使用VBA中的關(guān)鍵字。 （3）VBA語言中不區(qū)分變量名的大小寫。 （4）為了增加程序的可讀性，可在變量名前加一個縮寫的前綴來表明該變量的數(shù)據(jù)類型。如strAbc（字符串變量）、iCount（整型變量）、dblx（雙精度變量）等。第19頁/共85頁2 2變量的聲明變量的聲明 任何變量都屬于一定的數(shù)據(jù)類型，包括基本數(shù)據(jù)類型和用戶自定義的數(shù)據(jù)類型。聲明變量就是用一個語句來定義變量的類型。聲明變量的語句并不把值分配給變量，而是告知變量將包含什么類型的數(shù)據(jù)，在VBA中聲明變量分為顯式聲明(先聲明，后使用

19、)和隱式聲明（不聲明變量而直接使用）兩種。聲明變量的一般格式如下：Dim|Static|Private|Public As ,As . 其中，應(yīng)遵循標準的變量命名約定，As是關(guān)鍵字，用來定義被聲明變量的數(shù)據(jù)類型或?qū)ο箢愋汀?Dim、Static定義過程級的變量，變量只有在聲明它們的過程中才能被識別，所以稱之為局部變量。第20頁/共85頁例如：例如：Dim Count As Single 定義Count為單精度浮點數(shù)Static PutIn As String 定義PutIn為字符串型變量Dim Var 定義Var為缺省的Variant 類型 Private定義私有模塊級變量，變量對該模塊的所有

20、過程都可用，但對其他模塊的代碼不可用。例如：Private Intvalue As IntegerPublic主要在全局模塊中使用，定義的變量是全局變量，作用范圍為整個應(yīng)用程序。例如：Public PI As SinglePublic AA As Integer第21頁/共85頁10.2.510.2.5運算符和表達式運算符和表達式 常量、變量及它們的數(shù)據(jù)類型是程序要進行加工和處理的運算對象，即數(shù)據(jù)，而要對這些數(shù)據(jù)進行加工、處理和運算，還必須使用運算符，以表明對數(shù)據(jù)實施的是何種操作。VBA的運算符有算術(shù)運算符、連接運算符、關(guān)系運算符和邏輯運算符。用運算符號將常量、變量或函數(shù)連接起來的有意義的式子

21、稱為表達式，表達式按其所含運算符和運算對象的不同，可分為算術(shù)表達式、關(guān)系表達式、邏輯表達式和字符串表達式等。1 1運算符運算符(1)算術(shù)運算符算術(shù)運算符用來對數(shù)值型數(shù)據(jù)執(zhí)行簡單的算術(shù)運算。在VBA中共有8種算術(shù)運算符，如表10-2所示。 第22頁/共85頁表10-2 算術(shù)運算符運算符運算符含義含義表達式舉例表達式舉例說說 明明優(yōu)優(yōu) 先先 級級舉舉 例例結(jié)結(jié) 果果指數(shù)指數(shù)4364進行乘方運算，進行乘方運算，43是是431-取負取負- -10- -10進行單目運算，進行單目運算，10取負取負2*乘乘8*2163除除7/23.53整除整除723整除結(jié)果取商的整數(shù)部分整除結(jié)果取商的整數(shù)部分4Mod求余

22、求余7 Mod 21結(jié)果是兩個數(shù)相除后之余結(jié)果是兩個數(shù)相除后之余5+加加10+212“+”也可以是字符串連接符也可以是字符串連接符6-減減7.4- -34.46第23頁/共85頁說明：說明： 算術(shù)運算符中，除負號“-”是單目運算符外，其余都是雙目運算符（要求有兩個運算量）。 “+”、“-”、“*”的概念和數(shù)學中的概念相同。 除法運算有兩種。 “/”一般除法，運算結(jié)果一般為單精度數(shù)。如果操作數(shù)有一個為雙精度數(shù)，則結(jié)果為雙精度數(shù)。如7/3=2.333 333 333 33。 “”整除，整數(shù)除法，結(jié)果為整數(shù)。如73=2。 Mod運算符是求兩數(shù)相除后的余數(shù)。例如：22 Mod 7 結(jié)果為18.6 Mo

23、d 3 結(jié)果為011.4 Mod 5.2 結(jié)果為1第24頁/共85頁 參加整除和求余運算的運算對象一般為整型值，當運算對象中含有小數(shù)點時， Visual Basic會自動將操作數(shù)四舍五入為整型或長整型后再進行運算。例如，表達式52 Mod 526.45的結(jié)果為1。 (2) (2)字符串運算符字符串運算符 將兩個或多個字符串連接起來可以用字符串連接運算符“&”或“+”，生成一個新的字符串。例如： “ABCD”+“EFGHI” 結(jié)果為： ABCDEFGHI “Visual Basic” & “程序設(shè)計教程” 結(jié)果為： Visual Basic程序設(shè)計教程 說明：說明：當連接符兩旁的操作量都為字符串

24、時，上述兩個連接符等價。區(qū)別是：“+” 運算中兩個操作數(shù)均應(yīng)為字符串類型。&運算的兩個操作數(shù)既可為字符型也可為數(shù)值型，當是數(shù)值型時，系統(tǒng)自動先將其轉(zhuǎn)換為數(shù)字字符，然后進行連接操作?？聪旅娴睦?。第25頁/共85頁100+123 結(jié)果為223100+23 結(jié)果為100123Abc+122 出錯100 & 123 結(jié)果為100123100 & 123 結(jié)果為100123Abc & 123 結(jié)果為Abcl23Abc & 123 結(jié)果為Abcl23(3)(3)關(guān)系運算符關(guān)系運算符 關(guān)系運算符都是雙目運算，是用來比較兩個運算量之間的關(guān)系，關(guān)系表達式的運算結(jié)果為邏輯量。若關(guān)系成立，結(jié)果為True；若關(guān)系不

25、成立，結(jié)果為False。VBA提供的關(guān)系運算符如表10-3所示。 第26頁/共85頁表10-3 關(guān)系運算符運算運算符符含含 義義表達式舉例表達式舉例說說 明明舉舉 例例結(jié)結(jié) 果果=等于等于abc=ABCFalse小寫小寫abc不等于大寫不等于大寫ABC大于大于(2+3)4True先計算先計算2+3=5，5大于大于4=大于等于大于等于8=(10- -2)True或大于或等于都為真，或大于或等于都為真，8=10- -2小于小于 stringstringTrue第一個字符串中第一個字符是空格，第一個字符串中第一個字符是空格，空格的空格的ASCII碼小于碼小于s，所以結(jié)果為，所以結(jié)果為真真=小于等于小

26、于等于220=110False或小于或等于都為真，或小于或等于都為真，220大于大于110，所以為假所以為假不等于不等于2yTrue2不等于不等于y，所以結(jié)果為真，所以結(jié)果為真第27頁/共85頁關(guān)系運算的規(guī)則如下：關(guān)系運算的規(guī)則如下： 當兩個操作式均為數(shù)值型，按數(shù)值大小比較。 字符串比較，則按字符的ASCII碼值從左到右一一比較，直到出現(xiàn)不同的字符為止。例如，ABCDEABRA，結(jié)果為False。 數(shù)值型與可轉(zhuǎn)換為數(shù)值型的數(shù)據(jù)比較，例如，29189，按數(shù)值比較，結(jié)果為False。 數(shù)值型與不能轉(zhuǎn)換成數(shù)值型的字符型比較，例如，77sdcd，不能比較，系統(tǒng)出錯。 日期型數(shù)據(jù)進行比較時，首先將日期看

27、成yyyymmdd的八位整數(shù)，然后再按數(shù)值進行比較。 常見字符值的大小比較關(guān)系如下：空格09AZazb)Trueab為假，再進行取反運算，所為假，再進行取反運算，所以結(jié)果為真以結(jié)果為真And邏輯與邏輯與(5=3) And (95)True兩個表達式的值都為真，結(jié)果為真兩個表達式的值都為真，結(jié)果為真Or邏輯或邏輯或(xy) Or (45)True兩個表達式的值一個為真，結(jié)果為真兩個表達式的值一個為真，結(jié)果為真Xor邏輯異或邏輯異或(8=7) Xor (107)True兩個表達式的值一真一假，結(jié)果為真兩個表達式的值一真一假，結(jié)果為真Eqv邏輯等于邏輯等于(128) Eqv (cd)False兩個表

28、達式的值一真一假，結(jié)果為假兩個表達式的值一真一假，結(jié)果為假Imp邏輯蘊含邏輯蘊含(10=10) Imp (1222)True第一個表達式值為真，第二個為假，第一個表達式值為真，第二個為假，結(jié)果為真結(jié)果為真第29頁/共85頁說明：說明： 各邏輯運算符的優(yōu)先級不相同，邏輯運算符的優(yōu)先級從高到低依次為NotAndOrXorEqvImp。 VBA中常用的邏輯運算符是Not、And和Or。它們用于將多個關(guān)系表達式進行邏輯判斷。例如，數(shù)學上表示某個數(shù)在某個區(qū)域時用表達式10X=10 And X20 參與邏輯運算的量一般都應(yīng)是邏輯型數(shù)據(jù)，如果參與邏輯運算的兩操作數(shù)是數(shù)值量，則以數(shù)值的二進制值逐位進行邏輯運算

29、（0為False，1為True）。第30頁/共85頁2 2表達式表達式 （1）表達式的組成 表達式由常數(shù)、變量、函數(shù)、運算符及圓括號按一定的規(guī)則組成。表達式通過運算后返回一個結(jié)果，運算結(jié)果的類型由數(shù)據(jù)和運算符共同決定。 （2）表達式的書寫規(guī)則 運算符不能相鄰。例如，a+*b是錯誤的。 在一個表達式中出現(xiàn)的括號應(yīng)全部是圓括號，且必須配對使用。 在一個算術(shù)表達式中，乘號“*”既不能省略，也不能用“ ”代替，如xy應(yīng)寫成x*y。 表達式從左到右在同一基準并排書寫，不能出現(xiàn)上下、標。 第31頁/共85頁 要注意各種運算符的優(yōu)先級別，為保持運算順序，在書寫VBA表達式時需要適當添加括號“()”，若用到庫

30、函數(shù)必須按庫函數(shù)要求書寫。例如，數(shù)學算式 應(yīng)寫成(-b+Sqr(b*b-4*a*c)/(2*a)，其中，Sqr為求平方根的函數(shù)名。 aacbb242第32頁/共85頁（3）日期表達式 日期型表達式由日期型常數(shù)，變量，函數(shù)，算術(shù)運算符“+”、“-”和算術(shù)表達式組成。日期型數(shù)據(jù)之間只能進行加、減運算。由數(shù)字符號“#”所包圍的具有有效格式的字符序列為日期文字。有效的格式包括區(qū)域設(shè)置中指定的日期格式或國際日期格式。例如，#10/01/2008#表示2008年10月1日。有兩種情況： 兩個日期型數(shù)據(jù)相減，結(jié)果是一個數(shù)值型數(shù)據(jù)（兩個日期相差的天數(shù)）。例如，#12/20/2008#-#12/10/2008#

31、的結(jié)果為數(shù)值型數(shù)據(jù)10。 一個表示天數(shù)的數(shù)值型數(shù)據(jù)與日期型數(shù)據(jù)相加、減，結(jié)果仍為日期型數(shù)據(jù)。例如，/#12/10/2008#+10的結(jié)果為日期型數(shù)據(jù)#12/20/2008#（在Visual Basic中，實際輸出結(jié)果的格式與系統(tǒng)設(shè)置有關(guān)）。 第33頁/共85頁10.2.6 10.2.6 函數(shù)函數(shù) VBA中的函數(shù)與一般數(shù)學中函數(shù)的概念沒有什么根本區(qū)別。函數(shù)是一種特定的運算，在程序中要使用一個函數(shù)時，只要給出函數(shù)名及參數(shù)，就能得到它的函數(shù)值。 在VBA語言中，有內(nèi)部函數(shù)和用戶自定義函數(shù)兩大類。用戶自定義函數(shù)是用戶根據(jù)需要定義的函數(shù)（詳見過程）。內(nèi)部函數(shù)也稱標準函數(shù)，是VBA本身提供的大量的內(nèi)部函數(shù)

32、。在這些函數(shù)中，有些是通用的，有些與某種操作有關(guān)。這些函數(shù)可分為轉(zhuǎn)換函數(shù)、數(shù)學函數(shù)、字符串函數(shù)、日期與時間函數(shù)和隨機函數(shù)等。 第34頁/共85頁1. 1. 數(shù)學函數(shù)數(shù)學函數(shù) 數(shù)學函數(shù)用于各種數(shù)學運算，包括三角函數(shù)、求平方根、絕對值及對數(shù)、指數(shù)函數(shù)等。常用數(shù)學函數(shù)如表10-5所示，其中參數(shù)N、N1、N2表示有效的數(shù)值表達式。函函 數(shù)數(shù) 名名含含 義義實實 例例結(jié)結(jié) 果果Abs(N)取絕對值取絕對值A(chǔ)bs(- -3.5)3.5Sin(N)正弦函數(shù)正弦函數(shù)Sin(0)0Cos(N)余弦函數(shù)余弦函數(shù)Cos(0)1Tan(N)正切函數(shù)正切函數(shù)Tan(0)0Atn(N)返回用弧度表示的反正切返回用弧度表示

33、的反正切值值A(chǔ)tn(1)0. .785 398 163 397 448Exp(N)以以E為底的指數(shù)函數(shù)，即為底的指數(shù)函數(shù)，即eNExp(3)20. .086Log(N)以以e為底為底N的自然對數(shù)的自然對數(shù)Log(10)2. .3表10-5 常用數(shù)學函數(shù)第35頁/共85頁Rnd(N)產(chǎn)生大于等于產(chǎn)生大于等于0小于小于1的隨機數(shù)的隨機數(shù)Rnd01之間之間的隨機數(shù)的隨機數(shù)Sgn(N)符號函數(shù)符號函數(shù)Sgn(- -3. .5)- -1Sqr(N)平方根平方根Sqr(9)3Fix(N)取整取整Fix(- -3. .5)- -3Int(N)取小于或等于取小于或等于N的最大整數(shù)的最大整數(shù)Int(- -3.

34、.5)Int(3. .5)- -43Round(N1,N2)四舍五入（若省略四舍五入（若省略N2則取整）則取整）Round(88.48,1)Round(88.43)88. .588OctS(N)十進制轉(zhuǎn)換成八進制十進制轉(zhuǎn)換成八進制Oct$(100)144Hex$(N)十進制轉(zhuǎn)換成十六進制十進制轉(zhuǎn)換成十六進制Hex(100)64第36頁/共85頁2 2字符串函數(shù)字符串函數(shù) VBA提供了大量的字符串函數(shù)，具有很強的字符處理能力，常用字符串函數(shù)。如表10-6所示。表10-6常用字符串函數(shù)函函 數(shù)數(shù) 名名含含 義義實實 例例結(jié)結(jié) 果果Ltrim$(字符串表達字符串表達式式)去掉字符串中左邊的空格去掉字

35、符串中左邊的空格LTrim$( ABCD)ABCDRtrim$(字符串表達字符串表達式式)去掉字符串中右邊的空格去掉字符串中右邊的空格RTrim$(ABCD )ABCDLeft$(字符串字符串,字符字符個數(shù)個數(shù))返回從左邊開始的指定數(shù)返回從左邊開始的指定數(shù)目的字符目的字符Left(Visual Basic,6)VisualRight$(字符串字符串,字字符個數(shù)符個數(shù))返回從右端開始的指定數(shù)返回從右端開始的指定數(shù)目的字符目的字符Right(Visual Basic,5)BasicMid$(字符串字符串,起始起始位置位置,字符個數(shù)字符個數(shù))返回從起始位置開始的指返回從起始位置開始的指定個數(shù)子字符串

36、定個數(shù)子字符串，Mid$(ABCD,2,3)BCD第37頁/共85頁Len(字符串表達式字符串表達式)返回字符串的長度返回字符串的長度 Len(水電出版社水電出版社) 5LenB(字符串表達式字符串表達式)返回字符串中所占返回字符串中所占字節(jié)數(shù)字節(jié)數(shù)Len(水電出版社水電出版社)10Space(n)返回返回n個空格字符個空格字符Space(5) String$(n,字符串字符串)返回由首字符組成返回由首字符組成的的n個字符串個字符串String$(5, abc)aaaaaLcase(字符串表達式字符串表達式)大寫字母轉(zhuǎn)換為小大寫字母轉(zhuǎn)換為小寫字母寫字母Lcase$(Abc)abcUcase(字

37、符串表達式字符串表達式)小寫字母轉(zhuǎn)換為大小寫字母轉(zhuǎn)換為大寫字母寫字母Ucase$(abc)ABCAsc(字符串表達式字符串表達式)返回第一個字符的返回第一個字符的ASCII值值A(chǔ)sc(ab)97Chr(n)將將n的值轉(zhuǎn)換為對的值轉(zhuǎn)換為對應(yīng)的應(yīng)的ASCII字符字符Chr(65) AVal(字符串表達式字符串表達式)將將“字符串表達式字符串表達式”轉(zhuǎn)化為數(shù)值轉(zhuǎn)化為數(shù)值Val(23.56) 23.56Str(數(shù)值數(shù)值)將將“數(shù)值數(shù)值”轉(zhuǎn)換為轉(zhuǎn)換為字符串字符串Str(34. .56)34.56第38頁/共85頁3 3數(shù)據(jù)類型轉(zhuǎn)換函數(shù)數(shù)據(jù)類型轉(zhuǎn)換函數(shù) 在VBA編程中，經(jīng)常要進行數(shù)據(jù)類型的轉(zhuǎn)換，常用的數(shù)據(jù)

38、類型轉(zhuǎn)換函數(shù)如表10-7所示。 表10-7 數(shù)據(jù)類型轉(zhuǎn)換函數(shù)函函 數(shù)數(shù) 說說 明明Cint(x)把把x的小數(shù)部分四舍五入，轉(zhuǎn)換為小數(shù)的小數(shù)部分四舍五入，轉(zhuǎn)換為小數(shù)Ccur(x)把把x的值轉(zhuǎn)換為貨幣類型值，小數(shù)部分最多保留的值轉(zhuǎn)換為貨幣類型值，小數(shù)部分最多保留4位，位，且自動四舍五入且自動四舍五入Cdbl(x)把把x值轉(zhuǎn)換為雙精度數(shù)值轉(zhuǎn)換為雙精度數(shù)Clng(x)把把x的小數(shù)部分四舍五入轉(zhuǎn)換為長整型數(shù)的小數(shù)部分四舍五入轉(zhuǎn)換為長整型數(shù)Csng(x)把把x值轉(zhuǎn)換為單精度數(shù)值轉(zhuǎn)換為單精度數(shù)Cvar(x)把把x值轉(zhuǎn)換為變體類型值值轉(zhuǎn)換為變體類型值第39頁/共85頁4 4日期日期/ /時間函數(shù)時間函數(shù) 常用

39、的日期/時間函數(shù)如表10-8所示。表10-8 常用日期/時間函數(shù)函函 數(shù)數(shù) 名名返回類返回類型型功功 能能例例 子子返返 回回 值值Day(日期日期)Integer返回日期，返回日期，131的整數(shù)的整數(shù)Day(#2000/3/15#)15Month(日期日期)Integer返回月份，返回月份，112的整數(shù)的整數(shù)Month(#2000/3/15#)3Year(日期日期)Integer返回年份返回年份Year(#2000/3/15#)2000Weekday(日日期期)Integer返回星期幾返回星期幾Weekday(#2000/3/15#)4TimeDate返回當前系統(tǒng)時間返回當前系統(tǒng)時間Time

40、系統(tǒng)時間系統(tǒng)時間DateDate返回系統(tǒng)日期返回系統(tǒng)日期Date系統(tǒng)日期系統(tǒng)日期NowDate返回系統(tǒng)日期和時間返回系統(tǒng)日期和時間Now系統(tǒng)日期系統(tǒng)日期與時間與時間Hour(時間時間)Integer返回鐘點，返回鐘點，023的整數(shù)的整數(shù)Hour(#4:35:17PM#)16Minute(時間時間)Integer返回分鐘，返回分鐘，059的整數(shù)的整數(shù)Minute(#4:35:17PM#)35Second(時間時間)Integer返回秒鐘，返回秒鐘，059的整數(shù)的整數(shù)Second(#4:35:17PM#)17第40頁/共85頁9 92 27 VBA7 VBA的基本輸入的基本輸入/ /輸出函數(shù)輸出函

41、數(shù)1 1InputBox()InputBox()函數(shù)函數(shù) 在應(yīng)用程序中，常使用InputBox()函數(shù)向變量輸送數(shù)據(jù)，它不需要在窗體中創(chuàng)建控件就能輸入變量的值，使用方便。InputBox()函數(shù)格式：InputBox(，標題 ，x坐標 ，y坐標幫助文件，內(nèi)容功能：按給定的提示信息顯示消息框，接收并返回用戶輸入的信息。其中：x坐標，y坐標是指定消息框在屏幕上的顯示位置幫助文件：當在輸入窗口選擇“幫助”時所調(diào)用的顯示文件。第41頁/共85頁例如，當執(zhí)行下列命令后，將顯示圖10-2所示的輸入窗口。Name= InputBox(輸入查詢的學生姓名, 輸入命令演示, , , , demo.hlp, 10

42、)圖10-2 InputBox()函數(shù)輸入對話框第42頁/共85頁2 2MsgBOX() MsgBOX() 函數(shù)：函數(shù)： MsgBOX() 函數(shù)是產(chǎn)生消息框的函數(shù)，消息框通常用來顯示一些提示信息，供用戶選擇，例如是選擇“確定”還是選擇“取消”等。 MsgBOX() 函數(shù)的格式： MsgBox (提示信息,消息類型標志+按鈕類型+默認按鈕,標題信息，幫助文件,內(nèi)容) 功能：功能： 在程序運行中顯示提示信息，產(chǎn)生一個對話框，等待用戶單擊選擇的按鈕，并返回一個整數(shù)值，用戶可根據(jù)返回的值，決定下一步的操作。其中：其中：提示信息是需要在屏幕上顯示的信息。 消息類型標志是顯示的圖形標志。如表10-9 所示

43、 按鈕類型是指顯示的按鈕類型，如表10-10所示 第43頁/共85頁 默認按鈕是在設(shè)定在多個按鈕中的默認按鈕，如表10-11所示。 標題是顯示框的標題 幫助文件是當在顯示的對話框中選擇了“幫助”時，系統(tǒng)調(diào)用的幫助文件名。 表10-9 消息類型圖形標志符號常量符號常量值值vbCriticalvbCritical16 16 圖形圖形vbQuestionvbQuestion32 32 ？圖形？圖形vbExclamqtionvbExclamqtion48 48 ！圖形！圖形vbInformationvbInformation64 i64 i圖形圖形第44頁/共85頁表10-10 按鈕類型值符號常量符號

44、常量值值在消息對話框顯示的按鈕在消息對話框顯示的按鈕vbOkOnly0“確定確定”按鈕按鈕vbOkCancel1“確定確定”、“取消取消”按鈕按鈕vbAbortRetryIgnore2“終止終止”“”“重試重試”“”“忽略忽略”按鈕按鈕vbYesNoCancel3“是是”“”“否否”“”“取消取消”按鈕按鈕vbYesNo4“是是”“”“否否”按鈕按鈕vbRetryCancel5“重試重試”“”“取消取消”按鈕按鈕表10-11 默認按鈕值符號常量符號常量值值缺省的活動按鈕缺省的活動按鈕vbDefaultButtion10第一個按鈕第一個按鈕vbDefaultButtion2256第二個按鈕第二個

45、按鈕vbDefaultButtion3512第三個按鈕第三個按鈕第45頁/共85頁例如，當執(zhí)行下列命令后，將顯示圖10-3所示的窗口。MsgBox (“選擇正確嗎？”,vbQuestion+vbOKCancel+vbDefaultButtion1, “項目選擇”)圖10-3 MsgBOX() 函數(shù)執(zhí)行結(jié)果 第46頁/共85頁103VBA程序結(jié)構(gòu) VBA程序設(shè)計采用三種基本的控制結(jié)構(gòu)，即順序結(jié)構(gòu)、分支結(jié)構(gòu)、循環(huán)結(jié)構(gòu)。這三種基本的控制結(jié)構(gòu)是結(jié)構(gòu)化程序設(shè)計的基礎(chǔ)，它可使程序結(jié)構(gòu)清晰、易讀性強，以提高程序設(shè)計的質(zhì)量和效率。 第47頁/共85頁10.3.110.3.1順序結(jié)構(gòu)順序結(jié)構(gòu) 順序結(jié)構(gòu)是最簡單的

46、程序結(jié)構(gòu)，它按命令在程序中出現(xiàn)的先后次序執(zhí)行。執(zhí)行順序如圖10-4所示圖10-4 順序程序執(zhí)行流程第48頁/共85頁10103 32 2分支程序分支程序 程序中往往需要判斷某個表達式，通過判斷的結(jié)果轉(zhuǎn)向執(zhí)行不同的語句。 “分支程序”，是根椐對給定條件的判斷，選擇不同執(zhí)行路徑的程序結(jié)構(gòu)。通常根椐執(zhí)行路徑的分支數(shù)分為“簡單分支結(jié)構(gòu)“、“雙分支選擇結(jié)構(gòu)”和“多分支選擇結(jié)構(gòu)”。1 1簡單分支簡單分支(If(IfThenThen語句語句) )(1)簡單分支的格式： IF Then END IF 或： If Then 第49頁/共85頁 功能：首先判斷的值，若為真，則執(zhí)行IF與END IF之間的語句行序列

47、，然后執(zhí)行ENDIF后的語句；否則，直接執(zhí)行ENDIF后的語句。其執(zhí)行過程如圖10-5所示。2 2雙分支結(jié)構(gòu)雙分支結(jié)構(gòu)(1)命令格式： IF Then ELSE END IF 第50頁/共85頁 (2)功能：若IF語句中的值為真，則執(zhí)行，然后執(zhí)行END IF后面的語句；若IF語句中的值為假，則執(zhí)行ELSE 后面的，然后執(zhí)行END IF后面的語句。其執(zhí)行過程如圖10-6所示。圖10-5 簡單分支結(jié)構(gòu)圖10-6雙分支結(jié)構(gòu)第51頁/共85頁 在實際應(yīng)用中，經(jīng)常使用If語句的嵌套格式，即一個If語句里又包含另一個If語句。 實例實例10-110-1：某商場為了促銷，采用購物打折的優(yōu)惠辦法，每位顧客一次

48、購物的費用的打折優(yōu)惠按以下方法計算： 1000元至2000元，按九五折優(yōu)惠。 2000元至3000元，按九折優(yōu)惠。 3000元至5000元，按八五折優(yōu)惠。 5000元以上，按八折優(yōu)惠。 編寫程序，輸入購物款數(shù)，計算并輸出優(yōu)惠價。 第52頁/共85頁代碼如下：代碼如下：Private Sub Command1_Click()Dim x As Single, y As Single x = Val(Text1) If x 1000 Then y = x Else If x 2000 Then y = 0.95 * x Else If x 3000 Then y = 0.9 * x第53頁/共85頁

49、Else If x 5000 Then y = 0.85 * x Else y = 0.8 * x End If End If End If End If Text2 = Str(y)End Sub第54頁/共85頁3 3帶帶ElseIfElseIf的塊的塊IfIf語句語句 實例10-110-1的程序出現(xiàn)多次If語句的嵌套，程序長，不便閱讀。為此VBA提供了帶ElseIf的塊If語句，使程序簡化易寫。其格式如下： If Then Elself Then Else End If第55頁/共85頁實例實例10-210-2：將實例10-110-1改寫成帶ElselfElself的塊IfIf語句格式代

50、碼如下： Private Sub Command1_Click() Dim x As Single, y As Single x=Val(Text1) If x1000 Then y=x ElseIf x2000 Then y=0.95*x ElseIf x3000 Then y=0.9*x ElseIf x5000 Then y=0.85*x Else y=0.8*x End If Text2 =Str(y)End Sub 第56頁/共85頁4 4多分支選擇結(jié)構(gòu)多分支選擇結(jié)構(gòu) IFEND IF語句雖然能實現(xiàn)條件的分支，但對于多個條件的判斷，如仍用IFEND IF語句結(jié)構(gòu)，程序就復雜得多。多分

51、支選擇結(jié)構(gòu)能解決多條件判斷，并根椐滿足的條件選擇執(zhí)行不同的語句執(zhí)行。 (1)(1)命令格式命令格式Select Case 語句又稱情況語句，是多分支結(jié)構(gòu)的另一種形式。其格式如下：Select Case變量或表達式 Case表達式列表1 Case表達式列表2 Case Else End Select第57頁/共85頁(2) (2) 功能功能 多分支選擇語句執(zhí)行時先對“測試表達式”求值，然后測試該值與哪一個Case子句中的“表達式列表”匹配，如果找到了，就執(zhí)行與該Case語句有關(guān)的語句塊，執(zhí)行完后轉(zhuǎn)移到End Select后面的語句；如果沒有找到，則執(zhí)行與Case Else子句后的語句塊，然后再轉(zhuǎn)

52、移到End Select后面的語句。如果有多個表達式匹配，則執(zhí)行第一個匹配的Case語句有關(guān)的語句塊。 實例實例10-310-3：將實例10-1改寫成使用情況語句實現(xiàn)。本例采用InputBox（）函數(shù)輸入購物金額，直接用Debug.Print輸出優(yōu)惠金額。第58頁/共85頁代碼如下：Private Sub Form_Click() Dim x As Single,y As Single x=InputBox(請輸入購物款數(shù)) x=Val(x) Select Case x Case Is1000 y=x Case Is2000 y=0.95*x Case Is3000 y=0.9*x Case

53、Is5000 y=0.85*x第59頁/共85頁 Case Else y=0.8*x End Select Debug.Print 購物款數(shù):;x,優(yōu)惠價:;yEnd Sub 同一個問題，解決的方法可能有多種，用戶最好選擇自己比較熟悉而又簡單的方法來實現(xiàn)。 第60頁/共85頁 表達式列表的三種形式: 1.逗號分隔 case 10,20,30 2.to關(guān)鍵字 case 60 to 90 3.is關(guān)鍵字 case is30第61頁/共85頁Private Sub Form_Click() Dim iMonth As Integer 定義月份變量 iMonth = 1 為變量賦值 Select Ca

54、se iMonth 計算月份 Case Is = 3 月份為1、2、3 MsgBox(春天) Case 4 To 6 月份為4、5、6 MsgBox(夏天) Case 7, 8, 9 月份為7、8、9 MsgBox(秋天) Case Else 月份為10、11、12 MsgBox(冬天) End SelectEnd Sub第62頁/共85頁10103 33 3循循 環(huán)環(huán) 語語 句句 順序程序和分支程序中的每條語句，一般只執(zhí)行一次，而在實際應(yīng)用中，經(jīng)常遇到一些操作并不復雜，但需要反復多次處理的問題，即重復執(zhí)行某一段程序。例如，計算k=n!，如果用順序結(jié)構(gòu)來處理將十分麻煩，而使用循環(huán)語句則可以輕松

55、實現(xiàn)。 循環(huán)程序是在指定的條件下多次重復執(zhí)行的一組語句。VBA提供了如下幾種不同風格的循環(huán)結(jié)構(gòu)： 計數(shù)循環(huán)（Forext循環(huán)） While循環(huán) Do循環(huán)（DoLoop循環(huán)） 第63頁/共85頁1 1ForFor循環(huán)語句循環(huán)語句 For循環(huán)語句的格式如下： For循環(huán)變量=初值To終值step步長 Exit For Next循環(huán)變量 其中：“循環(huán)變量”也稱循環(huán)計數(shù)器或循環(huán)控制變量，為數(shù)值型?！俺踔怠迸c“終值”均為數(shù)值表達式?！安介L”是一個數(shù)值表達式，為循環(huán)變量的增量，可正可負；如果省略，默認為1。Exit For可用于提前退出For循環(huán)。Next后面的“循環(huán)變量”與For后面的“循環(huán)變量”必須相

56、同第64頁/共85頁執(zhí)行過程：執(zhí)行過程： （1）把“初值”賦給“循環(huán)變量”。 （2）檢查“循環(huán)變量”是否超過“終值”，若沒有，則執(zhí)行“循環(huán)體”，若超出，則結(jié)束循環(huán)，執(zhí)行Next后面的語句。 （3）“循環(huán)變量”+“步長”，轉(zhuǎn)（2），繼續(xù)循環(huán)。由上可以看出ForNext循環(huán)的循環(huán)次數(shù)由“初值”、“終值”和“步長”3個因素決定。實例實例10-410-4：編程求k=n!（n為自然數(shù)，在程序運行過程中從鍵盤輸入n的值）。 第65頁/共85頁代碼如下：Private Sub Commadn1_Click() Dim n As Integer n=InputBox(輸入n的值：) 從鍵盤輸入n的值 k=1

57、For i=1 To n k=k*i Next i msgbox “n!=”,kEnd Sub第66頁/共85頁2 2WhileWhile循環(huán)循環(huán)While循環(huán)的格式如下：While 條件 語句塊Wend當條件為True時，執(zhí)行循環(huán)體。 第67頁/共85頁3 3Do WhileDo WhileLoopLoop循環(huán)語句循環(huán)語句Do WhileLoop語句格式：DO WHILE Exit Do LOOP執(zhí)行過程： 當條件成立，則執(zhí)行循環(huán)體，遇到LOOP返回到DO語句，繼續(xù)判斷條件，不成立，則退出循環(huán)，執(zhí)行LOOP后面的語句，Exit Do的作用是中止循環(huán)的執(zhí)行。第68頁/共85頁實例實例10-61

58、0-6：編寫程序計算S=1+2+3+100的值。程序代碼如下：程序代碼如下：Private Sub Command1_click() Dim I As Integer Dim S As Integer I=1 S=0 Do While I=100 S=S+I I=I+1 Loop Debug.Print “1+2+3+100=”;SEnd Sub第69頁/共85頁數(shù)組1、聲明數(shù)組： Dim sName(2) As String 定義字符串數(shù)組sName 2、數(shù)組維數(shù):維數(shù)或秩對應(yīng)于用來識別每個數(shù)組元素的下標個數(shù)，一維以上的數(shù)組稱為多維數(shù)組。 Dim sName1(2) As String 一維

59、數(shù)組Dim sName2(2, 3) As String 二維數(shù)組Dim sName3(2, 4, 4) As String 三維數(shù)組第70頁/共85頁3、數(shù)組大小：數(shù)組的Length屬性返回數(shù)組中所有維數(shù)中的元素總數(shù)。4、數(shù)據(jù)類型：數(shù)組聲明指定一個數(shù)據(jù)類型，數(shù)組的所有元素必須都是該類型數(shù)據(jù)。5、數(shù)組初始化：可以在定義數(shù)組的同時初始化數(shù)組，即數(shù)組的顯式初始化： Dim iAge() As Integer = 12, 34, 56, 78 第71頁/共85頁例如:Private sub command1_click() Dim a(10,10) for m=2 to 4 for n=4 to 5

60、 a(m,n)=m*n next n next m msgbox a(2,5)+a(3,4)+a(4,5) End sub第72頁/共85頁10.410.4過程過程 在實際編程過程中，往往把一個復雜的程序分成多個相對獨立的部分，每個部分用一個功能模塊實現(xiàn)。從而簡輕程序設(shè)計的難度。 VBA的過程分為兩大類，一類是事件過程，當用戶或系統(tǒng)在某對象上觸發(fā)某事件時，會引發(fā)執(zhí)行對象的某事件過程。另一類是用戶自定義過程，在應(yīng)用程序設(shè)計時，某一反復使用的功能可將其定義為過程，在程序的其他地方可以多次調(diào)用它，以實現(xiàn)其定義的功能。第73頁/共85頁10104 41 1過程過程1 1子過程定義子過程定義Public