函數(shù)、過(guò)程的定義和調(diào)用(一)15

1、浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 第六章 過(guò) 程 掌握子過(guò)程掌握子過(guò)程(Sub過(guò)程的定義、調(diào)用過(guò)程的定義、調(diào)用)；掌握函數(shù)過(guò)程（掌握函數(shù)過(guò)程（Function過(guò)程）的定義、調(diào)用；過(guò)程）的定義、調(diào)用；掌握值傳遞、地址傳遞的傳遞規(guī)則；掌握值傳遞、地址傳遞的傳遞規(guī)則；理解遞歸的概念。理解遞歸的概念。本章要求：本章要求：本章重點(diǎn)：本章重點(diǎn)：Sub過(guò)程及過(guò)程及Function過(guò)程的定義與調(diào)用。過(guò)程的定義與調(diào)用。過(guò)程調(diào)用中數(shù)據(jù)的傳遞。過(guò)程

2、調(diào)用中數(shù)據(jù)的傳遞。本章難點(diǎn)：本章難點(diǎn)：過(guò)程調(diào)用中數(shù)據(jù)的傳遞。過(guò)程調(diào)用中數(shù)據(jù)的傳遞。浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 6.1 過(guò)程概述過(guò)程概述在在VB5.0/6.0中，除了系統(tǒng)提供的內(nèi)部函數(shù)過(guò)程和中，除了系統(tǒng)提供的內(nèi)部函數(shù)過(guò)程和事件過(guò)程外，用戶可自定義過(guò)程下列四種過(guò)程：事件過(guò)程外，用戶可自定義過(guò)程下列四種過(guò)程： “Sub” 保留字開始的為子過(guò)程保留字開始的為子過(guò)程“Function” 保留字開始的為函數(shù)過(guò)程保留字開始的為函數(shù)過(guò)程

3、 “Property”保留字開始的為屬性過(guò)程保留字開始的為屬性過(guò)程“Event”保留字開始保留字開始的事件過(guò)程的事件過(guò)程浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 在在VB中，的中，的Sub子過(guò)程分為：子過(guò)程分為：事件過(guò)程和通用過(guò)程事件過(guò)程和通用過(guò)程 6.2.1 事件過(guò)程事件過(guò)程 （1）窗體事件的語(yǔ)法）窗體事件的語(yǔ)法Private Sub Form_事件名事件名(參數(shù)列表參數(shù)列表) 語(yǔ)句組語(yǔ)句組End Sub （2）控件事件的語(yǔ)法）控件

4、事件的語(yǔ)法Private Sub 控件名控件名_事件名事件名(參數(shù)列表參數(shù)列表) 語(yǔ)句組語(yǔ)句組 End Sub6.2 Sub過(guò)程過(guò)程浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 子過(guò)程的定義形式如下：子過(guò)程的定義形式如下：Public|PrivateStatic Sub 子過(guò)程名子過(guò)程名(形參表形參表) 語(yǔ)句組語(yǔ)句組 Exit Sub 語(yǔ)句組語(yǔ)句組End Sub 6.2.2 通用過(guò)程（通用過(guò)程（Sub過(guò)程）的定義過(guò)程）的定義 說(shuō)明：說(shuō)明：

5、（1）子過(guò)程名：子過(guò)程名：命名規(guī)則與變量名規(guī)則相同。命名規(guī)則與變量名規(guī)則相同。子過(guò)程名不返回值，而是通過(guò)形參與實(shí)參的傳遞得到結(jié)果，子過(guò)程名不返回值，而是通過(guò)形參與實(shí)參的傳遞得到結(jié)果，調(diào)用時(shí)可返回多個(gè)值。調(diào)用時(shí)可返回多個(gè)值。6.2 Sub過(guò)程過(guò)程浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) （2）形式參數(shù)列表：形式參數(shù)列表：形式參數(shù)通常簡(jiǎn)稱形式參數(shù)通常簡(jiǎn)稱“形參形參”，僅表示，僅表示形參的類型、個(gè)數(shù)、位置，定義時(shí)是無(wú)值的，形參的類型、個(gè)數(shù)、

