《过程和函数》教学课件1.pptVIP

过程与函数VisualBasic应用程序是由过程组成的。过程是用来执行特定任务的一段独立的程序代码。VisualBasic中的通用过程有：Function过程(函数过程)Sub过程(子过程)Function过程VisualBasic系统提供的内部函数大多数都是Function过程，我们可以像调用内部函数一样调用Function过程。Function过程与Sub过程的功能类似，与Sub过程有一个重要的不同是Function过程可以向调用者返回一个值。Function过程的定义[Private|Public][Static]Function过程名（[参数列表]）[As类型] [语句块] [过程名=表达式] [ExitFunction][语句块]EndFunctionFunction过程的定义“As类型”是Function过程返回值的类型，可以是Integer、Long、Single、Double、String等，缺省是变体类型Variant。表达式的值是函数的返回值，如果在Function过程中省略“过程名=表达式”语句，那么该过程返回一个缺省值，数值过程返回0，字符过程返回空字符串。Function过程的定义Function过程的定义过程有两种方法：使用“添加过程”对话框直接在代码窗口中定义Function过程的调用与VisualBasic内部函数的调用相同，一般格式为：变量=过程名([实参列表]）Function过程的定义Function过程-例1用Function过程求3个数中的最大值。PrivateSubCommand1_Click()Dimx1!,x2!,x3!Dima!x1=Val(Text1.Text)x2=Val(Text2.Text)x3=Val(Text3.Text)a=max(x1,x2,x3)Label4.Caption=最大值是aEndSubPrivateFunctionmax(xAsSingle,yAsSingle,zAsSingle)AsSinglemax=xIfymaxThenmax=yIfzmaxThenmax=zEndFunction编写求两个数最大公约数的Function过程。程序界面中用两个文本框输入两个数，在第三个文本框中显示求得的两个数的最大公约数。分析：求最大公约数用辗转相除法，算法的思路是：两个数x,y，y≠0，r为x,y两数相除的余数x←y，y←r，若y≠0，重复上面两步，直到y=0为止y=0，x即为最大公约数。Function过程-例2Sub过程的定义[Private|Public][Static]Sub过程名（[参数列表]） [语句块] [ExitSub][语句块]EndSubSub过程的定义通用Sub过程可放在标准模块、窗体模块和类模块中。过程名的命名规则与变量的命名规则相同。参数列表指明在调用时传送给过程的参数的个数和类型，含有在调用时传给该过程的变量名或数组名，每个名字用逗号分隔，每个参数的格式为：[ByVal|ByRef]变量名[()][As数据类型]Sub过程的定义使用“添加过程”对话框在窗体的代码窗口或模块的代码窗口中，执行“工具”/“添加过程”命令直接在代码窗口中定义在代码窗口中，把光标定位在所有过程的外边，或者选择“对象”框中的“通用”，“过程”框中的“声明”。直接输入过程的名称，然后回车，代码窗口中就会显示过程模板。Sub过程的定义Sub过程的调用使用Call语句，其一般格式为：Call过程名([实参列表])直接使用子过程名，其一般格式为：过程名[实参列表]Sub过程的调用使用Call语句，其一般格式为：Call过程名([实参列表])实参列表中的实际参数之间要用逗号分隔。使用Call语句调用过程时，如果过程本身没有参数，括号可以省略。Sub过程的调用直接使用子过程名，其一般格式为：过程名[实参列表]直接使用子过程名调用过程时，过程名后面不加括号，实参直接写在过程名的后面，实参之间用逗号分隔。Sub过程-例1