1、1 本周六下午2:30在計(jì)A321-1以班級(jí)為單位，購(gòu)買VB習(xí)題集（自愿），3元1份。通 知2第4、5、6三章需要完全掌握的例題 例 4-4、4-6、4-7、4-13、4-17、4-18、4-19、 4-21、4-23 例 5-2、5-3、5-4、5-6、5-7、5-8、 5-10、5-11 例 6-1、6-3、6-4、6-5、6-10、6-17、 6-18、6-19、6-22、6-23 其中感覺(jué)有困難的一定要想辦法弄懂，一看就有思路的不妨寫(xiě)一寫(xiě)，或換種方法重新編寫(xiě)。3復(fù)習(xí)上節(jié)課內(nèi)容1. Sub子過(guò)程的定義及調(diào)用2. Function函數(shù)過(guò)程的定義及調(diào)用3. 例6-1求組合數(shù) 例6-5求孿生素

2、數(shù) 分別用子過(guò)程和函數(shù)來(lái)寫(xiě)。46.4 參數(shù)的傳遞 在調(diào)用一個(gè)有參數(shù)的過(guò)程時(shí)，首先進(jìn)行的是“形實(shí)結(jié)合”，實(shí)現(xiàn)調(diào)用程序與被調(diào)用的過(guò)程之間的數(shù)據(jù)傳遞。1、形參和實(shí)參2、按值傳遞和按地址（引用）傳遞 區(qū)別標(biāo)志：形參前加“ByVal”關(guān)鍵字時(shí)是按值傳,否則為按地址傳.51、形參與實(shí)參（1）形參： 為變量， 實(shí)參： 可以是變量、常量、 表達(dá)式、數(shù)組元素；（2）形參： 為數(shù)組， 實(shí)參： 一定是數(shù)組。62、按值傳遞與按地址傳遞 按值傳遞Private Sub Form_Click( ) 事件過(guò)程 Dim m As Integer, n As Integer m = 15: n = 10 Print 調(diào)用過(guò)程T

3、est前; m=; m, n=; n Call test(m, n) Print 調(diào)用過(guò)程Test后; m=; m, n=; nEnd SubSub test(ByVal x As Integer, ByVal y As Integer) x = x + 5 ： y = x + 2 * y Print 形參的值; x=; x, y=; yEnd Sub通用過(guò)程-自定義子過(guò)程7按值傳遞參數(shù)的程序結(jié)果8Private Sub Form_Click( ) 事件過(guò)程 Dim m As Integer, n As Integer m = 15: n = 10 Print 調(diào)用過(guò)程Test前; m=; m

4、, n=; n Call test(m, n) Print 調(diào)用過(guò)程Test后; m=; m, n=; nEnd SubSub test(x As Integer, y As Integer) x = x + 5 ： y = x + 2 * y Print 形參的值; x=; x, y=; yEnd Sub通用過(guò)程-自定義子過(guò)程2、按值傳遞與按地址傳遞 按地址傳遞9按地址傳遞參數(shù)的程序結(jié)果10 （1）使用按地址傳遞的形參，對(duì)應(yīng)的實(shí)參要求同類型的變量（或數(shù)組元素）。若實(shí)參是常量或表達(dá)式，則按傳值方式傳遞，若和形參類型不一致，則系統(tǒng)自動(dòng)對(duì)實(shí)參進(jìn)行類型轉(zhuǎn)換，將轉(zhuǎn)換后的值送給形參。說(shuō)明P16911 （

5、2）將變量轉(zhuǎn)變?yōu)楸磉_(dá)式的方法為將變量加括號(hào)。 例6-8 參數(shù)的數(shù)據(jù)類型轉(zhuǎn)換說(shuō)明P16912 若在應(yīng)用程序中用“Private Sub Sub1(x As Integer,y As Single)”定義了子程序Sub1,主調(diào)程序中的變量I,J均為Integer型，則正確調(diào)用子程序Sub1的Call語(yǔ)句是 。Call Sub1(I,J) Call sub1(“245”,”231.5”) CallSub1(3.14,234) Call Sub1(3.1415,I)Call Sub1(3.1415,（I）) Call Sub1(“245abv”,”231.5”)練習(xí)：133、 數(shù)組參數(shù)的傳遞 數(shù)組按地

6、址方式傳遞。 形參數(shù)組的語(yǔ)法格式： 形參數(shù)組名( ) As 類型143、 數(shù)組參數(shù)的傳遞 形參數(shù)組的語(yǔ)法格式： 形參數(shù)組名( ) As 類型注意:（1）對(duì)應(yīng)的實(shí)參必須是數(shù)組，且類型 與形參類型一致。 （2）實(shí)參數(shù)組直接放在實(shí)參表中，忽 略維數(shù)的定義，圓括號(hào)可以省略。15 （3）如果被調(diào)過(guò)程不知道實(shí)參數(shù)組的上下界，可用LBound和UBound函數(shù)確定實(shí)參數(shù)組的下界和上界。 LBound和UBound函數(shù)格式： L|UBound（數(shù)組名，維數(shù)） 示例：3、 數(shù)組參數(shù)的傳遞16數(shù)組參數(shù)的傳遞示例：Private Sub Printarr( a( ) As Integer ) Dim i As In

