第07 过程a.pptVIP

第６章作业 ：P164 习题1、2正确答案：;第7章 过 程 7.1 基本概念 过程是程序的基本单元，通常完成某个特定功能。 过程可以将复杂问题化为一个个简单的子问题，这样可实现代码的重复使用，不仅提高编程效率，而且可减少代码的出错率。 VB中有两种过程，事件驱动过程和自定义过程。 事件驱动过程：当某个事件发生时，对该事件做出响应的程序段。程序框架由VB集成开发环境确定，程序由事件驱动，运行状态与用户在设计界面上的操作有关。;用户自定义过程即用户根据需要确定程序结构，与界面无关。这样定义的过程可以被多个事件调用。 自定义过程分为 Sub子过程和Function 函数过程。二者的主要区别是Sub子过程没有返回值，而Function函数过程可以将函数值带回到被调用处。 ;VB应用程序的组成;7.2 Sub过程 　　是一种无返回值的子过程。可以把一段完成特定功能的程序定义为子过程，用来被主程序或其他程序调用。 7.2.1 创建通用的Sub过程 创建方法：在代码窗口直接输入Sub过程的程序代码. 格式: Static|Private|Public Sub 过程名[形式参数表] 语句系列 …… [Exit Sub] …… End sub 形式参数:指明调用时传送给过程的参数的类型和个数. 说明：见书P172（4点）;例7.1 创建名为ShowChr的通用过程，程序中输出n行字符串“This is a Example!”;7.2.2 调用过程 格式： Call 过程名[(实参表)] 或 过程名[实参表] 说明: 调用子过程语句将程序的执行顺序自动转向被调用的子程序 如果带参数调用子过程,在调用子过程时,把调用语句中的实参值传递给被调用过程的形参 在调用子过程语句中,不仅要求实参个数与被调用子过程形参个数一致,而且要求其类型完全一致 子过程执行完最后一行语句End Sub之后,程序执行流程自动返回到调用子过程语句的下一行继续运行;;例7.2 调用名为ShowChr的通用过程，输出3行字符串“This is a Example!” Private Sub Command1_Click() Call ShowChr End Sub Private Sub ShowChr () 无形参 Dim I As Integer For I =1 to 3 Debug.Print This is a Example! Next I End Sub ;例7.3 调用名为ShowChr的通用过程，由过程参数确定输出字符串的行数和字符串的内容 Private Sub Command1_Click() Dim n As Integer Dim Chr As String n = Val(InputBox(Please Enter a Integer Number)) Chr = InputBox(Please Enter a String) Call ShowChr (n, Chr) End Sub Private Sub ShowChr (ByVal m As Integer, ByVal Str As String) 带两个形参 Dim i As Integer For i = 1 To m Debug.Print Str Next i End Sub;;7.3.1 值传递（ Byval ） 格式: Private|Public Sub 子过程名 (Byval 形参名1 As 数据类型 ,Byval 形参名2 As 数据类型…) 说明: 值传递在定义过程时，系统为形参分配存储单元，形参是一个单独的存储单元。要求实参个数、类型与形参个数、类型完全匹配。;形参与实参是两个不同的存储单元：; 例如：编写程序，实验传值方式传送参数： Private Sub cz(byval x as integer, byval y as integer) X=x+100 Y=y*6 Print x=;x, y=;y End Sub Private Sub form_click() Dim a as integer,b as integer a=10 : b=20 Call cz(a,b) Print a=;a, b=;b End Sub;7.3.2 引用传递（传地址传送） 格式: Sub 子过程名(Byref 形参名1 As 数据类型,Byref 形参名2 AS 数据类型2…) 引用传递指的是调