【正文】 ck() ?主窗體“計算”按鈕 39。 (2) UnLoad語句 格式： UnLoad 窗體名稱 功能：清除內(nèi)存中的窗體。 全局級 ：加 Public關(guān)鍵字（缺省）的過程，可供該應(yīng)用程序的所有窗體和所有標準模塊中的過程調(diào)用。 用 Static 聲明的變量 ：過程體結(jié)束后，不釋放存儲單元。 過程 全局變量要在 標準模塊 文件 (.bas)中的 通用聲明 部分用Global或 Public語句來聲明。 第 7章 調(diào) 用 調(diào) 用 第 7章 s End Sub 程序運行結(jié)果： 5! + 10! ＝ 3628920 Private Sub Jc( n As Integer, t As Long ) Dim i As Integer t = 1 For i = 1 To n t = t * i Next i End Sub 注意參數(shù) n及 t的調(diào)用情況 例 計算 5! + 10! 第 7章 第 7章 實參 ：是調(diào)用過程中已組織好的準備傳給形參的 常量、變量、表達式 或 數(shù)組控件對象 等。 （ 3）如果需要返回多個結(jié)果，可用函數(shù)過程實現(xiàn)也可用子過程實現(xiàn)，同時必須結(jié)合其他的形式，如全局變量、傳地址（實參形參間的傳遞）等。 過程 函數(shù)過程與 Sub過程的區(qū)別 (1)函數(shù)名 是一個變量，它有值，有類型，在函數(shù)體中至少賦值一次，并通過它可帶回一個結(jié)果；而 Sub過程名 ，它無值，無類型，在 Sub過程體內(nèi)不能賦值，不能通過它帶回結(jié)果。 s End Sub Function Jc( n As Integer) As Long Dim i As Integer , t as Long t = 1 For i = 1 To n t = t * i Next i Jc = t End Function 例 計算 5! + 10! Function Jc( n %) As Long Dim i As Integer Jc = 1 For i = 1 To n Jc = Jc * i Next i End Function 第 7章 過程 函數(shù)過程說明 1. As 類型： 返回值的類型 = 返回值 函數(shù)過程必須返回函數(shù)值，而函數(shù)名就代表了函數(shù)值，在函數(shù)體內(nèi)至少對函數(shù)名賦值一次。 (1) 在 VB中， Sub過程又稱為子過程。 過程 過程有兩個重要作用：一是把一個復(fù)雜的任務(wù)分解為若干個小任務(wù)，可以用過程來表達，從而使任務(wù)更易理解，更易實現(xiàn)，將來更易維護；二是代碼重用，使同一段代碼多次復(fù)用。計算 j!，需要循環(huán) j次 t = t * k 39。 過程 引言 在 VB中的兩種過程： （ 1）由系統(tǒng)提供過程 系統(tǒng)提供的 內(nèi)部函數(shù)過程 (如 sqr函數(shù) )和 事件過程（ click事件）。 ? 子程序過程：以 Sub保留字開始的過程； 第 7章 過程 階乘 n! (n!＝ 1 2 3 … n) Private Sub Form_Load( ) Show Dim t As Long, s As Long, i As Integer t = 1 For i = 1 To 5 t = t * i Next i s = t 例 計算 5! + 10! t = 1 For i = 1 To 10 t = t * i Next i s = s + t Print 5! + 10! =。子過程執(zhí)行完后，會返回 事件過程 中調(diào)用語句 Call的后續(xù)語句繼續(xù)執(zhí)行 調(diào)用過程 …… Call SubA …… Call SubA …… Call SubB …… 子過程 SubA 子過程 SubB 通用過程 第 7章 過程 Sub過程的調(diào)用 格式： Call 過程名 (實參列表 ) 或 過程名 實參列表 說明： ① 實參的個數(shù)、類型、順序應(yīng)與相應(yīng)的形參保持一致，子過程中如果沒有形參，則調(diào)用中也無實參。 第 7章 s End Sub Private Sub Jc( n As Integer, t As Long ) Dim i As Integer t = 1 For i = 1 To n t = t * i Next i End Sub 例 計算 5! + 10! 第 7章 過程 函數(shù)過程與 Sub過程的區(qū)別 (2)調(diào)用時，子過程調(diào)用是一句獨立的語句。 (2) 利用代碼窗口手工輸入代碼的方式建立函數(shù)過程。 第 7章 x Call test2(x) Print 執(zhí)行 test2后， x=。 過程 在一個過程 (Sub過程和 Function過程 )中調(diào)用另外一個過程。 應(yīng)用程序 (.vbp)文件 至少有一個或若干個窗體模塊 (.frm)文件 其它模塊如類模塊 (.cls)文件等 可以有一個或若干個標準模塊 (.bas)文件 事件過程 (sub) 子過程 (sub) 函數(shù)過程 (function) 子過程 (sub) 函數(shù)過程 (function) 自定義屬性過程 自定義方法過程 自定義事件過程 第 7章 在一個窗體中，不同過程中定義的局部變量可以同名。 過程 生存期，即變量能夠保持其值的時間 ，分為 動態(tài)變量 和 靜態(tài)變量 1. 動態(tài)變量 程序運行進入變量所在的過程時，才為變量分配內(nèi)存單元，退出過程時，該變量占用的內(nèi)存單元自動釋放，其值消失。 過程 靜態(tài)變量（局部變量） Static Function 函數(shù)名 ([參數(shù)列表 ]) [As 類型 ] Static Sub 子過程名 [(參數(shù)列表 )] 說明 ： 過程名前加 Static，表示該過程內(nèi)的局部變量都是靜態(tài)變量。 Private 第 7章 (4) Hide方法 格式： ［窗體名稱］ .Hide 功能：隱藏指定的窗體，即不在屏幕上顯示，但仍保存在內(nèi)存中，因此它與 UnLoad的作用是不一樣的。主窗體“結(jié)束”按鈕 Unload Form1 Unload Form2 Unload Form3 End End Sub 先卸載所有已打開的窗體 第 7章 隱藏“計算”窗體 39。 過程 標準模塊 標準模塊是獨立于窗體的程序單位，其擴展名為 .bas。例如 2， 3， 5， 7 是質(zhì)數(shù)，而 4， 6，8， 9 則不是。 過程 Function FnPrime(m As Integer) As Boolean Dim k As Integer, f As Boolean f = True 39。 過程 Private Sub Timer1_Timer() n = n + 1 ?模塊級變量 n是關(guān)鍵參數(shù)