6、位置，定義時(shí)是無(wú)值的，只有在過(guò)程被只有在過(guò)程被調(diào)用時(shí)，虛實(shí)參結(jié)合后才獲得相應(yīng)的值調(diào)用時(shí)，虛實(shí)參結(jié)合后才獲得相應(yīng)的值。（3）過(guò)程可以無(wú)形式參數(shù)，但括號(hào)不能省。過(guò)程可以無(wú)形式參數(shù)，但括號(hào)不能省。（4）參數(shù)的定義形式：參數(shù)的定義形式：ByValByRef變量名變量名( )As 類型類型,，ByVal表示當(dāng)該過(guò)程被調(diào)用時(shí)，參數(shù)是按值傳遞的；表示當(dāng)該過(guò)程被調(diào)用時(shí)，參數(shù)是按值傳遞的；ByRef表示當(dāng)該過(guò)程被調(diào)用時(shí)，參數(shù)是按地址傳遞的。表示當(dāng)該過(guò)程被調(diào)用時(shí)，參數(shù)是按地址傳遞的。 6.2 Sub過(guò)程過(guò)程浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.

7、Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 例例6.1 編一個(gè)交換兩個(gè)整型變量值的子過(guò)程。編一個(gè)交換兩個(gè)整型變量值的子過(guò)程。6.2 Sub過(guò)程過(guò)程浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 6.2.3 子過(guò)程的建立子過(guò)程的建立 通過(guò)通過(guò) “工具工具”菜單中的菜單中的“添加過(guò)程添加過(guò)程”命令，出現(xiàn)命令，出現(xiàn)“添加添加過(guò)程過(guò)程”對(duì)話框（見(jiàn)圖對(duì)話框（見(jiàn)圖6.1），選擇過(guò)程類型（子過(guò)程、函數(shù)、

8、），選擇過(guò)程類型（子過(guò)程、函數(shù)、屬性、事件）及作用范圍（公有的屬性、事件）及作用范圍（公有的Public、私有的、私有的Private），），單擊確定后得到一個(gè)過(guò)程或函數(shù)定義的結(jié)構(gòu)框架（模板），單擊確定后得到一個(gè)過(guò)程或函數(shù)定義的結(jié)構(gòu)框架（模板），如：如：Public Sub Sort( )End Sub6.2 Sub過(guò)程過(guò)程浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 6.2.4 過(guò)程的調(diào)用過(guò)程的調(diào)用 1 子過(guò)程的調(diào)用子過(guò)程的調(diào)用 子過(guò)程

9、名子過(guò)程名 參數(shù)列表參數(shù)列表 或或 Call 子過(guò)程名子過(guò)程名(參數(shù)列表參數(shù)列表)說(shuō)明：說(shuō)明： （1）參數(shù)列表參數(shù)列表稱為實(shí)參或?qū)嵲仨毰c形參保持個(gè)數(shù)稱為實(shí)參或?qū)嵲?，它必須與形參保持個(gè)數(shù)相同，位置與類型一一對(duì)應(yīng)。相同，位置與類型一一對(duì)應(yīng)。 （2）調(diào)用時(shí)把實(shí)參值傳遞給對(duì)應(yīng)的形參。其中值傳遞）調(diào)用時(shí)把實(shí)參值傳遞給對(duì)應(yīng)的形參。其中值傳遞（形參前有（形參前有ByVal說(shuō)明）時(shí)實(shí)參的值不隨形參的值變化而改變。說(shuō)明）時(shí)實(shí)參的值不隨形參的值變化而改變。而地址傳遞時(shí)實(shí)參的值隨形參值的改變而改變。而地址傳遞時(shí)實(shí)參的值隨形參值的改變而改變。6.2 Sub過(guò)程過(guò)程浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)

10、院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) （3）當(dāng)參數(shù)是）當(dāng)參數(shù)是數(shù)組數(shù)組時(shí)，形參與實(shí)參在參數(shù)聲明時(shí)應(yīng)省略時(shí)，形參與實(shí)參在參數(shù)聲明時(shí)應(yīng)省略其維數(shù)，但括號(hào)不能省。其維數(shù)，但括號(hào)不能省。 （4）調(diào)用子過(guò)程的形式有兩種，用）調(diào)用子過(guò)程的形式有兩種，用Call關(guān)鍵字時(shí)，實(shí)參關(guān)鍵字時(shí)，實(shí)參必須加圓括號(hào)括起，反之則實(shí)參之間用必須加圓括號(hào)括起，反之則實(shí)參之間用“，”分隔。分隔。 例：調(diào)用上面定義的例：調(diào)用上面定義的Swap子過(guò)程的形式：子過(guò)程的形式： Swap a,b Call Swap(a,b

11、)6.2 Sub過(guò)程過(guò)程浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) Private Sub CmdOK() Call Swap(a,b) Swap a,bEnd SubPrivate Sub Swap(x%,y%) Dim temp% Temp=X X=Y Y=TempEnd Sub 過(guò)程調(diào)用的執(zhí)行過(guò)程：過(guò)程調(diào)用的執(zhí)行過(guò)程：6.2 Sub過(guò)程過(guò)程浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit

