ACCESS實例教程(第8章).ppt

《ACCESS實例教程(第8章).ppt》由會員分享，可在線閱讀，更多相關(guān)《ACCESS實例教程(第8章).ppt（102頁珍藏版）》請在裝配圖網(wǎng)上搜索。

Access實例教程,潘明寒趙義霞主編中國水利水電出版社,ACCESS實例教程,模塊的操作（第8章）,1，模塊的基本概念2，VBA程序設(shè)計基礎(chǔ)3，VBA函數(shù)的使用4，模塊的建立與使用5，過程與參數(shù)傳遞,本章要點：,8.1認識模塊對象,模塊是由聲明、語句和過程組成的集合，以VBA（VisualBasicforApplication）語言編寫，作為一個已命名的單元存儲在一起。模塊有2種類型：類模塊和標準模塊。使用模塊可以在實際開發(fā)中實現(xiàn)較為復(fù)雜的功能。,（1）模塊模塊由一個或多個過程組成，每個過程實現(xiàn)一個或幾個功能。模塊的執(zhí)行通過特定事件激發(fā)相應(yīng)的事件過程實現(xiàn)。（2）事件過程事件過程是一組代碼，用于響應(yīng)窗體事件或報表事件。（3）類模塊類模塊是包含代碼和數(shù)據(jù)的集合，可以看作是沒有物理表示的控件，總是與某一特定的窗體或報表相關(guān)聯(lián)。窗體模塊和報表模塊都屬于類模塊。（4）標準模塊標準模塊是代碼的集合，包含的過程不與任何其他對象相關(guān)聯(lián)，是數(shù)據(jù)庫對象使用的公共過程，保存在數(shù)據(jù)庫窗口中。,8.1.1模塊的基本概念,8.1.2啟動Access的編程界面,Access的編程界面稱為VBE（VisualBasicEditor），是MicrosoftOffice所有組件公用的程序編輯系統(tǒng)。方法1：在窗體或報表設(shè)計視圖中選控件單擊標準工具欄的“生成器”按鈕在“選擇生成器”對話框中選擇“代碼生成器”。方法2：右擊窗體或報表設(shè)計視圖中控件快捷菜單中選“事件生成器”“選擇生成器”對話框中選擇代碼生成器”。,8.1.3VBE窗口,編寫模塊對象的代碼在代碼窗口進行。（1）窗口頂部有2個組合框，左邊對象框顯示所有對象名稱，右邊過程框顯示當(dāng)前對象能識別的所有事件名稱。選定一個對象，再選定一個事件，系統(tǒng)會自動生成相應(yīng)事件過程的起始行與結(jié)束行，只須在兩行中間添加過程代碼即可?！巴ㄓ谩边^程可以被所有控件調(diào)用。某控件的過程只在關(guān)聯(lián)事件中有效。（2）窗口中央代碼區(qū)有聲明區(qū)和過程區(qū)，聲明區(qū)中聲明模塊使用的變量，過程區(qū)顯示一個或多個過程，之間用一條灰線分隔。（3）窗口底部有2個按鈕，單擊“過程視圖”按鈕，只顯示當(dāng)前過程。單擊右邊“完整的模塊視圖”按鈕，窗口顯示全部過程。,8.1.4標準工具欄,例:一個類模塊,例:一個標準模塊,8.1.7使用提示與幫助,在代碼窗口輸入代碼時，系統(tǒng)會自動顯示提示信息，包括關(guān)鍵字列表、屬性列表、過程參數(shù)列表等，在列表中選取一項后雙擊鼠標，所選值會自動添加到當(dāng)前光標處。,8.2VBA程序設(shè)計基礎(chǔ),8.2.1面向?qū)ο蟮某绦蛟O(shè)計的基本概念,（1）對象在自然界中，一個對象就是一個實體，如一輛汽車就是一個對象。在面向?qū)ο蟮某绦蛟O(shè)計中，對象代表應(yīng)用程序中的元素，如表、窗體、按鈕等。（2）屬性屬性是對象的特征。如汽車有顏色和型號屬性，按鈕有標題和名稱屬性。對象的類別不同，屬性會有所不同。同類別對象的不同實例，屬性也有差異。例如，同是命令按鈕，名稱屬性不允許相同。,（3）事件事件是對象能夠識別的動作。如按鈕可以識別單擊事件、雙擊事件等。在類模塊每一個過程的開始行，都顯示對象名和事件名。如：PrivateSubc1_Click()。（4）方法方法是對象能夠執(zhí)行的動作，決定了對象能完成什么事。不同對象有不同的方法。如close方法能關(guān)閉一個窗體。（5）集合集合由許多與對象有關(guān)的鍵和值組成，其中的鍵和值是配對的。如一本書是一個對象，書的頁碼是鍵，頁碼對應(yīng)的內(nèi)容是值。所有配對的頁碼和內(nèi)容組成了書對象的集合。,（6）過程過程是由代碼組成的單元，包含一系列計算語句和執(zhí)行語句。每一個過程都有名字，過程名不能與所在模塊的模塊名相同。過程有兩種類型：sub過程（無返回值），function過程（有返回值）。,例：動態(tài)設(shè)置控件屬性,（1）在窗體中建1個文本框名稱為t1。（2）在窗體中建1個標簽名稱為b1標題為“新年好！”。（3）在窗體中建3個命令按鈕名稱分別為c1、c2、c3標題分別為“紅色”、“綠色”、“藍色”。,（4）設(shè)置各按鈕的前景色，在屬性窗口可查看顏色值。,（5）c1的click事件代碼：t1.BackColor=255b1.ForeColor=255,（6）c2的click事件代碼：t1.BackColor=33792b1.ForeColor=33792（7）c3的click事件代碼：t1.BackColor=16711680b1.ForeColor=16711680,執(zhí)行結(jié)果：,Docmd是Access的一個特殊對象，用來調(diào)用內(nèi)置方法，在程序中實現(xiàn)對Access的操作，諸如打開窗口、關(guān)閉窗體、打開報表、關(guān)閉報表等。DoCmd對象的大多數(shù)方法都有參數(shù)，有些參數(shù)是必需的，有些則是可選的。若省略可選參數(shù)，參數(shù)將采用默認值。,8.2.2Docmd對象,（1）用DoCmd對象打開窗體格式：DoCmd.OpenForm窗體名功能：用默認形式打開指定窗體。例如：DoCmd.OpenForm文本框練習(xí),（2）用DoCmd對象關(guān)閉窗體格式1：DoCmd.CloseacForm,窗體名功能：關(guān)閉指定窗體。例如：DoCmd.CloseacForm,文本框練習(xí)格式2：DoCmd.Close功能：關(guān)閉當(dāng)前窗體。（3）用DoCmd對象打開報表格式：DoCmd.OpenReport報表名,acViewPreview功能：用預(yù)覽形式打開指定報表。例如：DoCmd.OpenReport工資報表,acViewPreview,（4）用DoCmd對象關(guān)閉報表格式1：DoCmd.CloseacReport,報表名功能：關(guān)閉指定報表。例如：DoCmd.CloseacReport,工資報表格式2：DoCmd.Close功能：關(guān)閉當(dāng)前報表。（5）用DoCmd對象運行宏格式：DoCmd.RunMacro宏名功能：運行指定宏。例如：DoCmd.RunMacro宏1（6）用DoCmd對象退出Access。格式：DoCmd.Quit功能：關(guān)閉所有Access對象和Access本身。,（1）在窗體中建立5個按鈕名稱分別為c1、c2、c3、c4、c5標題分別為“打開文本框練習(xí)窗體”、“關(guān)閉文本框練習(xí)窗體”、“打開工資報表”、“關(guān)閉工資報表”、“退出Access”。,例：使用DoCmd對象,（2）c1代碼：DoCmd.OpenForm文本框練習(xí)（3）c2代碼：DoCmd.CloseacForm,文本框練習(xí)（4）c3代碼：DoCmd.OpenReport工資報表,acViewPreview（5）c4代碼：DoCmd.CloseacReport,工資報表（6）c5代碼：DoCmd.Quit,（7）轉(zhuǎn)到窗體視圖單擊不同按鈕執(zhí)行不同操作。,8.2.3數(shù)據(jù)類型與數(shù)據(jù)類型轉(zhuǎn)換,（1）標準數(shù)據(jù)類型,（2）數(shù)據(jù)類型轉(zhuǎn)換函數(shù),例：在立即窗口中計算函數(shù)值（1）在VBE界面“視圖”菜單“立即窗口”，顯示立即窗口。（2）輸入表達式x=“true”回車輸入表達式y(tǒng)=“false”回車輸入表達式?x+y回車，顯示結(jié)果為：truefalse。（3）輸入表達式?cbool(x)+cbool(y)回車，顯示結(jié)果為：-1。說明：每行寫完后必須回車才能生效。問號與print語句相同，在立即窗口顯示計算結(jié)果。,（3）用戶定義的數(shù)據(jù)類型,定義格式：type數(shù)據(jù)類型名域名1as數(shù)據(jù)類型域名2as數(shù)據(jù)類型endtype例如：typestudentxhasstring*6xmasstringxbasstring*1nlasintegerendtype,8.2.4變量,變量是指程序運行時值會發(fā)生變化的數(shù)據(jù)。系統(tǒng)會按照變量的數(shù)據(jù)類型在內(nèi)存中為變量分配一定數(shù)量的存儲單元，程序中用變量名調(diào)用存儲的數(shù)據(jù)。所以，變量實際上是一個符號地址，代表了命名的存儲位置。（1）變量命名規(guī)則由字母、數(shù)字、下劃線組成，用英文字母開頭。不能包含空格以及除下劃線之外的標點符號。不能用VBA的關(guān)鍵字（如：dim）和保留字（如：str）。字符個數(shù)不得多于255個。變量名不區(qū)分大小寫。,格式：dim變量名as類型說明：如果不用as定義類型，則變量為變體類型。變體類型變量比其他類型變量占用更多的內(nèi)存資源。可以用dim同時定義多個變量，變量之間用西文逗號分隔，每一個變量都應(yīng)該用as聲明類型。例如：dima1asinteger，a2asboolean用dim定義的變量是局部變量，會按照數(shù)據(jù)類型自動設(shè)置默認值。,（2）用dim語句聲明變量,（3）用類型說明符聲明變量類型,在變量名后加VBA的類型說明符，隱式的聲明了變量類型。例如：b1%=125變量b1是整型，值是125。既沒有顯式聲明，也沒有加類型說明符，隱式聲明了變體型變量。例如：c1=125變量c1是變體型，值是125。,圖1-15層次模型,（4）一個特殊的模塊變量本地窗口打開時，自動生成一個名為“Me”的特殊模塊變量。對于類模塊，定義為Me。Me是對象的引用，引用當(dāng)前模塊中當(dāng)前類的實例。Me變量不需要專門定義，直接使用即可。例如，用代碼定義“學(xué)生信息”窗體中“Lab”標簽的標題屬性，以下兩種方法效果是一樣的：標準方法：Forms!學(xué)生信息!Lab.Caption=學(xué)生信息瀏覽常用方法：Me!Lab.Caption=學(xué)生信息瀏覽,8.2.5變量的作用域和生命周期,1變量的作用域變量的作用域是變量在程序中起作用的范圍。分3個層次，從低到高依次為：局部、模塊、全局。（1）局部變量又稱為本地變量，僅在聲明變量的過程中有效。在過程和函數(shù)內(nèi)部用dim聲明或不用聲明接使用的變量，都是局部變量。局部變量在本地擁有最高級，當(dāng)存在同名的模塊級變量時，模塊級變量被屏蔽。（2）模塊變量模塊變量在所聲明模塊的所有函數(shù)和所有過程都有效，變量定義在模塊所有過程之外的起始位置，通常是窗體變量或標準模塊變量。（3）全局變量全局變量又稱為公共變量，定義在標準模塊所有過程之外，在所有模塊的所有過程和函數(shù)中都有效。定義格式：public變量名as數(shù)據(jù)類型,變量的生命周期是指變量從首次出現(xiàn)到變量消失的代碼執(zhí)行時間。變量首次出現(xiàn)是指聲明變量并為其分配存儲空間，變量消失是指變量所在的程序執(zhí)行完畢。局部變量的生命周期從過程或函數(shù)被調(diào)用到運行結(jié)束。全局變量的生命周期從聲明到Access應(yīng)用程序結(jié)束。過程中用dim定義的變量，每次調(diào)用過程時都重新開始，過程結(jié)束時立即消失。用static代替dim定義變量，可以在過程實例間保留局部變量的值。用static定義的變量稱為靜態(tài)變量，作用范圍與dim相同，在整個模塊執(zhí)行時一直存在。,2變量的生命周期,例：用static和dim定義局部變量,（1）在窗體中建立2個文本框分別命名為t1和t2附加標簽的標題分別為“靜態(tài)變量”和“局部變量”。（2）在窗體中建立命令按鈕名稱為c1標題為“計算”。,（3）c1的click代碼：StaticxAsIntegerDimyAsIntegerx=x+1：y=y+1t1=x：t2=y,（4）執(zhí)行時不斷單擊命令按鈕，靜態(tài)變量文本框中的值每次增加1，而局部變量文本框中的值總是1。,8.2.6常量,常量是在程序運行過程中其值不能改變的量，如數(shù)字常量123、字符串常量abc、日期常量#2008-8-8#等。這樣的常量是直接常量，也稱為字面常量。系統(tǒng)還提供3種常量：符號常量、系統(tǒng)常量、內(nèi)部常量。,1符號常量用符號常量表示在編程中反復(fù)使用的相同值。符號常量名一般用大寫字母，以便與變量名區(qū)分。定義格式：Const符號常量名=常量值說明：（1）如果符號常量定義在模塊聲明區(qū)，所有模塊的過程都能使用該變量，通常在前面加上Global或Public。如：PublicConstPI=3.14（2）如果符號常量定義在事件的過程中，該符號常量只在本過程中可用。（3）符號常量定義時不用指明數(shù)據(jù)類型。,2系統(tǒng)常量系統(tǒng)常量是Access啟動時就建立的常量，可以在所有程序編碼時直接使用。系統(tǒng)常量有：true、false、yes、no、on、off、null。3內(nèi)部常量內(nèi)部常量又稱為固有常量，是VBA提供的一些預(yù)定義的內(nèi)部符號常量，主要用來作為DoCmd對象的參數(shù)。內(nèi)部常量用前兩個字母指明該常量的對象庫：以ac開頭的是Access的庫常量，以vb開頭的是VBA的庫常量，以db開頭的是DAO的庫常量，以ad開頭的ADO的庫常量。這些內(nèi)部常量名不能作為用戶自定義的變量名或符號常量名。,1數(shù)組的概念VBA中的數(shù)組是一組具有相同數(shù)據(jù)類型、同一名字、不同下標的變量集合。數(shù)組變量由變量名和數(shù)據(jù)下標組成，數(shù)組下標用圓括號括起來。說明：（1）數(shù)組要先定義后使用，VBA不允許隱式聲明數(shù)組。（2）同一過程中數(shù)組名不能與其他變量重名。,8.2.7數(shù)組,2聲明一維數(shù)組格式1：dim數(shù)組名(下標上限)as數(shù)據(jù)類型格式2：dim數(shù)組名(下標下限to下標上限)as數(shù)據(jù)類型例如：dima(6)asinteger功能：聲明了有7個元素的數(shù)組a，元素下標從0到6，默認值均為0。例如：dimb(1to6)asstring功能：聲明了有6個元素的數(shù)組b，下標從1到6，默認值均為空串。說明：（1）如果不定義數(shù)組下標的下限，默認下標下限為0。（2）數(shù)組定義中的參數(shù)必須是常數(shù)。（3）如果使用as語句定義數(shù)組類型，同一數(shù)組只能存放相同類型數(shù)據(jù)。,3聲明多維數(shù)組格式：dim數(shù)組名(下標上限1，下標上限2，)as數(shù)據(jù)類型例如：dimc(3，4)asinteger功能：聲明有20個元素的數(shù)組c，行下標從0到3，列下標從0到4。例如：dimd(1to3，2to4)asinteger功能：聲明有9個元素的數(shù)組d，行下標從1到3，列下標從2到4。4使用數(shù)組聲明數(shù)組后，每個數(shù)組元素都被當(dāng)作單個變量使用。一維數(shù)組元素的引用格式：數(shù)組名（下標）二維數(shù)組元素的引用格式：數(shù)組名（下標1，下標2）,例：使用符號常量和數(shù)組,（1）在窗體建文本框名稱為t1。（2）在窗體建命令按鈕名稱為c1標題為“確定”。（3）c1的代碼：,constAA=“歡迎你!”定義符號常量dimb(1)AsString定義數(shù)組b(0)=AAb(1)=t1MsgBoxb(0):bb=標點符號CaseElse:bb=特殊字符EndSelectMsgBoxbb,（3）轉(zhuǎn)到窗體視圖文本框中輸入字母單擊按鈕顯示消息框。,8.4.4選擇函數(shù)與計時器事件,1iif函數(shù)格式：iif(條件，表達式1，表達式2)功能：如果條件為真，函數(shù)值為表達式1的值，否則，函數(shù)值為表達式2的值。例：y=iif(ab，a大，b大)2switch函數(shù)格式：switch(條件1，表達式1，條件2，表達式，條件n，表達式n)功能：從左到右依次判斷，遇到第一個條件為真時返回對應(yīng)表達式的值。說明：條件與表達式成對，當(dāng)多個條件為真時，只取第一個條件的對應(yīng)表達式。例：y=switch(x0，1),3choose函數(shù)格式：choose(索引式，值1，值2，值n)功能：根據(jù)索引項的值，返回對應(yīng)的值。說明：索引項通常是整型變量名，取值范圍1n，超出范圍時返回NULL。例如：y=choose(x，優(yōu)秀，良好，中等，及格，不及格),4計時器事件VBA沒有直接提供時間控件，通過timer事件實現(xiàn)定時功能。方法：首先設(shè)置窗體的計時器間隔屬性TimerInterval，然后給timer事件寫過程代碼。打開窗體時，每隔一個時間間隔激發(fā)一次timer事件，事件的過程就被執(zhí)行一次，從而實現(xiàn)“定時”處理功能。計時器間隔的時間單位為毫秒，1000毫秒=1秒。,例:顯示電子表,（1）建立2個標簽名稱為b1和b2標題都為數(shù)字1。（2）打開窗體的屬性窗口單擊“事件”選項卡設(shè)置計時器間隔屬性為1000。（3）在VBE窗口“通用-聲明”寫代碼：PublicaAsBooleana為邏輯型，默認false（4）Form的Timer事件代碼：a=Notab1.Caption=Time()b2.Caption=CInt(b2.Caption)+1b2.ForeColor=IIf(a=True,255,16711680),（5）轉(zhuǎn)到窗體視圖。b1中顯示系統(tǒng)當(dāng)前時間，b2中的數(shù)字每秒增加1，數(shù)字的顏色紅、藍交替，每秒換一次。,8.4.5驗證函數(shù),VBA的常用驗證函數(shù),例:檢驗字符串類型,（1）建文本框名稱為t1附加標簽標題為“輸入年齡：”。（2）建命令按鈕名稱分別為c1標題為“驗證”。（3）c1的click事件代碼：Ift1=OrIsNull(t1)ThenMsgBox不能為空!,vbCritical,提示ElseIfIsNumeric(t1)=FalseThenMsgBox必須是數(shù)字!,vbCritical,提示ElseIft1=150ThenMsgBox超出范圍!,vbCritical,提示ElseMsgBox驗證通過!,vbInformation,提示EndIf,（4）轉(zhuǎn)到窗體視圖在文本框中輸入一個字母單擊“驗證”按鈕消息框顯示消息“必須是數(shù)字！”。,8.4.6循環(huán)語句,當(dāng)某一程序段需要反復(fù)執(zhí)行，用循環(huán)結(jié)構(gòu)實現(xiàn)。循環(huán)結(jié)構(gòu)對應(yīng)兩類循環(huán)語句：先判斷后執(zhí)行的循環(huán)語句（當(dāng)型循環(huán)結(jié)構(gòu)）先執(zhí)行后判斷的循環(huán)語句（直到型循環(huán)結(jié)構(gòu)）,1for-next循環(huán)for-next循環(huán)能使語句序列運行指定次數(shù)，循環(huán)中有一個計數(shù)器變量，變量的值隨每一次循環(huán)增加或減少。for-next是當(dāng)型循環(huán)結(jié)構(gòu)，先判斷后執(zhí)行。（1）格式：for循環(huán)變量=初值to終值step步長語句序列next（2）功能先將初值賦給循環(huán)變量，再將循環(huán)變量的當(dāng)前值與終值做比較，如果比較結(jié)果為真執(zhí)行語句序列，增加一個步長，再進行比較，如果比較結(jié)果仍為真，繼續(xù)循環(huán)。如果比較結(jié)果為假，結(jié)束循環(huán)。,（3）說明步長大于0時判斷循環(huán)變量的當(dāng)前值是否大于終值，步長小于0判斷循環(huán)變量的當(dāng)前值是否小于終值。步長為0時導(dǎo)致循環(huán)無法結(jié)束，所以步長不要設(shè)置為0。步長可以是整數(shù)或小數(shù)，步長為1時可以省略。除第一次循環(huán)以外，其他循環(huán)增加一個步長后與終值比較。for循環(huán)可以嵌套。在for循環(huán)中可以用exitfor語句強行中止循環(huán)。,練習(xí)：閱讀下面程序段，循環(huán)結(jié)束后，各變量的值是多少？dimsasinteger,iasintegers=0fori=1to10step2s=s+ii=i+2next結(jié)論：循環(huán)結(jié)束后，變量i的值是13，變量s的值是15。,例：顯示Fibonacci數(shù)列的第15個元素,（Fibonacci數(shù)列的前兩個數(shù)都是1，從第3個數(shù)開始，每個數(shù)都是前兩個數(shù)之和。）,（1）建立文本框名稱為t1建立命令按鈕名稱為c1。（2）c1的click事件代碼：Dimf(15)AsIntegerf(1)=1：f(2)=1Fori=3To15f(i)=f(i-1)+f(i-2)Nextt1=f(15),2do-while-loop循環(huán)do-while-loop循環(huán)是當(dāng)型循環(huán)結(jié)構(gòu)，先判斷后執(zhí)行。（1）格式dowhile循環(huán)條件語句序列l(wèi)oop（2）功能先檢查循環(huán)條件是否成立，若條件為真，執(zhí)行語句序列。遇到loop語句時返回循環(huán)開始處重新判斷，若條件仍然為真，再次執(zhí)行語句序列。當(dāng)條件為假時退出循環(huán)。,（3）說明可以用exitdo強行中止循環(huán)。要考慮循環(huán)變量賦初值和給循環(huán)變量增加步長的問題。如果將while換成until，當(dāng)條件為真時循環(huán)結(jié)束。練習(xí)：閱讀下面的程序（注：大寫字母A的ASCII碼是65。）dima(26)asstring,b(26)asinteger,dimiasintegeri=1給循環(huán)變量賦初值dowhilei=26a(i)=chr(i+64)將ASCII碼變?yōu)樽帜竍(i)=Lcase(a(i)將大寫字母變?yōu)樾懽帜竔=i+1使循環(huán)變量增加1loop,3do-loop-while循環(huán)是直到型循環(huán)結(jié)構(gòu)，先執(zhí)行后判斷。（1）格式do語句序列Loopwhile循環(huán)條件（2）功能先執(zhí)行語句序列，遇到loop語句時判斷循環(huán)條件，若條件為真，再次執(zhí)行語句序列。當(dāng)條件為假時退出循環(huán)。（3）說明可以用exitdo強行中止循環(huán)。要考慮給循環(huán)變量賦初值和給循環(huán)變量增加步長的問題。如果將while換成until，當(dāng)條件為真時循環(huán)結(jié)束。,4for-each循環(huán)語句foreach循環(huán)用來遍歷數(shù)組或?qū)ο蠹现忻恳粋€元素，不需要指定循環(huán)次數(shù)，每個元素只遍歷一次。如果不知道一個集合有多少個元素，用foreach循環(huán)非常方便。（1）格式foreach循環(huán)變量in集合或數(shù)組語句序列next（2）功能用循環(huán)變量依次遍歷數(shù)組或?qū)ο蠹现忻恳粋€元素，直到遍歷結(jié)束。,練習(xí)：閱讀下面程序。dima(50)asinteger,iasinteger,sasintegerfori=1to50給數(shù)組賦值a(i)=inexts=0foreachiina遍歷a中元素ifimod20thens=s+i計算奇數(shù)之和next,8.5過程調(diào)用與參數(shù)傳遞,8.5.1認識過程和參數(shù),1過程過程是用來執(zhí)行特定任務(wù)的一段獨立的程序代碼，這段代碼能被反復(fù)調(diào)用。VBA的模塊以過程為單元組成。VBA的過程根據(jù)是否返回值分為兩類：Sub過程和Function過程。Sub過程只執(zhí)行操作不返回值，不能用在表達式中，調(diào)用時就象使用基本語句一樣。Function過程又稱為用戶自定義函數(shù)，執(zhí)行操作后返回結(jié)果，常用在表達式中，調(diào)用時就象使用基本函數(shù)一樣。過程名是標識符，不要與模塊名重名，否則調(diào)用時會出現(xiàn)混亂。同一模塊中，Sub過程也不要與Function過程重名。過程不能嵌套定義，但可以嵌套調(diào)用。,2參數(shù)如果在調(diào)用過程中，主調(diào)方（調(diào)用過程的語句）與被調(diào)方（過程）存在數(shù)據(jù)傳遞關(guān)系，表現(xiàn)這種傳遞關(guān)系的數(shù)據(jù)就是參數(shù)。參數(shù)分為形參（形式參數(shù)）和實參（實際參數(shù)）。形參用在被調(diào)方，只能是變量名或數(shù)組名。實參用在主調(diào)方，可以是常量、已賦值的變量、有計算結(jié)果的表達式。當(dāng)形參和實參都是變量時，存在兩種參數(shù)傳遞方式：值傳遞與地址傳遞。值傳遞只能把實參的值傳給形參，是“單向傳遞”。地址傳遞能在實參與形參之間實現(xiàn)參數(shù)的“雙向傳遞”，不但將實參的值傳給形參，形參的值也可以傳給實參。,8.5.2sub過程,sub過程是包含在sub和endsub之間的一組代碼，調(diào)用sub過程時只執(zhí)行其中的操作，不返回值。1定義sub過程的格式sub過程名（形參1as數(shù)據(jù)類型，形參2as數(shù)據(jù)類型，）語句序列endsub2調(diào)用sub過程格式1：call過程名（實參1，實參2，）格式2：過程名實參1，實參2，,3說明（1）參數(shù)之間用逗號分隔，對應(yīng)的形參與實參之間要類型匹配。（2）用格式1調(diào)用sub過程必須加括號，用格式2調(diào)用sub過程不加括號。（3）用exitsub語句立即從sub過程中退出。（4）定義sub過程時即使無任何參數(shù)，也必須包含空括號（）。（5）sub之前可以用public或private或static定義過程作用域。（6）標準模塊中的過程可以被所有對象調(diào)用，類模塊中的過程只在本模塊中有效。,例：sub過程練習(xí),（1）建2個文本框名稱分別為t1和t2附加標簽標題分別為“輸入矩形長：”和“輸入矩形寬：”。（2）建命令按鈕名稱為c1標題為“計算”。（3）建立標準模塊以“過程模塊”為名保存模塊。（4）在“過程模塊”中定義jxmj過程，代碼如下：PublicSubjxmj(hAsInteger,wAsInteger)DimsAsIntegers=h*w計算矩形面積MsgBox矩形面積為:&s顯示矩形面積EndSub,（5）命令按鈕c1的click事件代碼：Dima1AsInteger,a2AsIntegera1=t1:a2=t2Calljxmj(a1,a2)用格式1調(diào)用sub模塊（6）轉(zhuǎn)到窗體視圖輸入矩形長和寬單擊“計算”按鈕。,8.5.3function過程,1定義function過程的格式function過程名（形參1，形參2，）as數(shù)據(jù)類型語句序列過程名=表達式endfunction2調(diào)用function過程調(diào)用function過程只有一種方式，即直接引用過程名，而且過程名在賦值號右端或在表達式中。,3說明（1）參數(shù)之間用逗號分隔，對應(yīng)形參與實參之間要類型匹配。（2）“過程名=表達式”是function過程中不可缺少的語句。（3）用exitfunction語句立即從function過程中退出。（4）若function過程無任何參數(shù)，也必須包含空括號（）。（5）function之前可以用public或private或static定義過程的作用域。,例：function過程練習(xí),（1）建文本框名稱為t1。（2）建標簽名稱為Lab標題為“圓面積=”（3）建命令按鈕名稱為c1標題為“計算”。,（4）在已有的“過程模塊”中添加ymj過程，代碼如下：PublicFunctionymj(rAsInteger)AsSingleymj=r*r*3.14EndFunction（5）命令按鈕c1的click事件代碼：DimaAsIntegera=t1Lab.Caption=Lab.Caption&ymj(a),（6）轉(zhuǎn)到窗體視圖在文本框中輸入半徑單擊“計算”按鈕計算結(jié)果顯示在標簽中。,8.5.4參數(shù)傳遞,當(dāng)實參是變量名時，既可以用傳值方式傳遞參數(shù)，也可以用傳地址的方式傳遞參數(shù)。,1參數(shù)的值傳遞如果在過程的形參前加byval說明符，參數(shù)的傳遞方式為“傳值”。值傳遞的含義是指在過程中另外開辟存儲單元存放從實參傳過來的值，一旦過程結(jié)束，過程中開辟的存儲單元被釋放，該單元數(shù)據(jù)的改變不會保留下來。,2參數(shù)的地址傳遞如果在過程的形參前加byref說明符，參數(shù)的傳遞方式為“傳地址”，參數(shù)的地址傳遞是默認選項，不加任何說明符，默認就是傳地址。地址傳遞的含義是指過程中的形參與主調(diào)方的實參指向同一個存儲單元，在過程中對存儲單元所做的修改，當(dāng)過程結(jié)束后成為實參的當(dāng)前值。地址傳遞通常用在sub過程中。,例：參數(shù)傳遞練習(xí),（1）建立2個文本框名稱分別為t1和t2。（2）建立命令按鈕名稱為c1標題為“調(diào)用過程”。（3）在已有的“過程模塊”中添加cscd過程，代碼如下：PublicSubcscd(ByRefaAsInteger,ByValbAsInteger)a=a+10b=b+10EndSub,（4）命令按鈕c1的click事件代碼：DimxAsInteger,yAsIntegerx=t1:y=t2cscdx,y用格式2調(diào)用sub過程t1=x:t2=y（5）轉(zhuǎn)到窗體視圖在兩個文本框中都輸入10單擊“調(diào)用過程”按鈕計算結(jié)果仍顯示在文本框中。,