- 1、本文档共38页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
第八讲:函数与过程
第8讲 过程 过程是用来执行一个特定任务的一段程序代码。VB应用程序(又称工程或项目)由若干过程组成,这些过程保存在文件中,每个文件的内容通常称为一个模块。 在程序设计过程中,将一些常用的功能编写成过程,可供多个不同的事件过程多次调用,从而可以减少重复编写代码的工作量,实现代码重用,使程序简练、便于调试和维护。在VB6.0中,用户自定义过程分为:以“Sub”保留字开始的子过程、以“Function”保留字开始的函数过程、以“Property”保留字开始的属性过程、以“Event”保留字开始的事件过程。 本章主要介绍用户自定义的子过程和函数过程。 8.1 子过程 8.2 函数过程 8.3 参数传递 8.4 过程与变量的作用域 8.5 鼠标事件和键盘事件 8.1 子过程 子过程是用特定格式组织起来的一组代码,通常用来完成一个特定的功能,可以被其它过程作为一个整体来调用。 8.1.1 子过程的定义 定义子过程有以下两种方法。 1.利用“工具”菜单下的“添加过程”命令定义 2.利用代码窗口直接定义 在窗体或标准模块的代码窗口把插入点放在所有现有过程之外,键入Sub子过程名即可。定义一般形式如下: [Static][Public|Private]Sub 子过程名[(参数列表)] [局部变量或常数定义] [语句序列] [Exit Sub] [语句序列] End Sub 下面是一个子过程的例子: Sub sum(x%,y%,s%) s = x + y End Sub 8.1.2 过程的调用 要执行一个过程,必须调用该过程。 子过程的调用有两种方式,一种是利用Call语句加以调用,另一种是把过程名作为一个语句来直接调用。 1.用Call语句调用Sub过程 格式:Call 过程名[(参数列表)] 例如: Call sum(a,b,c) 2.把过程名作为一个语句来使用 格式: 过程名[参数列表] 与第一种调用方法相比,这种调用方式省略了关键字Call,去掉了“参数列表”的括号。 例如: sum a,b,c 【例8.2】编一个求n!的子过程,然后调用它计算7!+11!-10!。 程序如下: Sub jch(n%,p) Dim i% p = 1 For i = 1 To n p = p * i Next i End Sub Private Sub Form_Click() Dim a,b,c,d Call jch(7,a) Call jch(11,b) Call jch(10,c) d = a + b-c Print 7!+11!-10!=;d End Sub 8.2 函数过程 函数过程是自定义过程的另一种形式。VB提供了许多内部函数,如Sin(),Sqr()等,在编写程序时,只需写出函数名和相应的参数,就可得到函数值。另外,VB还允许用户自己定义函数过程。同内部函数一样,函数过程也有一个返回值。 8.2.1 函数的定义 函数过程的定义方法也有以下两种。 1.利用“工具”菜单下的“添加过程”命令定义 2.利用代码窗口直接定义 在窗体或标准模块的代码窗口把插入点放在所有现有过程之外,键入Function函数名即可。定义形式如下: [Static][Public|Private] Function 函数名([参数列表])[As类型] [局部变量或常数定义] [语句序列] [Exit Function] [语句序列] 函数名=表达式 End Function 8.2.2
您可能关注的文档
- (48份)思想品德:初三中考总复习背诵默写提纲8年级.doc
- 英语48个音标注释.doc
- (48份)思想品德:初三中考总复习背诵默写提纲(8年级-上).doc
- 主板维修通病及解决办法.docx
- 课题:Unit 8 Summer holiday is coming! Lesson 48Li Ming’s Summer Holiday.doc
- 8字盲板,插板及插环asme b16.48.doc
- 信息安全个人基础实验报告.doc
- 四十八寨起风云.doc
- 基于ATmega48的红外寻线小车.doc
- RJ45传输E1线序(RJ48)接法.doc
- 2023咸阳职业技术学院招聘笔试真题参考答案详解.docx
- 2023四川化工职业技术学院招聘笔试真题及参考答案详解.docx
- 2023哈尔滨职业技术学院招聘笔试真题及参考答案详解.docx
- 2023商洛职业技术学院招聘笔试真题及答案详解1套.docx
- 2023呼伦贝尔职业技术学院招聘笔试真题参考答案详解.docx
- 2023南阳农业职业学院招聘笔试真题参考答案详解.docx
- 2023天津公安警官职业学院招聘笔试真题带答案详解.docx
- 2023年上海电机学院招聘笔试真题参考答案详解.docx
- 2023年四川艺术职业学院招聘笔试真题参考答案详解.docx
- 2023安徽体育运动职业技术学院招聘笔试真题及答案详解一套.docx
文档评论(0)