12、.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 6.3 Function過(guò)程過(guò)程 Visual Basic函數(shù)分為內(nèi)部函數(shù)和外部函數(shù)，外部函數(shù)是函數(shù)分為內(nèi)部函數(shù)和外部函數(shù)，外部函數(shù)是用戶根據(jù)需要用用戶根據(jù)需要用Function關(guān)鍵字定義的函數(shù)過(guò)程，關(guān)鍵字定義的函數(shù)過(guò)程，與子過(guò)程與子過(guò)程不同的是函數(shù)過(guò)程將返回一個(gè)值不同的是函數(shù)過(guò)程將返回一個(gè)值 。 6.3.1 函數(shù)過(guò)程（函數(shù)過(guò)程（Function過(guò)程）的定義過(guò)程）的定義Public|PrivateStaticFunction 函數(shù)名函數(shù)名()As 函數(shù)名函數(shù)名=返回值返回值 Exit

13、 Function 函數(shù)名函數(shù)名=返回值返回值 End Function如：如：public function fac(n as integer) as integer函數(shù)體浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 說(shuō)明：說(shuō)明：（1）函數(shù)名：函數(shù)名：命名規(guī)則與變量名規(guī)則相同。命名規(guī)則與變量名規(guī)則相同。（2）在函數(shù)體內(nèi)，函數(shù)名可以當(dāng)變量使用，函數(shù)的返回值就）在函數(shù)體內(nèi)，函數(shù)名可以當(dāng)變量使用，函數(shù)的返回值就是通過(guò)對(duì)函數(shù)名的賦值語(yǔ)句來(lái)實(shí)現(xiàn)的

14、，是通過(guò)對(duì)函數(shù)名的賦值語(yǔ)句來(lái)實(shí)現(xiàn)的，在函數(shù)過(guò)程中至少要對(duì)在函數(shù)過(guò)程中至少要對(duì)函數(shù)名賦值一次。函數(shù)名賦值一次。（3）AS類型：類型：是指函數(shù)返回值的類型，若省略，則函數(shù)返回是指函數(shù)返回值的類型，若省略，則函數(shù)返回變體類型值（變體類型值（Variant）。）。 （4）Exit Function：表示退出函數(shù)過(guò)程，常常是與選擇結(jié)構(gòu)：表示退出函數(shù)過(guò)程，常常是與選擇結(jié)構(gòu)（If或或Select Case語(yǔ)句）聯(lián)用，即當(dāng)滿足一定條件時(shí)，退出函語(yǔ)句）聯(lián)用，即當(dāng)滿足一定條件時(shí)，退出函數(shù)過(guò)程。數(shù)過(guò)程。（5）形參數(shù)列表形參數(shù)列表：形參的定義與子過(guò)程完全相同。：形參的定義與子過(guò)程完全相同。 6.3 Function過(guò)

15、程過(guò)程浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 6.3.2 函數(shù)的調(diào)用函數(shù)的調(diào)用調(diào)用形式如下：調(diào)用形式如下： 函數(shù)名（實(shí)參列表）函數(shù)名（實(shí)參列表）說(shuō)明：說(shuō)明： 在調(diào)用時(shí)實(shí)參和形參的數(shù)據(jù)類型、順序、個(gè)數(shù)必須在調(diào)用時(shí)實(shí)參和形參的數(shù)據(jù)類型、順序、個(gè)數(shù)必須匹配。函數(shù)調(diào)用只能出現(xiàn)在表達(dá)式中，其功能是求得函匹配。函數(shù)調(diào)用只能出現(xiàn)在表達(dá)式中，其功能是求得函數(shù)的返回值。數(shù)的返回值。6.3 Function過(guò)程過(guò)程浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：

16、浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 例例6.2 求求fac(n)=n!的函數(shù)的函數(shù)分析：根據(jù)求分析：根據(jù)求n！的定義！的定義 n!=n*(n-1)!，可寫成如下形式：，可寫成如下形式： 1,n=1Fac(n)= n*fac(n-1),n16.3 Function過(guò)程過(guò)程浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作

17、業(yè) 6.3 Function過(guò)程過(guò)程浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 6.4 過(guò)程之間參數(shù)的傳遞過(guò)程之間參數(shù)的傳遞Visual Basic中不同模塊（過(guò)程）之間數(shù)據(jù)的傳遞有兩種方式：中不同模塊（過(guò)程）之間數(shù)據(jù)的傳遞有兩種方式： 通過(guò)過(guò)程調(diào)用實(shí)參與形參的結(jié)合實(shí)現(xiàn)；通過(guò)過(guò)程調(diào)用實(shí)參與形參的結(jié)合實(shí)現(xiàn)；使用全局變量來(lái)實(shí)現(xiàn)各過(guò)程中共享數(shù)據(jù)。使用全局變量來(lái)實(shí)現(xiàn)各過(guò)程中共享數(shù)據(jù)。 6.4.1 6.4.1 形式參數(shù)與實(shí)際參數(shù)形式參數(shù)與實(shí)際參數(shù)