7、teger For i=LBound(a) To UBound(a) Print a(i)；Next IEnd Sub Private Sub Form_Click( ) Dim a(1 to 4) As Integer, b(2 To 5) As Integer . a ,b 數(shù)組元素?cái)?shù)據(jù)輸入,處理 Call Printarr( a( ) ): Call Printarr( b )End Sub形參數(shù)組實(shí)參數(shù)組17 （4）在過(guò)程中不能用Dim語(yǔ)句對(duì)形參數(shù)組進(jìn)行聲明。但如果實(shí)參數(shù)組是動(dòng)態(tài)的，則可以在過(guò)程中用Redim語(yǔ)句來(lái)改變數(shù)組的大小，被調(diào)用以后，實(shí)參數(shù)組的維界也會(huì)隨之變化。 例題：3、 數(shù)

8、組參數(shù)的傳遞18累乘積問(wèn)題 例6-9 Private Sub Command1_Click() Dim a%(1 To 5) , b%(3 To 8) , i% , t1# , t2# for i=1 to 5 a(i)=i next i for i=3 to 8 b(i)=i next i t1=tim(a() : t2=tim(b) print “t1=”,t1, “t2=”,t2 end subFunction tim(a() As Integer) Dim t#, i% t=1 For i=LBound(a) To UBound(a) t=t*a(i) Next i tim=tEnd

9、Function19例6-10 選擇法排序分析：P195 21（1）（千萬(wàn)不能暈） 例題：20 對(duì)于可變參數(shù)的過(guò)程，在調(diào)用時(shí)，傳遞的實(shí)參的個(gè)數(shù)和類型可以是任意變化的。 其格式為： Sub 過(guò)程名(ParamArray 數(shù)組名() 例6-114、可變參數(shù)（了解）21 對(duì)象參數(shù)：將窗體或控件作為通用過(guò)程的參數(shù)，其用法與數(shù)據(jù)類型作為參數(shù)一樣。 在形參表中如果是窗體參數(shù)，則用As Form來(lái)定義,如果是控件參數(shù)，則用As Control來(lái)定義。 如果實(shí)參為對(duì)象，則只能按地址傳遞。 例6-125、對(duì)象參數(shù)（了解）22已知有下面過(guò)程Private Sub procl(a%,b$,Optional x As

10、 Boolean) End Sub正確調(diào)用此過(guò)程的語(yǔ)句是 Call procl(5) Call procl 5, ”abc”, false procl(12, ”abc”, True) procl 5, ”abc” end of 6.46、可選參數(shù) 看一個(gè)例題236.5 變量、過(guò)程的作用域 變量、過(guò)程可被訪問(wèn)的范圍稱為變量、過(guò)程的作用域。1、變量的作用域2、過(guò)程的作用域241、變量作用域 它決定了哪些子過(guò)程或函數(shù)過(guò)程可能訪問(wèn)該變量。 分為:局部變量、窗體/模塊級(jí)變量、全局變量。251、變量作用域（1）局部變量 ：過(guò)程中 Dim|Static 變量名 As 類型, .（2）窗體/模塊級(jí)變量：窗體

11、/模塊通用聲明Dim|Private 變量名 As 類型, .（3）全局變量：窗體/模塊的通用聲明 Public 變量名 As 類型，.26在“過(guò)程內(nèi)”用Dim或Static聲明的變量只能在本過(guò)程中使用, 別的過(guò)程不可訪問(wèn)Dim|Static 變量名 As 類型,變量名 As 類型.局部靜態(tài)變量局部變量(1) 局部變量27 Dim：定義的變量，只在執(zhí)行期間存在，過(guò)程執(zhí)行結(jié)束，變量?jī)?nèi)容自動(dòng)消失，每次調(diào)用重新對(duì)變量進(jìn)行初始化；(1) 局部變量28 Static：定義的變量，在程序的整個(gè)運(yùn)行過(guò)程中可保留變量的值，直到結(jié)束程序的運(yùn)行，即每次調(diào)用過(guò)程時(shí)，靜態(tài)變量保持原來(lái)的值，而不被重新初始化。 例如：(

12、1) 局部變量29 在一個(gè)窗體/模塊的任何過(guò)程外 即在“通用聲明”處。 可被本窗體/模塊的任何過(guò)程訪問(wèn)。Dim|Private 變量名 As 類型,變量名 As 類型.(2)窗體/模塊級(jí)變量30在窗體或標(biāo)準(zhǔn)模塊的任何“過(guò)程或函數(shù)”外 即在“通用聲明”處,用Public語(yǔ)句聲明的變量。Public 變量名 As 類型, 變量名 As 類型.(3)全局變量31(3)全局變量作用域: 整個(gè)應(yīng)用程序,可被應(yīng)用程序的任何過(guò)程訪問(wèn). 其值在整個(gè)程序中保留, 直到整個(gè)程序運(yùn)行結(jié)束,才會(huì)消失.32變量作用域總結(jié):對(duì)不同作用范圍的3種變量聲明及使用規(guī)則作用范圍局部變量窗體模塊級(jí)變量全局變量窗體標(biāo)準(zhǔn)模塊聲明方式被其它模塊過(guò)程存取被本模塊的其他過(guò)程存取聲明位置Dim，Static不能不能在過(guò)程中Dim，Private不能能窗體模塊的“通用聲明”段Public能，但在變量名前加窗體名能窗體/模塊的“通用聲明”段能33過(guò)程的作用域分為（1）窗體/模塊級(jí)（2）全局級(jí)。2、過(guò)程的作用域34（1）窗體