《VisualBasic Net程序設(shè)計》教學(xué)課件：過程的定義與調(diào)用

1、VisualBasic.Net程序設(shè)計華中農(nóng)業(yè)大學(xué)信息學(xué)院 章程華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 第9章 過程教學(xué)目的：通過本章學(xué)習(xí)，了解模塊化程序設(shè)計的思想，掌握Sub過程和Function過程的定義和調(diào)用方法。掌握參數(shù)傳遞中形參與實參的作用，傳值調(diào)用和引用調(diào)用的特點和區(qū)別，了解變量的作用域和生存期第9章 過程教學(xué)重難點：Sub過程和Function過程的定義格式和調(diào)用方法。形參與實參的作用傳值調(diào)用和引用調(diào)用的特點及其區(qū)別數(shù)組參數(shù)。變量的作用域和生存期。華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 過程的定義與調(diào)用 1 函數(shù)過程的定義與調(diào)用 2 子過程的定義與調(diào)用 3 綜合應(yīng)用 引例 例

2、16-0 已知多邊形的各條邊的長度，要計算多邊形的面積。華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 1 過程的引入 一、過程 是完成某種特定功能的程序模塊， 供其它程序調(diào)用。程序語句輸入輸出華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 1 過程的引入1.系統(tǒng)提供的內(nèi)部函數(shù)過程和事件過程2. 自定義過程：Sub 子過程Function 函數(shù)過程Property 屬性過程Event 事件過程二、過程的分類華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 2 過程的定義和調(diào)用例16-1 分別編一子過程和函數(shù)過程實現(xiàn)下述功能，并調(diào)用。 Total=n+(n+1)+(n+2)+(m)求和n Sm華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 2.1 Function過程實現(xiàn)Fu

3、nction 函數(shù)過程名(參數(shù)列表)As 類型語句塊Exit FunctionReturn 表達式 End Function一、Function過程定義：華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 第一步：建立function框架參數(shù)形式： ByVal變量名()As 類型, Function Sum( ) End FunctionByVal vStart As Integer, ByVal vEnd As Integer華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 參數(shù)列表稱為形參或啞元，僅表示了形參的類型、個數(shù)、位置，無值。 對于Function，函數(shù)名對應(yīng)一個輸出接口，形參對應(yīng)其余輸出接口和所有的輸入接口第一步：建立fun

4、ction框架參數(shù)形式： ByVal變量名()As 類型,凡只作為輸入的參數(shù)，前面用ByVal或省略; 凡作為輸出的參數(shù)，前面用ByRef華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 第二步：書寫代碼 Function Sum( ByVal vStart As Integer, ByVal vEnd As Integer ) As Integer End Function Dim i, total As Integer For i = vStart To vEnd total += i Next return total華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 2022/7/18第三步：調(diào)用Function過程二、函數(shù)過程的

5、調(diào)用形式： 變量名 = 函數(shù)過程名(參數(shù)列表)參數(shù)列表稱為實參或?qū)嵲?，它必須與形參保持個數(shù)相同，位置與類型一一對應(yīng)。華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 第三步：調(diào)用Function過程Private Sub Form1_Load() Dim tot1, tot2 As Integer tot1 = Sum(1, 10) Label1.Text = 1加到10的總和為 & tot1 & _ vbNewLine tot2 = Sum(5, 12) Label1.Text += 5加到12的總和為 & tot2End Sub華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 2.2 用Sub過程實現(xiàn) Sub 子過程名(參數(shù)列表)

6、語句 Exit Sub 語句 End Sub一、Sub過程定義形式華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 第一步：建立Sub過程Private Sub sum( ) End SubByRef Total%,ByVal vStart%, ByVal vEnd%對于Sub，形參對應(yīng)所有的輸入輸出接口華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 第二步：書寫代碼Sub sum(ByRef Total%,ByVal vStart%, ByVal vEnd% ) Dim i For i = vStart To vEnd total += i Next i End Sub華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 第三步：調(diào)用Sub過程二、子過程的調(diào)用形式： 子過程名 參數(shù)列表 或 Call子過程名(參數(shù)列表)華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 第三步：調(diào)用Sub過程Private Sub Button1_Click() Dim f1%,f2% Sum(f1,1, 10)Label1.Text = 1加到10的總和為 & f1 & vbNewLine Sum(f2,5, 12)Label1.Text = 1加到10的總和為 & f2 End Sub華中農(nóng)業(yè)大學(xué)理學(xué)院計算機系 小結(jié)函數(shù)過程名有值，有類型，