- 5
- 0
- 约 38页
- 2016-10-26 发布于广东
- 举报
第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.
您可能关注的文档
- 新UG NX 5中文版项目教程 项目教学 教学课件 欧阳波仪 项目六.ppt
- 新UG NX 5中文版项目教程 项目教学 教学课件 欧阳波仪 项目三.ppt
- 新UG NX 5中文版项目教程 项目教学 教学课件 欧阳波仪 项目五.ppt
- 新UG NX 5中文版项目教程 项目教学 教学课件 欧阳波仪 项目一.ppt
- 新UG NX 8.0机械设计基础及应用 教学课件 刘民杰 1_ 第八章 装配建模.ppt
- 新UG NX 8.0机械设计基础及应用 教学课件 刘民杰 1_ 第二章_草图.ppt
- 新UG NX 8.0机械设计基础及应用 教学课件 刘民杰 1_ 第九章_工程图.ppt
- 新UG NX 8.0机械设计基础及应用 教学课件 刘民杰 1_ 第六章 表达式与部件族.ppt
- 新UG NX 8.0机械设计基础及应用 教学课件 刘民杰 1_ 第七章_机械零件建模工程实例.ppt
- 新UG NX 8.0机械设计基础及应用 教学课件 刘民杰 1_ 第三章_扫描特征.ppt
最近下载
- 鲁科版小学英语四年级下册单词默写表.pdf VIP
- 16J914-1 公用建筑卫生间.docx VIP
- 2025-2026学年广东省深圳市宝安区八年级(上)期末历史试卷(含答案).docx
- 四川省加油(气)站安全生产标准化所需资料清单.pdf VIP
- 2026年浙江高考1月首考英语应用文课件.pptx
- 电子学会等级考试三级真题.docx VIP
- 2025年湖南大众传媒职业技术学院单招笔试综合素质试题库含答案解析.docx VIP
- 一种货叉矫正装置及方法.pdf VIP
- 2025年湖南大众传媒职业技术学院单招笔试综合素质试题库含答案解析.docx VIP
- 2025年度民主生活会领导干部个人发言提纲三篇.docx VIP
原创力文档

文档评论(0)