大学VB过程PPT课件.ppt

第7章 过程 7.4 应用实例 7.4.3 递归 例 7-11设计一个窗体，演绎“汉诺塔”。著名的“汉诺塔”问题：有N个圆环，由A柱移到C柱。在圆环移动时要遵守两个规则，一是每次只能移动一个圆环，二是较小的圆环一定在较大的圆环之上，程序的运行结果如图所示。 第7章 过程 7.4 应用实例 7.4.3 递归 演示程序 例 7-11 Visual Basic 程序设计 过程 第7章 本章要点 Sub过程 Function 过程 参数传递 应用实例 第7章 过程 7.1 Sub 过程 7.1.1 定义Sub过程 定义Sub过程的语句格式： [Public|Private][Static] Sub 子过程名 ([参数表]) 局部变量或常数定义 ＜语句序列＞ [Exit Sub] ＜语句序列＞ End Sub 功能：定义一个以子过程名为名的Sub过程，Sub过程名不返回值，而是通过形参与实参的传递得到结果，调用时可得到多个参数值。 第7章 过程 7.1 Sub 过程 7.1.1 定义Sub过程 注意事项： （1）子过程名的命名规则与变量名规则相同； （2）参数表中的参数称为形参，表示形参的类型、个数、位置，定义时是无值的，只有在过程被调用时，实参传送给形参才获得相应的值。 （3）参数表中可以有多个形参，它们之间要用逗号“，”隔开，每一个参数要按如下格式定义： [ByVal｜ByRef]变量名[( )][As 类型][,…] 其中：ByVal表示当该过程被调用时，参数是按值传递的；缺省或ByRef表示当该过程被调用时，参数是按地址传递的。 第7章 过程 7.1 Sub 过程 7.1.1 定义Sub过程 （4）Static、Private定义的Sub过程为局部过程，只能在定义它的模块中被其它过程调用。 （5）Public定义的Sub过程为公有过程，可被任何过程调用。 （6）[Exit Sub]是退出Sub过程的语句，它常常是与选择结构（If或Select Case语句）联用，即当满足一定条件时，退出Sub过程。 （7）过程可以无形式参数，但括号不能省。 第7章 过程 7.1 Sub 过程 7.1.2 创建Sub过程 Sub过程是一个通用过程，它不属于任何一个事件过程，因此它不能在事件过程中建立，通常Sub过程是在标准模块中，或在窗体模块中建立的。 方法一：选择【工具】→【添加过程】菜单选项，打开“添加过程”窗口。 第7章 过程 7.1 Sub 过程 7.1.2 创建Sub过程 方法二： （1）在窗体模块的通用部分利用定义Sub过程的语句建立Sub过程 。 第7章 过程 7.1 Sub 过程 7.1.2 创建Sub过程 方法二： （2）在标准模块中，利用定义Sub过程的语句，建立Sub过程 。 第7章 过程 7.1 Sub 过程 7.1.3 调用Sub过程 调用Sub过程的语句格式如下： 子过程名 [参数表] 或： Call 子过程名([参数表]) 功能：调用一个已定义的Sub过程。 第7章 过程 7.1 Sub 过程 7.1.3 调用Sub过程 演示程序 例 7-1 设计一个窗体，用“字符”输出图形，程序的运行结果如图所示。 第7章 过程 7.2 Function 过程 7.2.1 定义Function过程 定义Function过程的语句格式： [Public|Private][Static]Function 函数名([参数表])[As类型] 局部变量或常数定义 语句序列 [Exit Function] 语句序列 函数名=返回值 End Function 功能：定义一个以函数名为名的Function过程，Function过程通过形参与实参的传递得到结果，返回一个函数值。 第7章 过程 7.2 Function 过程 7.2.1 定义Function过程 注意事项： （1）函数名的命名规则与变量名规则相同，但它不能与系统的内部函数或其它通用过程同名，也不能与已定义的全局变量和本模块中同模块级变量同名。 （2）在函数体内部，函数名可以当变量使用，函数的返回值就是通过给函数名的赋值语句来实现的，在函数过程中至少要对函数名赋值一次。 （3）As类型是指函数返回值的类型，若省略，则函数返回变体类型值（Variant）。 第7章 过程 7.2 Function 过程 7.2.1 定义Function过程 （4）[Exit Function]是退出Function过程的语句，它常常是与选择结构（If或Select Case语句）联用，即当满足一定条件时，退出Function过程。 （5）参数表