Visual Basic程序设计简明教程 王晓东 第7章

《Visual Basic程序设计简明教程 王晓东 第7章》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第7章过程本章内容：概述子过程函数过程事件过程参数传递的方式嵌套调用与递归调用作用域与生存期滚动条直线和形状8/9/202117.1概述VB的应用程序是由过程（Procedure）组成的，代码设计阶段的主要工作就是编写过程。VB通过事件驱动方式执行程序，调用事件过程完成对事件的响应。事件过程（EventProcedure）虽然是VB程序的主体，但是有时也需要在程序中编写通用过程，供事件过程或者其他通用过程调用。如果过程A调用了过程B，则约定把A称为主调过程，B称为被调过程。8/9/20212《VisualBasic程序设计简明教程》

2、说明：根据通用过程是否有返回值，可以分为Sub过程和Function过程。Sub过程又称为子过程，它往往用于完成一些操作，而这些操作不需要有返回值。Function过程又称为函数过程，或者简称为函数。函数过程一般应有一个返回值。返回8/9/20213《VisualBasic程序设计简明教程》7.2子过程——子过程的定义[Public

3、Private]Sub过程名([形参列表])变量定义语句执行语句[ExitSub]EndSub8/9/20214《VisualBasic程序设计简明教程》说明：⒈关键字Sub指明了过程的性质，关键字Public和Priv

4、ate则指明了过程的作用域。⒉括号内为形参列表，用于从主调过程接收数据。如果过程不需要参数，则可以省略形参列表。形参由传递方式、形参名和类型组成，形参之间用逗号分开。形参定义的格式是：[ByVal]形参名[As数据类型]ByVal是对形参进行传递方式声明，表示所声明的形参是传值参数。如果ByVal被省略，则默认该形参是引用参数（ByRef）。⒊过程头部和EndSub之间的部分称为过程体，可以在过程体中定义变量，过程完成的工作主要是在过程体中进行的。⒋如果在运行子过程时需要提前退出，则可以使用ExitSub语句。8/9/20215《VisualBasi

5、c程序设计简明教程》创建子过程第一种方法是在代码窗口中直接定义，输入过程头部之后按下回车键，此时会自动出现EndSub，从而生成过程的框架。第二种方法是使用“添加过程”对话框，在“工具”菜单中选择“添加过程”命令，打开“添加过程”对话框。8/9/20216《VisualBasic程序设计简明教程》7.2子过程——子过程的调用通用过程不属于任何一个对象，它不由事件驱动，必须由其他过程调用才会被执行。子过程调用语句有两种形式：Call过程名[(实参列表)]过程名[实参列表]8/9/20217《VisualBasic程序设计简明教程》说明：（1）第一种调用

6、形式使用了关键字Call，而第二种调用形式不仅没有Call，并且也没有括号。（2）实参即实际参数，表示传递给被调过程的一些必要数据，实参之间用逗号隔开。如果调用时没有实参，则可以省略实参列表和括号。（3）主调过程调用被调过程时，经常需要向被调过程传递一些数据，这主要是通过实参与形参的结合来完成的。形参是变量，过程调用时才被分配内存空间，过程调用语句中的实参会把数据传递给相应的形参。（4）VB语言要求实参与形参个数相等，类型尽量保持一致。实参向形参传递数据时，遵循从左向右，一一对应的规则。8/9/20218《VisualBasic程序设计简明教程》例7

7、.1计算n!PrivateSubCommand1_Click()DimnAsIntegern=Val(Text1.Text)Callfac(n)'调用子过程EndSub8/9/20219《VisualBasic程序设计简明教程》PrivateSubfac(ByValnAsInteger)DimsAsLong,iAsIntegers=1Fori=1Tons=s*iNextiText2.Text=Str(s)'输出n的阶乘EndSub返回8/9/202110《VisualBasic程序设计简明教程》7.3函数过程——函数过程的定义[Public

8、Priv

9、ate]Function过程名([形参列表])[As类型]变量定义语句执行语句[ExitFunction]EndFunction8/9/202111《VisualBasic程序设计简明教程》说明：（1）函数过程的语法与子过程非常相似，其定义的关键字是Function。（2）过程头部右端的[As类型]是指函数过程的类型，即返回值的类型。（3）函数过程的返回值通过对函数名赋值来指定，如下所示：函数名=表达式这样的赋值语句在函数过程的过程体中一般至少应出现一次，作用是确定函数过程的返回值。一旦调用结束，系统就会把返回值带回到主调过程的调用处。（4）如果在运

10、行函数过程时需要提前退出，则可以使用ExitFunction语句。8/9/202112《VisualBasi