c语言程序设计课件第六章节.pptVIP

第6章 数组;本章要点：;6.1 子过程（Sub）的定义与调用;说明： （1）子过程以Sub开头，以End Sub结束，而在Sub和End Sub之间的语句块，称为“过程体”或“子过程体”，它决定着子过程的功能； （2）Private表示只有在包含其声明的模块中的其他过程可以访问该Sub过程； （3）Public表示Sub过程是公有过程，可以在程序的任何地方调用。缺省[ Private | Public ]时，系统默认为 Public； （4）Friend只能在类模块中使用； ;（5）Static表示在调用期间保留Sub过程的局部变量的值。Static属性对在Sub外声明的变量不会产生影响，即使过程中也使用了这些变量。 （6）过程名的命名规则与变量命名规则相同，在同一个模块中，同一符号名不得既用作Sub过程名，又用作Function过程名。 （7）参数列表中的参数称为形式参数（简称形参），它可以是变量名或数组名，也可以是简单变量，但不能是常量、数组元素、表达式；若有多个参数时，各参数之间用逗号分隔，形参没有具体的值。 ;形式参数格式为： [ ByVal ] 变量名[（）] [As 数据类型] （8）Exit Sub语句可以提前结束过程调用，使执行立即从一个Sub过程中退出。 （9）Sub 过程不能嵌套定义，但可以嵌套调用。 ;6.1.2 建立Sub过程 建立一个子过程有如下两种方法。 1. 利用菜单“工具”|“添加过程”命令定义 具体方法如下： （1）进入代码窗口，在左侧显示对象名的下拉框中选择“通用”，在右侧显示过程的下拉框中选择“声明”，然后键入Sub及子程序名。 （2）按Enter键后，Visual Basic系统会自动加上End Sub与子程序名后的一对括号，此时便可输入子程序语句。;2. 利用代码窗口直接定义 ;【例6-2】 打印一个平行四边形。 Private Sub triangle (Str As String, n As Integer) Dim i%, j% For i = 1 To n print spc(6-i); For j = 1 To n Print Spc(1); Str; Next j Print Next i End Sub ;6.1.3 调用Sub过程 1. 用Call语句调用Sub过程 语法：Call 过程名（实际参数表） 说明： （1）实际参数的个数、类型和顺序，应该与被调用过程的形式参数相匹配，有多个参数时，用逗号分隔。 （2）如果子程序不带参数，Call语句中子程序名后的一对括号可以省去，例???： Call Add1 这是允许的。;【例6-3】 编写一个名为MyDay过程输入，用户输入一个0~6的数字，在窗体上显示对应的星期。程序运行效果如图6-1-3所示。 ;【例6-4】 利用过程编写求任意三角形面积的程序。 （1）界面设计 ;Private Sub area(X!, Y!, z!, s!) Dim p! p = (X + Y + z) / 2 s = Sqr(p * (p - X) * (p - Y) * (p - z)) End Sub ;2. 把过程名作为一个语句来用 语法： 过程名 [实参1[，实参2……]] 它与Call语句的不同点是：去掉了Call关键字和实参列表的括号。 如上例中可以改成：area a,b,c,w ;6.2.1 函数过程的定义 定义函数过程的语法格式如下： [Public|Private][Static]Function 函数名([参数列表])[As类型] 局部变量或常数定义 语句块 [函数名=返回值] [Exit Function] 语句块 [函数名=返回值] End Function;说明： （1）函数过程以Function开头，以End Function结束，两者之间是描述函数操作的语句块为“函数体”。 （2）函数名命名规则与变量名规则相同。但不能与系统的内部函数或其他通用子过程同名，也不能与已定义的全局变量和本模块中模块级变量同名。 （3）在函数体内，函数名可以当变量使用，函数的返回值就是通过对函数名的赋值语句来实现的。 ;（4）如果函数体内没有给函数名赋值，则返回对应类型的缺省值，数值函数返回0，字符串函数返回空字符串，变体型函数返回Empty。 （5）As类型：是指函数返回值的类型，若省略，则函数返回变体类型值（Variant）。 （6）Exit Function：表示退出函数过程，常常是与选择结构（If或Select Case语句）联用，即当满足一定条件时，退出