18、1、形式參數(shù)、形式參數(shù) 是指在定義通用過(guò)程時(shí)，出現(xiàn)在是指在定義通用過(guò)程時(shí)，出現(xiàn)在Sub或或Function語(yǔ)句中語(yǔ)句中的的變量名后面圓括號(hào)內(nèi)的數(shù)變量名后面圓括號(hào)內(nèi)的數(shù)，是用來(lái)接收傳送給子過(guò)程的是用來(lái)接收傳送給子過(guò)程的數(shù)據(jù)數(shù)據(jù)，形參表中的各個(gè)變量之間用逗號(hào)分隔。，形參表中的各個(gè)變量之間用逗號(hào)分隔。 Function tim(a() as integer) 浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 2、實(shí)際參數(shù)、實(shí)際參數(shù) 實(shí)際參數(shù)是指在調(diào)

19、用實(shí)際參數(shù)是指在調(diào)用Sub或或Function過(guò)程時(shí)，寫入子過(guò)程過(guò)程時(shí)，寫入子過(guò)程名或函數(shù)名后括號(hào)內(nèi)的參數(shù)，其作用是名或函數(shù)名后括號(hào)內(nèi)的參數(shù)，其作用是將它們的數(shù)據(jù)（數(shù)值或?qū)⑺鼈兊臄?shù)據(jù)（數(shù)值或地址）傳送給地址）傳送給Sub或或Function過(guò)程與其對(duì)應(yīng)的形參變量。過(guò)程與其對(duì)應(yīng)的形參變量。 實(shí)參可由常量、表達(dá)式、有效的變量名、數(shù)組名（后加左、實(shí)參可由常量、表達(dá)式、有效的變量名、數(shù)組名（后加左、右括號(hào)，如右括號(hào)，如A( )）組成，實(shí)參表中各參數(shù)用逗號(hào)分隔。）組成，實(shí)參表中各參數(shù)用逗號(hào)分隔。For i=1 to 5A(i)=iNext IT1=tim(a()6.4 過(guò)程之間參數(shù)的傳遞過(guò)程之間參數(shù)的傳

20、遞浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 6.4.2 參數(shù)傳遞（虛實(shí)結(jié)合）參數(shù)傳遞（虛實(shí)結(jié)合） 參數(shù)傳遞指主調(diào)過(guò)程的實(shí)參（調(diào)用時(shí)參數(shù)傳遞指主調(diào)過(guò)程的實(shí)參（調(diào)用時(shí)已有確定值和內(nèi)存已有確定值和內(nèi)存地址的參數(shù)地址的參數(shù)）傳遞給被調(diào)過(guò)程的形參，參數(shù)的傳遞有兩種方）傳遞給被調(diào)過(guò)程的形參，參數(shù)的傳遞有兩種方式：按值傳遞、按地址傳遞。形參前加式：按值傳遞、按地址傳遞。形參前加“ByVal”關(guān)鍵字的是關(guān)鍵字的是按按值傳遞。缺省值傳遞。缺省或加或加“

21、ByRef”關(guān)鍵字的為按關(guān)鍵字的為按地址傳遞地址傳遞。 6.4 過(guò)程之間參數(shù)的傳遞過(guò)程之間參數(shù)的傳遞浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：浙江科技學(xué)院教信系計(jì)算機(jī)基礎(chǔ)教學(xué)網(wǎng)站：www.Goit.Netwww.Goit.Net目錄6.1 6.2 6.3 6.4 6.5 6.6 6.7 6.8 小結(jié) 作業(yè) 傳址與傳值傳址與傳值 傳址：傳址： 形參得到的是實(shí)參的地址，當(dāng)形參值的改變同時(shí)形參得到的是實(shí)參的地址，當(dāng)形參值的改變同時(shí)也改變實(shí)參的值。也改變實(shí)參的值。 傳值：傳值： 形參得到的是實(shí)參的值，形參值的改變不會(huì)影響形參得到的是實(shí)參的值，形參值的改變不會(huì)影響實(shí)參的值。實(shí)參的值。Sub Swap2(x%, y%) Dim Temp% Temp = x: x = y: y = Temp End SubSub Swap1(ByVal x%, ByVal y%)Dim Temp% Temp = x: x = y: y = TempEnd Sub例例6.3 6.4 過(guò)程之間參數(shù)的傳