08 第08章 VB子程序和函数过程
VB过程及其调用
VB过程及其调用VB（Visual Basic，简称VB）是一种基于事件驱动编程的程序设计语言，是Microsoft公司开发的一种高级程序设计语言，常被用于Windows操作系统的应用程序开发。
VB中的过程指的是一系列语句的集合，用于完成特定的任务。
本文将介绍VB中的过程及其调用。
1.过程的定义在VB中，过程可以分为两种类型：Sub过程和Function过程。
Sub过程用于执行一系列操作，没有返回值；而Function过程则返回一个值。
Sub过程的定义格式如下：Sub 过程名(参数列表)'过程主体End SubFunction过程的定义格式如下：Function 过程名(参数列表) As 返回值类型'过程主体End Function其中，参数列表可以包含零个或多个参数，每个参数包含两部分：参数名和参数类型。
返回值类型指的是Function过程的返回值类型，可以是任意VB数据类型。
2.过程的调用在VB中，可以通过过程的名称和参数列表来调用过程。
调用过程时，可以传递参数给过程，如果过程需要返回值，可以将结果保存到一个变量中。
调用Sub过程的语法格式如下：过程名参数列表调用Function过程的语法格式如下：变量名=过程名(参数列表)以下是一个使用Sub过程和Function过程的示例：Sub SayHello(name As String)MsgBox("Hello, " & name & "!")End SubFunction Multiply(a As Integer, b As Integer) As IntegerMultiply = a * bEnd Function调用上述过程的示例代码如下：SayHello("John") '调用Sub过程，显示对话框，输出"Hello,John!"result = Multiply(5, 6) '调用Function过程，将结果保存到变量result中，result的值为303.过程的参数传递在调用过程时，可以传递参数给过程。
VB学习指导
VB学习指导第一章 Visual Basic 概述一、知识点1．基本概念（1）对象（2）对象类（3）实例（4）窗体（5）控件（6）属性（7）方法（8）事件VB 集成开发环境（IDE）2．基本理论（1）面向对象的程序设计方法（2）事件驱动方式的程序设计原理3．主要操作流程（1）创建应用程序的一般步骤（2）VB 集成开发环境的基本操作–创建一个新工程二、要点、难点1．对象的实例化2．对象的属性、方法、事件3．事件驱动4．创建、打开和保存窗体文件和工程文件三、例题1．例：VB 是面向___________ 的程序设计语言：A．过程B．工程C．事件D．对象正确答案：D解释：传统的结构化语言都是采用面向过程的编程方法来解决问题，其中最主要的缺陷就是程序的可维护性差。
面向对象编程（OOP：Object Oriented Programming）则将数据和处理数据的代码封装到一个类中，类的实例就是对象。
面向对象的编程方法有三个优点①程序易于阅读；②程序易于修改；③对象能重复使用多次。
VB 支持OOP ，并且运用OOP 的方法将代码和数据封装起来形成一个个可视的图形对象（如窗体和控件等），使对象成为有形的实在的东西。
2．例：一个对象可以执行的动作与可被一个对象所识别的动作分别称为________。
A．事件、方法B．方法、事件C．属性、方法D．过程、事件正确答案：B解释：方法指对象可以进行的动作或行为。
通过“方法”，可使对象以指定的方式去做某种动作或改变行为。
VB程序中每个窗体或控件对象都具有若干可改变其行为或实现某个特定动作（操作）的方法。
例如，窗体可被“显示”或被“隐藏”。
事件是指由系统预先设置好的，能被对象识别的动作，如单击鼠标、移动鼠标、按下键盘上的某个键。
四、习题1．VB 的使用目的是_________。
A．开发Windows应用程序B．图像处理C．制作W A V文件D．文字处理2．对象的_________确定当一个事件发生时执行代码。
VBA过程子程序和函数
第四章 VBA过程：子程序和函数在第二章中，你知道了过程是一组指令，它让你在程序运行的时候完成一些具体的任务。
VBA有以下三种过程：n 子程序过程（子程序）执行一些有用的任务但是不返回任何值。
它们以关键字Sub开头和关键字End Sub结束。
子程序可以用宏录制器（第一章）录制或者在VB编辑器窗口里直接编写（见第二章和第三章）。
在你第一章里已经学习了多种运行这种过程的方法。
n 函数过程（函数）执行具体任务并返回值。
它们以关键字Function开头和关键字End Function结束。
在本章中，你将创建你的第一个函数过程。
函数过程可以从子程序里执行，也可以从工作表里访问，就像Excel的内置函数一样。
n 属性过程用于自定义对象。
使用属性过程你可以设置和获取对象属性的值，或者设置对另外一个对象的引用。
你将在第十一章中学习如何创建自定义对象和使用属性过程。
在本章中，你将学习如何创建和执行自定义函数，另外，你将发现变量（见第三章）如何用于传递数据给子程序和函数。
在本章后面，你将对VBA中两种最有用的函数：MsgBox和InputBox进行比较彻底的了解。
关于函数过程使用Excel几百种内置函数，你可以进行非常宽广的自动计算，然而，你总有要做个自定义计算的时候。
使用VBA编程，你可以通过创建函数过程快速的完成这个特殊需求，你可以创建任何Excel没有提供的函数。
创建函数过程象Excel函数一样，函数过程进行计算并返回数值。
学习函数的最好方法就是自己创建一个。
因此，我们开始吧。
设置完一个新的VBA工程后，你将创建一个函数过程来加和两个数值。
1. 打开一个新Excel工作簿，并保存为Chap04.xls2. 切换到VB编辑器窗口并且选择VBAProject(Chap04.xls)3. 在属性窗口，将VBAProject改为MyFunctions4. 在工程浏览器窗口选择MyFunctions(Chap04.xls)，然后选择“插入”－“模块”5. 在属性窗口将“模块1”改为Sample16. 在工程浏览器窗口，点击Sample1并选择“插入”－“过程”（译者：需要激活右边的代码窗口）。
vb的编程步骤
vb的编程步骤VB的编程步骤VB（Visual Basic）是一种广泛应用于Windows平台的编程语言，具有易学易用的特点。
在进行VB编程时，按照一定的步骤进行开发可以提高效率和代码质量。
下面将介绍VB的编程步骤，帮助初学者了解如何使用VB进行程序开发。
一、需求分析在进行VB编程之前，首先需要明确开发的需求。
需求分析是软件开发过程中的第一步，它确定了程序的功能和目标。
在这个阶段，开发人员需要与客户或用户进行沟通，了解他们的需求和期望，然后将这些需求转化为具体的功能和特性。
需求分析的目标是明确软件的功能、界面设计和用户交互方式。
开发人员可以使用各种工具和技术，如用户故事、用例图和流程图等，来帮助理解和分析需求。
通过合理的需求分析，可以避免开发过程中的返工和不必要的错误。
二、设计界面在明确了需求之后，下一步是设计程序的界面。
VB提供了丰富的界面设计工具，使得开发人员可以轻松创建各种窗体、控件和布局。
界面设计要考虑到用户的使用习惯和体验，尽量简洁明了、易于操作。
在设计界面时，需要确定程序所需的窗体和控件，并合理布局。
可以使用拖放的方式将控件添加到窗体上，并设置它们的属性和事件。
通过合理的控件选择和布局，可以增强程序的可读性和易用性。
三、编写代码界面设计完成后，下一步是编写代码。
VB是一种基于事件驱动的编程语言，开发人员通过编写事件处理程序来响应用户的操作。
在编写代码之前，需要对程序的逻辑进行设计，确定各个功能的实现方式。
在编写代码时，需要使用VB提供的语法和函数来实现程序的功能。
可以使用条件语句、循环语句、函数和子程序等结构来组织代码。
同时，还可以使用各种API和库来扩展程序的功能。
编写代码时要注意代码的可读性和可维护性。
可以使用注释来解释代码的作用和实现方式，避免出现冗长和复杂的代码块。
此外，还要注意代码的缩进和命名规范，使得代码结构清晰，易于理解。
四、调试和测试在编写完代码之后，需要进行调试和测试。
VB函数说明及使用方法
VB函数说明及使用方法VB（Visual Basic）是一种基于事件驱动的编程语言，由微软公司开发。
它具有易学、易用的特点，是一种适用于Windows操作系统的高级编程语言。
VB函数是VB语言中常用的一种函数，用于进行数据处理和逻辑控制等操作。
VB函数的语法形式为：```[访问类型] Function 函数名(参数列表) As 返回值类型函数体[Exit Function]函数名=返回值[End Function]```其中- 访问类型：指定函数在程序中的可见性，可以包括Public（公共的）、Private（私有的）、Protected（受保护的）等。
-函数名：为函数定义的标识符，用于调用函数。
-参数列表：函数的输入参数，在括号内列出各个参数的名称和数据类型。
-返回值类型：函数的返回值类型，用于指定函数返回的数据类型。
-函数体：函数的具体实现逻辑。
- Exit Function：可选项，用于提前退出函数。
-返回值：函数的返回结果。
下面是一个示例函数的定义：```Public Function AddNumbers(ByVal num1 As Double, ByVal num2 As Double) As DoubleDim sum As Doublesum = num1 + num2AddNumbers = sumEnd Function```这个函数名为AddNumbers，接受两个Double类型的参数，返回值也是Double类型。
函数体中将两个参数相加，并将结果赋值给变量sum，最后将sum作为返回值。
使用VB函数的方法包括以下几个步骤：1.引入函数所在的模块或类库。
如果函数不是在当前模块或类库中定义的，需要通过引入来告知编译器。
2.调用函数。
在程序中通过函数名加括号的形式来调用函数，并传递相应的参数。
函数可以在赋值语句、逻辑判断语句、循环语句等各种场景下进行调用。
3.使用函数的返回值。
如何使用VB
如何使用VBVisual Basic（VB）是一种基于对象的程序设计语言，广泛应用于软件开发领域。
本文将介绍如何使用VB进行软件开发，并按以下章节进行详细讨论。
第一章：VB概述在本章中，我们将简要介绍VB的历史和特点。
VB是一种很受欢迎的编程语言，它结合了面向对象编程和事件驱动编程的优势。
VB具有简单易学的语法，可以用于开发各种类型的应用程序，包括桌面应用程序、Web应用程序和移动应用程序等。
第二章：安装和配置VB开发环境本章将介绍如何安装和配置VB开发环境。
VB可以与Microsoft Visual Studio集成使用，因此首先需要安装Visual Studio。
安装完成后，我们需要配置开发环境，包括选择适当的工具和设置。
第三章：VB基本语法在本章中，我们将深入研究VB的基本语法。
VB使用一套简单易懂的关键字和符号，可以实现变量声明、条件语句、循环语句和函数定义等功能。
我们还将介绍如何使用VB编写函数和子程序，并展示一些常用的编码技巧。
第四章：VB界面设计本章将重点介绍如何使用VB进行界面设计。
VB提供了丰富的界面组件，例如按钮、文本框、标签和列表框等。
我们将学习如何在界面上布置这些组件，并配置其属性和事件。
此外，我们还将研究如何使用VB的绘图工具和图像处理功能进行界面美化。
第五章：VB数据库操作在本章中，我们将学习如何使用VB进行数据库操作。
VB提供了内置的数据库连接库，可以方便地连接和操作各种类型的数据库，如Microsoft Access、SQL Server和MySQL等。
我们将研究如何创建数据库连接、执行SQL查询和更新数据等操作。
第六章：VB网络编程本章将介绍如何使用VB进行网络编程。
VB提供了丰富的网络编程库，可以轻松实现网络通信和数据传输。
我们将学习如何创建网络连接、发送和接收数据，并展示一些常见的网络编程应用场景，如FTP文件传输和Socket通信等。
第七章：VB调试和错误处理在本章中，我们将深入研究如何使用VB进行调试和错误处理。
VB过程函数
子过程（Sub过程）分类1) 事件过程当用户对某个对象发出一个动作时，Windows会通知VB产生了一个事件，VB会自动地调用与该事件相关的事件过程。
事件过程只能放在窗体模块中。
事件过程的常用格式如下：Private Sub <对象名>_<事件名( [<形参表>] )><语句系列>End Sub例如窗体的Load事件、按钮的Click事件2) 通用过程通用过程由用户定义或删除修改，可以放在标准模块中，也可以放在窗体模块中。
其格式如下：[Private|Public] Sub <过程名>(<参数表>)<语句系列>End SubSub过程调用Sub过程可以被其它过程（包括事件过程和通用过程）调用。
每次调用过程都会执行Sub和End Sub之间的语句系列。
Sub过程以Sub开始，以End Sub结束。
当程序遇到End Sub时，将退出过程，并立即返回到调用语句的后续语句中。
1.调用方法调用Sub过程有两种方法：(1) 使用Call语句：Call <过程名>([<实参表>])(2) 直接使用过程名：<过程名> [<实参表>]使用说明(1) 当用Call语句调用执行过程时，若无实参，其过程名后圆括号不能省略，若有参数，则参数必须放在括号之内。
(2) 若省略Call关键字，则过程名后不能加括号，若有参数，则参数直接跟在过程名之后，参数与过程名之间用空格分隔，参数与参数之间用逗号分隔。
案列：交换2个数的大小，并输出Private Sub swap(a as Integer,b as Integer)Dim temp as Integertemp=aa=bb=tempPrint “交换后的数值分别为：” & a & bEnd sub函数过程1) 系统函数VB为了简化程序设计，提供了许多内部函数供设计者调用，如Abs()，Int()，ASC()，MID()等。
Visual Basic程序设计第八章过程-子程序和函数
形参的改变而改变。
♦ 传值时，形参被单独分配内存并获得实参的值，因而
形参的改变并不改变实参的值。
■
万 博 科 技 职 业 学 院
Wanbo Inst. Of Since & Tech.
传值和传址的区别
Visual Visual BASIC BASIC 程 序 设 计 定义子程序 Swap： x: 543 形参 x ← 实参a: Swap 传址 形参 y ← 实参 b: 543 调用子程序 Swap：
♦ 有效范围：过程→模块→全局（公用） ♦ 隐式声明和显式声明：Option Explicit ♦ 组合声明: 例: dim i as integer, j as single, s as string 或: dim i%, j!, s$
■
万 博 科 技 职 业 学 院
Wanbo Inst. Of Since & Tech.
■
万 博 科 技 职 业 学 院
Wanbo Inst. Of Since & Tech.
自定义函数
Visual Visual BASIC BASIC 程 序 设 计 <函数名 函数名> [Public|Private|Static] Function <函数名> <类型 类型>] （[参数及其类型列表] ）[As <类型>] 参数及其类型列表] 内含: 函数名>=<返回值表达式> >=<返回值表达式 <程序代码> (内含: <函数名>=<返回值表达式>) 程序代码> (内含 End Function 注意： 注意：函数与子程序的区别 （1）函数必须有返回值，子程序没有。 函数必须有返回值，子程序没有。 （2）如果不指明函数的类型（即其返回值的类型）， 如果不指明函数的类型（即其返回值的类型）， 则其类型是变体型（Variant型 则其类型是变体型（Variant型） （3）函数用在表达式中，子程序不能。 函数用在表达式中，子程序不能。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
11
Visual Basic程序设计教程
Function CheckName(Na As String) As Integer ‘函数过程，返回位置 Dim i As Integer CheckName = -1 For i = LBound(Name1) To UBound(Name1) ’线性查找法 If Name1(i) = Na Then CheckName = i: Exit For Next I End Function Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then Command1_Click ‘遇回车时，调用事件过程 End Sub
大学计算机基础教程
TaiYuan University of Technology
第8章
子过程和函数过程
Visual Basic 程序设计教程
本章主要介绍： 定义Sub过程 定义Function函数过程 调用Sub过程或Function函数过程 调用事件过程 变量的存储类别和作用域。 编写过程，可以实现代码重复使用。
22
Visual Basic程序设计教程
过程定义在窗体模块中而调用语句在其它模块 中 采用以下两种格式之一： 格式一：窗体名.过程名 [实参数列表] 格式二：Call 窗体名.过程名[(实参数列表)] 调用Sub过程的方法也可以用来调用事件过 程，如例4-10，可用： Private Sub Check2_Click() Check1_Click '这时调用的过程 名即为Check1_Click End Sub
8.1.2 过程分类与调用流程 VB中的过程分成两大类： 事件过程： 由对象的某个事件驱动执行 如Click事件过程、Load事件过程等 通用过程 由用户自已定义的完成某一功能的过程。 通用过程不属于任一对象，不由事件驱动 使用专用的调用语句来执行它
4 Visual Basic程序设计教程
通用过程又分两类： Sub过程（子过程、子程序） 往往用于处理不需要有返回值的一些基本任务 如显示矩阵。 Function函数过程： 可作为函数使用，它一般应有一个返回值 如求阶乘。
28
Visual Basic程序设计教程
Private Sub Command1_Click() Dim Ch As String * 1, Line As Integer Ch = InputBox("请输入一个要显示的字符") Line = Val(InputBox("请输入显示的行数")) Print_triangle Ch, Line, 1 End Sub Private Sub Command2_Click() Dim Ch As String * 1, Line As Integer Ch = InputBox("请输入一个要显示的字符") Line = Val(InputBox("请输入显示的行数")) Print_triangle Ch, Line, -1 End Sub '以标志-1调用过程 '以标志1调用过程 'Ch只容纳1个字符
【例8-2】分析以下程序：
Sub A(n As Integer) Dim i As Integer For i = 1 To n: Print i;: Next Call B Print End Sub Sub B() Print "BBBBBB" End Sub Private Sub Command1_Click() Call A(9) B '直接使用过程名调用过程B() End Sub 26 Visual Basic程序设计教程
12
Visual Basic程序设计教程
VB中的模块属于工程资源 它由过程或声明构成，以独立的文件管理。 工程中包含窗体、类和标准模块文件 本节介绍 窗体模块 标准模块。
13
Visual Basic程序设计教程
8.3.1 窗体模块 窗体模块是大多数VB应用程序的基础 窗体模块与窗体对应，存放窗体上所有信息： 窗体及窗体上各控件界面信息、属性、事件过程 通用过程 变量和常量的声明等。 窗体模块文件的扩展名为.Frm 一个应用程序可以创建多个窗体模块
7 Visual Basic程序设计教程
过程： Form_Load事件：储存一批姓名和电话号码等 Command1_Click事件：核对姓名，显示提示 Text1_KeyPress事件：核对姓名，显示提示 CheckName 函数过程：判断此人是否存在，得 下标/-1。 姓名和电话号码为模块级变量、N为静态变量。
20
Visual Basic程序设计教程
完整代码应为： Sub Hello(XXX As String) MsgBox XXX & "你好！" End Sub 以上过程的过程名为Hello 形式参数为XXX且是字符串型 过程体只用了一句MsgBox，并同时使用了参 数XXX。
21 Visual Basic程序设计教程
T = CheckName(Text1.Text) If T <> -1 Then MsgBox "欢迎查询!", , "提示"
Text1.Visible = False : Command1.Visible = False Label1.Caption="姓名:" & Text1.Text & Chr(13) & "电话:" & Phone(T) Label1.Left = (Form1.ScaleWidth - Label1.Width) / 2 间 '让标签在中
18
Visual Basic程序设计教程
2．关于语句块 语句块即为过程体，与事件过程的代码编写一样 包含变量声明和可执行的语句、方法等 可以由顺序、分支、循环三种结构综合而成。 语句块中可直接使用参数 说明：语句块中不能重复声明形式参数。
Sub 过程名([参数列表]) [ 语句块 ] End Sub
8
Visual Basic程序设计教程
Dim Name1, Phone Static N As Integer Dim T As Integer
'声明Name1,Phone为模块级Variant类型变量 '核对姓名，显示提示 '声明N为静态整型变量 '以姓名为参数，调用函数CheckBook
Private Sub Command1_Click()
5
Hale Waihona Puke Visual Basic程序设计教程
调用流程如图：
VB的应用程序就是由若干个过程构成的。
6
Visual Basic程序设计教程
【例8-1】设计程序，其作用是根据姓名查电话号码。 输入姓名后，单击“确定”或按回车键，使姓名与内部 储存的一批姓名核对，若存在，则显示“欢迎查询” 内并使窗体只显示标签，且文字为姓名和对应的电 话号码。最多允许输入3遍。 控件： 1个标签、1个文本框 1个“确定”命令按钮
19
Visual Basic程序设计教程
Sub 过程名([参数列表]) [ 语句块 ] End Sub
3．过程定义步骤 打开代码窗口，对象框中选“通用”，然后输入过程 首行并回车，VB自动显示End Sub 然后再输入过程体就可以了。如： 定义过程Hello：实现以姓名为参数显示“XXX你 好！”（XXX具体内容由参数决定）
15 Visual Basic程序设计教程
应用程序启动时，可先装载窗体，也可先运行 Sub Main过程 Sub Main是过程名为Main的特殊过程 Sub Main过程必须放在标准模块中才可作为启动 对象。 启动对象可以在工程属性中设置
16
Visual Basic程序设计教程
8.4.1 定义Sub过程 Sub过程一般指通用子过程，可在程序中调用执 行，执行完毕后无返回值。 它可以定义在窗体模块的通用对象中，也可以定义 在标准模块中。格式： Sub 过程名([参数列表]) [ 语句块 ] End Sub
8.4.2 调用Sub过程—字符三角形
Sub Print_triangle(S As String, Line As Integer, Flag As Integer) '通用过程 Dim A As Integer, B As Integer, i As Integer, j As Integer Cls If Flag = -1 Then A = Line: B = 1 Else A = 1: B = Line For i = A To B Step Flag '正:从小到大循环，倒:从大到小循环 Print Tab(Line + 10 - i); For j = 1 To 2 * i – 1 : Print S; : Next j Print Next i End Sub
14 Visual Basic程序设计教程
8.3.2 标准模块和Sub Main过程 标准代码模块一般存放与特定窗体或控件无关的通 用过程、全局变量的声明等 如求阶乘 一个过程要被多个不同对象或模块调用时，那么该 过程一般可放在标准模块中。 一个应用程序可建立多个标准模块 建立标准模块的方法是： 使用“工程”菜单的“添加模块”命令项。
程序中使用调用语句可调用Sub过程 过程运行完毕或跳出过程运行后，返回到调用处。 1．调用Sub过程的方法 过程定义在当前模块或标准模块中 使用以下两种格式之一： 格式一：过程名 [实参数列表] 格式二：Call 过程名[(实参数列表)] 如Hello过程，可以使用： Hello "王小红" 或 Call Hello("王小红")
10