Visual Basic程序设计课件

2023/11/22VB的基本数据类型

“数据”是信息在计算机内的表现形式，也是程序的处理对象。不同类型的数据有不同的操作方式和不同的取值范围。

VB具有系统定义的基本数据类型，而且允许用户根据需要定义自己的数据类型。

VB提供的基本数据类型主要有: 字符串型、数值型、逻辑型和日期型。2023/11/22例2.1A＋B与

A*B。设计一个窗体，在窗体上添加一个命令按钮。运行程序时，单击“开始”，程序将要求输入A和B，并在窗体显示计算结果。(结果为什么存在问题)

2023/11/22字符串型

字符串（String）是一个字符序列，由放在一对双引号中的ASCII字符（除双引号和回车符之外）、汉字及其它可打印字符组成。例如:以下是合法的VB字符串,“Hello”“Wearestudents.”“中华人民共和国”“2+3=?”“2000”“#####”“￥25,000.00”“”（空字符串）2023/11/22字符串型

值得注意的是：字符串中包含的字符个数称为字符串长度。在VB6.0中，把汉字作为一个字符处理。字符串分为变长字符串和定长字符串。长度为0（即不含任何字符的字符串）称为空字符串。双引号在程序代码中起字符串的界定作用。在字符串中，字母的大小写是有区别的。例如，字符串“ABC”与“abc”是两个不相等的字符串。2023/11/22数值型

VB的数值型数据分为整型数和实型数两大类。2023/11/22整型

整型数是不带小数点和指数符号的数。十进制整型数由0～9的数字序列组成，可以带正号或负号。例如：147589565,-3145,327009等都是十进制整数。2023/11/22整型

整型数按示数范围的不同分为整数、长整数和字节型整数。整型数和长整数还可以有三种表示形式，即十进制、八进制和十六进制。2023/11/22整型

2023/11/22实型

实型数是带有小数部分的数，分为浮点数和定点数。

浮点数由三部分组成：符号、指数及尾数。2023/11/22逻辑型逻辑型数据(Boolean)以2个字节(16位)存储。逻辑值逻辑真逻辑假True(-1)False(0)2023/11/22日期型日期型(Date)数据存储为8个字节(64位)浮点数值形式。可以表示的日期范围从100年1月1日到9999年12月31日，时间可以从0:00:00到23:59:59。2023/11/22VB常量与变量

内部常量

用户自定义常量根据VB数据类型，一般常量有整型常量、长整型常量、单精度型常量、双精度型常量、字节型常量、字符串型常量、逻辑型常量和日期型常量。用户自定义常量分一般常量和符号常量两种形式。

2023/11/22Const语句的一般格式：Const常量名[As类型名]=表达式

下面是正确的符号常量定义语句。Constpi=3.14159'定义pi是单精度符号常量，其值为3.14159ConstmaxAsInteger=70'定义max是整型符号常量，其值为702023/11/22变量在程序中，其值可以改变的称为变量。变量名是变量的标识。变量名的命名规则同常量名。变量具有名称、类型和值三个属性。VB有两种类型变量：属性变量和一般变量。

一般变量是由用户自己定义的。定义变量常用Dim语句，格式如下：Dim变量名1[AS类型1][,变量名2[As类型2]]

例如：Dimchr1AsString2023/11/22算术运算符和算术表达式在VB中，算术运算符有：乘方号（^）、取负号（-）、乘号（*）、除号（/）、整除号（\）、求余运算符（Mod）、加号（+）和减号（-）。

PrivateSubCommand1_Click()Print25\5*5EndSub输出结果为1。因为先计算乘法，再完成整除25\25的运算。

2023/11/22字符串运算符和字符串表达式在VB中，字符串运算符有：加号（+）和字符串连接运算符号（&）。两个运算符的作用相同，都是将两个字符串连接成一个字符串。例如：“面向对象”&“程序设计”结果仍是一个字符串："面向对象程序设计"“面向对象”+“程序设计”结果仍是一个字符串："面向对象程序设计

2023/11/22关系运算符和关系表达式在VB中，关系运算符有：大于号（>）、小于号（<）、大于等于号（>=）、小于等于号（<=）、等于号（=）和不等于号（<>或><）。

关系表达式的一般格式：表达式

关系运算符

表达式

2023/11/22逻辑运算符和逻辑表达式在VB中，常用的逻辑运算符有：非（Not）、与（And）、或（Or）、异或（Xor）、等价（Eqv）和蕴含（Imp）。逻辑运算符，用来对两个逻辑量进行运算，运算的结果是逻辑型的，结果值True表示真，False表示假。逻辑表达式的一般格式：表达式逻辑运算符表达式例如：A+B=CAndX=Y是逻辑表达式，在求解该表达式时，先完成算数运算，再解决关系运算，最后进行逻辑运算。整个表达式的含义是，当A+B等于C并且X等于Y时，该表达式的结果为真。

2023/11/22VB常用内部函数

例2.2

飞机高度。设计一个窗体，在窗体上添加一个名为“计算”的命令按钮。运行程序时，单击“计算”输出雷达搜索到飞机的高度。设雷达在仰角300时发出电波，在B点碰到飞机，经过1/3000秒收到来自飞机的回波。电波的速度为3×108米/秒，问飞机的高度。

2023/11/22常用数学函数常用数学函数主要包括三角函数、指数函数、对数函数、平方根函数、绝对值函数等，它们与数学上的定义一致。注意：Ÿ

所有数学函数的自变量是数值型，计算结果也是数值型。Ÿ

自变量可以是常数、变量或表达式，还可以是函数。Ÿ

表中的三角函数自变量的单位为弧度。Ÿ

Sgn(n)函数，当n<0返回-1，当n=0返回0，当n>0返回1。Rnd(n)函数产生一个0～1之间的随机双精度数，包括0，但并不包括1。

2023/11/22常用转换函数常用转换函数主要包括数值型数据与字符型数据之间的转换，以及数值型数据之间的转换。

常用Val函数把输入的数字字符串转换成数值，用Str函数把要输出的数值转换成字符串。运行下面程序，和例2.2结果相同。OptionExplicitPrivateSubCommand1_Click()ConstVg=300000000#ConstPi=3.1415DimOB,ABOB=Vg/3000/2AB=OB*Sin(30*Pi/180)Print"飞机的高度是："+Str(AB)+"米"EndSub2023/11/22

Asc和Chr是一对互逆函数，Chr只能计算一个字符串首字符的ASCII编码，控制字符可以使用Chr函数输入。运行下面程序，观察结果（见图2.6转换函数）。PrivateSubCommand1_Click()PrintChr(Asc("A")),Chr(Asc("ABC"))PrintAsc("A"),Asc("ABC")PrintTrim(Asc("A")),Trim(Asc("ABC"))Print"显示在上一行"+Chr(13)+Chr(10)+"显示在下一行"EndSub2023/11/22常用字符串函数VB6.0在字符存储和处理中，采用了Unicode编码。Unicode编码将一个汉字和一个西文字符都视为一个字符，占用两个字节存储。

PrivateSubCommand1_Click()str1="字符串函数与运算"

str2=Mid(str1,4,2)Printstr2N=InStr(str1,str2)PrintN,InStr(str1,"字符子串")

Printstr1+"的长度是"+Str(Len(str1))PrintLCase("abCDef")+Space(3)+UCase("abCDef")PrintString(10,"─")Print"茶好吃",StrReverse("茶好吃")EndSub2023/11/22InputBox函数InputBox函数的返回一个字符串。在调用InputBox函数时，系统将弹出一个对话框，该对话框能接收用户输入数据。InputBox函数一般格式如下：

InputBox（提示信息[，标题][，确省值]）PrivateSubCommand1_Click()DimLL=Val(InputBox("长度(厘米)","输入"))

Print"长度(厘米)：";LPrint"长度(Twip)：";567*LEndSub2023/11/22窗体

窗体是程序员的“工作台”，用以可视化地建立应用程序。窗体是VB

中一个重要的对象，它除了具有自己的属性、方法外，还可放置除了窗体之外的其它控件。

VB的窗体和控件是具有自己的属性、方法和事件的对象。属性就是对象的性质，方法就是对象的动作，事件就是对象的响应。2023/11/22窗体属性

窗体的属性：决定了窗体的外观和操作。设置方法：通过属性窗口设置和通过程序代码设置。2023/11/22窗体主要属性Name（名称）标识符，是程序代码中使用的对象名。Caption（标题）字符型，设定或返回窗体标题栏中显示的文本。BackColor（背景颜色）返回或设置背景颜色。ForeColor（前景颜色）返回或设定前景颜色。Height、Width（高、宽）数值型，返回或指定窗体的高度和宽度。Left、Top（左边、顶边位置）数值型，返回或确定窗体左上角的位置。2023/11/22用不同的字体、字型和字号时在窗体显示“航空英雄杨立伟”。例2.4航空英雄杨立伟。设计一个窗体，窗体的标题为“航空英雄杨立伟”，并为窗体加载一幅图片。运行程序时，单击窗体，用不同的字体、字型和字号时在窗体显示“航空英雄杨立伟”。2023/11/22窗体事件

MicrosoftWindows操作系统连续地监视每一个窗口的活动或事件的信号。事件可通过单击鼠标或按下按键等操作产生，也可通过程序控制产生，还可由另一个窗口的操作产生。2023/11/22窗体主要事件Click事件用鼠标单击某个对象就触发了Click事件，调用相应的事件过程。DblClick事件用鼠标双击某个对象就触发了DblClick事件，调用相应的事件过程。Load事件Load是把窗体装入内存工作区时发生的事件。在缺省情况（AutoReDraw=False)下，Load事件过程是不能在窗体中显示输出的。2023/11/22窗体主要事件Activate事件Load事件发生后，系统还会自动产生一个Activate事件。Activate事件过程处理完成后，程序进入“等待事件”状态，当某一事件发生，就对其过程进行处理，之后再等待下一事件发生。UnLoad事件当用户关闭窗体时，会发生一个Unload事件。Resize事件Resize事件是当程序运行后，窗体的大小被改变时触发的事件。2023/11/22Print方法格式：[对象名.]Print[表达式[，|；[表达式]…]]说明：（1）对象名可以是窗体、立即窗口、图片框、打印机。（2）表达式可以是数值或字符串表达式。（3）当输出多个表达式时用分隔符隔开。逗号：分区格式输出，以14个字符为一区；分号或空格：紧凑格式输出。（4）执行Print方法时，命令行的末尾有逗号或分号，则下一次Print方法在同一行接着打印，否则下次Print方法另起一行。窗体主要方法2023/11/22Cls方法格式：[<对象名>.]ClsCls用于清除由Print方法显示的文本或在图片框中显示的图形，并把光标移到对象的左上角（0，0）。窗体主要方法2023/11/22Move方法格式：[对象名.]Move左边距[,上边距[,宽度[,高度]]]

Move方法可在程序中移动窗体和控件，并可以改变其大小。窗体主要方法2023/11/22综合运用

例2.5可扩大的窗体。设计一个窗体，窗体的标题为“可扩大的窗体”，在界面设计时为窗体加载一幅任意图形。运行程序时，单击窗体使窗体的长和宽都扩大原来的1.1倍，并使窗体居中显示。

例2.6变色窗体。设计一个窗体，窗体的标题为“变色窗体”。运行程序时，单击窗体，使窗体变成绿色，并使窗体向下和向右都移动100Twip，同时在窗体输出窗体的位置。单击窗体的关闭按钮，使窗体变成红色，同时在窗体的标题输出系统时间。2023/11/22顺序结构程序设计

在事件驱动机制中，由用户激发的某个事件去执行相应的事件过程。这些事件处理过程之间并无特定的执行顺序，但每个事件过程内部却包含着三种结构。在顺序结构中，语句将按照出现的顺序逐条执行。

2023/11/22例3.1

简单电路。R1＝10欧，R2＝20欧，R3＝30欧，电源电压恒定不变，若开关S1闭合，S2断开时，电流表的读数是0.3A，求(1)电源电压多大？(2)当S1和S2都断开时，电流表的读数多大？(3)当S1、S2都闭合时，电流表的读数是多大？

2023/11/22变量名=表达式或：[对象名.]属性名=表达式赋值语句的含义是:(1)计算赋值号右边表达式的值；(2)将此值赋给赋值号左边的标识符代表的变量或控件属性，作为它的当前值；(3)该值一直保存到下一次再对它赋值为止。赋值语句基本含义2023/11/22赋值相容

赋值语句中的标识符代表一个存储单元。执行赋值语句时，如果这个存储单元的结构和大小能够正确地表示赋值号右边的表达式的值，那么，就称该赋值语句是赋值相容的。2023/11/22数值型与字符串型

1.如果字符串的形式表示数值，则可将字符串赋予数值变量。也可将数值赋予字符串变量。2.如果把非数值形式的字符串赋给数值变量，则会出现运行错误。3.把一个整数赋给一个实变量，将不会出什么错；4.当把一个长整数赋给一个单精度变量，就可能会受示数精度的影响。2023/11/22注释语句格式：‘注释内容

撇号说明：

1.此语句仅起注释作用，不被解释和编译。2.任何字符（包括汉字）都可以作为注释内容。3.此语句可放在过程、模块的开头，也可放在执行语句的后面，但必须是一行中的最后一个语句。2023/11/22暂停语句格式：Stop说明：1.可放在过程中的任何地方，用来暂停程序执行，相当于设置断点。2.类似于Run菜单中的Break命令，系统将自动打开立即窗口（Debug），方便程序员调试跟踪程序。3.调试完毕，生成可执行文件之前，应删去所有的Stop语句。2023/11/22结束语句格式：End说明:1.通常用来结束程序的执行。2.程序没有End语句，或虽然有，但没执行，运行没有影响，但不能正常结束。3.为了保持完整性，程序应该通过End语句结束执行。4.其它用途：EndSub结束一个Sub过程EndFunction结束一个Function过程EndIf结束一个If语句块EndType结束记录类型定义EndSelect结束情况语句2023/11/22命令按钮(CommandButton)控件

命令按钮是最常使用的控件之一。命令按钮最多设置的属性是Caption，一般使用属性窗口设置该属性，以便修改命令按钮的标题。命令按钮最常使用的事件是Click。

2023/11/22命令按钮属性（1）（名称）在程序中它是识别命令按钮的标识符。窗体中第一个建立的命令缺省名称是Command1，后续的命令按钮缺省名称分别是Command2、Command3等。名称属性为只读属性。只读属性的含义是，这样的属性只允许在界面设计时修改，在程序中不能修改这样的属性。（2）Caption属性Caption属性是字符串类型，是显示在命令按钮上的标题。即可以在界面设计时通过属性窗口修改，也可以使用代码设置。

2023/11/22（3）Default属性Default属性是布尔类型，当命令按钮的Default属性设置为True时，按回车键等效于用鼠标单击该按钮。一个窗体只能有一个命令按钮的Default属性设置为True。命令按钮的Default属性缺省值为False。（4）Cancel属性Cancel属性是布尔类型，当命令按钮的Cancel属性设置为True时，按Esc键等效于用鼠标单击该按钮。一个窗体只能有一个命令按钮的Cancel属性设置为True。命令按钮的Cancel属性缺省值为False。

2023/11/22（5）Style属性和Picture属性Style属性决定命令按钮的外观，只能取0或1。当此属性设置为0时，表示标准命令按钮，该按钮只能显示文字，并且不能改变背景颜色和前景颜色，更不能显示图标。当此属性设置为1时，表示图形命令按钮，图形即能显示文字，能改变背景颜色和前景颜色，也能显示图标。命令按钮的Picture属性同窗体的Picture属性，用来显示图形。（6）ToolTipText属性ToolTipText属性是字符串类型，用于设置命令按钮的提示信息，运行程序过程中，若鼠标指向命令按钮并停留时，显示命令按钮ToolTipText的字符串。2023/11/22（8）Enabled属性Enabled属性是布尔类型，用于设置命令按钮是否可以操作，运行程序时，若命令按钮的Enabled属性设置为False，命令按钮呈灰色，此时命令按钮禁止操作。当命令按钮的Enabled属性设置为True时，允许用户操作命令按钮。（9）Visible属性Visible属性是布尔类型，用于设置命令按钮是否可见。（10）其它属性命令按钮也有和大小、位置有关的属性，有Height、Left、Top和Width。不同的是，窗体的Left和Top是相对于屏幕，命令按钮的Left和Top是相对于窗体。另外，命令按钮能够输出文字，因此有与Font相关的属性。

2023/11/22例3.2老师和学生。设计一个窗体，在窗体上添加两个命令按钮。运行程序时，“老师”可以操作，“学生”不能操作，单击“老师”按钮后“老师”不能操作，“学生”可以操作。单击“学生”后，命令按钮状态恢复成原始状态。用鼠标指向命令按钮并停留时，显示提示信息。2023/11/22命令按钮事件命令按钮它是用户与程序交互的最简便的方法。命令按钮除最常使用的Click事件。命令按钮常用到的事件有：MouseDown事件、MouseUp事件、MouseMove

事件等。MouseDown事件2023/11/22例3.3事件顺序。设计一个窗体，在窗体上添加一个命令按钮。并编写命令按钮被压下、单击和抬起的事件过程，在事件过程中输出命令按钮的状态。要求命令按钮被压下和正常状态分别显示不同图形。2023/11/22标签控件标签控件（Label）也称标签或标签框，是最常使用的控件之一，常用于输出文本，显示提示信息，用标签控件输出的文本、提示信息不能编辑、修改。所以标签控件常用来输出标题、显示处理结果或标识那些不带Caption属性的控件，如下面讲的TextBox控件。2023/11/22标签控件属性（1）（名称）属性在界面设计时，用Name属性设置标签控件的名称。随着标签控件的建立，系统赋给标签控件的隐含名称为Label1、Label2等，在隐含名称中Label永远保持不变，变化的是后边的序号，能表示出是第几个添加的标签控件。在程序中对控件的操作，都是通过名称来识别对象。（2）Caption属性Caption属性是字符串类型，用于设置该标签控件的标题。该属性值就是标签控件要显示的内容，它既可以在属性窗口中设定，也可用代码改变控件显示的内容。2023/11/22（3）Alignment属性数值型，用于设置标题的对齐方式，可设置为0、1和2，其作用分别是：左对齐、右对齐和中间对齐。（4）AutoSize属性AutoSize属性是布尔类型，标签的大小是否随标题内容的大小自动调整。当该属性设置为True时，标签的大小随标题内容自动调整，使标签的大小正好适应标题，且不换行。当该属性设置为False时，标签的大小不随标题内容自动调整，标题超过标签尺寸的部分不能显示。确省值为False。2023/11/22（5）BorderStyle属性数值型，用于设置边框的样式，只能取0或1，其作用如下：0－标签无边界线，确省值。1－标签有边界线。（6）BackStyle属性数值型，用于设置背景的样式，只能取0或1，其作用如下：0－透明显示，确省值。1－不透明显示。2023/11/22文本框(TextBox)控件

文本框属性（1）Text属性Text属性是字符串类型，用于设置文本框中显示的文字。该属性值是文本框要显示的内容，它既可以在属性窗口中设定，也可用代码改变控件显示的内容。（2）PasswordChar属性PasswordChar属性是字符串类型，用于设置文本框中显示的字符，常用于口令输入。

2023/11/22（3）Multiline属性Multiline属性是布尔类型，用于设置文本框中是否可以输入多行文本。缺省值是False，此时文本框中只能输入一行文本。当设置该属性为True时，文本框可以输入多行文本。当该属性设置为False时，PasswordChar属性才能发挥作用。（4）ScrollBars属性ScrollBars属性是数值型，用于设置文本框中是否有滚动条，什么样的滚动条。可取值0、1、2、3，缺省值是0。

2023/11/22文本框事件和方法文本框支持Click和DblClick事件，常用的事件还有：（1）Change事件在文本框中输入信息或在程序中改变Text属性值时，都会触发该事件。（2）LostFocus事件按下Tab键或用鼠标单击其它对象使焦点离开该文本框时，触发该事件。（3）KeyPree事件当文本框具有焦点时，按下任意键，都会触发该事件。通常可用该事件检查输入的字符。

2023/11/22TextBox控件常用的方法有：SetFocus方法，其作用是把焦点设置到指定的对象，如：Text1.SetFocus将使当前窗体中的文本框text1能够接收键盘输入的字符。2023/11/22综合运用

例3.6字符和ASCII例3.7相对运动一平板车，质量M=100千克，停在水平路面上。车身的平板离地面的高度h=1.25米，一质量m=50千克的小物块置于车的平板上，它到车尾端的距离b=1.00米，与车板间的滑动摩擦系数u=0.20，如图所示。今对平板车施一水平方向的恒力，使车向前行驶，结果物块从车板上滑落。物块刚离开车板的时刻，车向前行驶的距离S0=2.0米。求物块落地时，落地点到车尾的水平距离S。不计路面与平板车间以及轮轴之间的摩擦，取g=9.8米/秒2。

2023/11/22认识选择控件和分支程序设计

例4.1设置字体。

运行程序时，先选择字体、字形、字体颜色和效果，再单击“确定”，程序将按照选择设置标题为“程序设计”的标签框。

2023/11/22分支程序设计

行If结构行If结构要求把判断结构写在一行。行If结构有如下两种形式：单分支的行If结构，格式如下：If逻辑表达式Then语句组1双分支的行If结构，格式如下：

If逻辑表达式Then语句组1Else语句组2

演示2023/11/22逻辑表达式语句组1语句组2逻辑表达式语句组1演示2023/11/22例4.2找最小数。设计一个窗体，在窗体上添加四个标签、四个文本框和两个命令按钮。运行程序时，先在输入要比较的三个数，再单击“确定”，程序将找出三个数中最小的数，并把计算结果显示在最小数文本框中。

2023/11/22块If结构

单分支的块If结构，格式如下：If逻辑表达式Then

语句序列EndIf双分支的块IF结构，格式如下：If逻辑表达式Then

语句序列1Else

语句序列2EndIf2023/11/22多分支的块IF结构，格式如下：If逻辑表达式1Then

语句序列1ElseIf逻辑表达式2Then

语句序列2……ElseIf逻辑表达式nThen

语句序列n[Else

语句序列n+1]EndIf2023/11/22块If结构的嵌套上边介绍了块If结构的基本形式，在实际使用中常需要复杂的多重选择，用一个块If结构是不行的，必须用嵌套的块If结构。所谓嵌套的块If结构，指在一个块If结构中，又包含另一个块If结构。

2023/11/22例4.3判断三角形。设计一个窗体，在窗体上添加五个标签、三个文本框和两个命令按钮。运行程序时，先在输入文本框中输入边长，再单击“判断”，程序将判断是否能构成三角形及其具体的形状：锐角，直角，钝角，并把计算结果显示在结论标签框中。

2023/11/22多分支结构有时程序可能有多种选择，可以使用多分支结构。多分支结构以多分支语句SelectCase开头，以EndSelect结束，SelectCase语句也称情况语句，它适用于描述较多分支。使用该结构会使程序简洁，多分支结构的格式为：SelectCase测试表达式

Case表达式列表1语句序列1

Case表达式列表2语句序列2·········

Case表达式列表n

语句序列n[CaseElse

语句序列n+1]EndSelect2023/11/22例4.4成绩评定。设计一个窗体，在窗体上添加两个标签、两个文本框和两个命令按钮。运行程序时，先在输入文本框中输入一个百分制的成绩，再单击“计算”，程序将计算出结论，并把结论显示在文本框中。成绩大于等于90结论为“优秀”，成绩在80到90（含80、不含90）结论为“良好”，成绩在60到80（含60、不含80）结论为“及格”，60以下结论为“不及格”。若单击“结束”按钮，结束程序运行。

2023/11/22单选按钮(OptionButton)控件

单选按钮外观是一个圆圈。运行程序时，若单击单选按钮，则圆圈中间会出现一个黑色的圆点，表示该项被选择。一组单选按钮只能有一个被选择。

2023/11/22单选按钮的属性（1）Value属性Value属性标志单选按钮是否被选择，若单选按钮被选择，则它的Value属性值为True，未被选择其值为False(缺省值)。（2）Caption属性单选按钮的标题，是字符串类型。（3）名称和其他属性

2023/11/22单选按钮的事件单选按钮控件支持Click事件。运行程序时单击单选按钮，便触发Click事件，若存在该按钮的事件过程，将执行此事件过程。通常不编写这样的事件过程。

2023/11/22复选按钮(CheckBox)控件

复选按钮也称检查框，该控件可用来提供多选择，用户可以从中选择一个或多个，还可以一个也不选择。复选按钮外观是一个小方框，若单击某一个复选按钮，则在小方框中间将出现“√”符号标记，表示该项被选择。若再次单击被选择的复选按钮，则取消对该复选按钮的选择。2023/11/22复选按钮的属性（1）Value属性复选按钮Value属性是数值型，其值为0表示未被选择，其值为1表示被选择，其值为2表示禁止用户选择，此时复选按钮为灰色，0是缺省值。（2）Caption属性复选按钮的标题，是字符串类型。（3）名称和其他属性

2023/11/22框架(Frame)控件

框架控件主要用于创建多个单选按钮或复选按钮组。在操作一个框架内的单选按钮时，不会影响该框架外的单选按钮。框架是一个控件的容器，当框架设置为不能操作或不可见时，框架中的控件也变得不能操作或不可见。

2023/11/22框架控件的属性（1）Caption属性框架控件的标题，是字符串类型。（2）名称和其他属性

2023/11/22框架控件的事件框架控件支持Click事件，通常不编写这样的事件过程。在界面设计时，要先建立框架，然后在框架内画上其他控件。不要把框架外的控件拖动到框架内，这样的控件不属于该框架的。

2023/11/22列表框和组合框

例4.5旅游信息查询。设计一个窗体，在窗体上添加一个组合框、一个列表框、两个标签和一个命令按钮。运行程序时，用户可从请选择目的地中选择地名，在旅游信息列表中将出现旅游景区。

2023/11/22列表框属性（1）Text属性返回列表框被选择的列表项目，是字符串类型。在列表框中该属性为只读属性，界面设计阶段不能修改。（2）ListIndex属性设置或返回列表框被选择的列表项的序号，是整型。在列表框中第一个列表项序号为0，第二个列表项序号为1，…，最后一个列表项目序号为Listcount-1。（3）Listcount属性返回列表框列表项的个数，是整型。

2023/11/22（4）List属性字符串数组，每个元素都是列表框的一个列表项内容。在界面设计时，利用List属性可以输入列表项目，在代码中可以引用该数组。（5）Sorted属性确定列表项是否按升序排列，是逻辑型，通过属性窗口设置。设置为True表示按升序排列列表项目，否则按增加先后次序排列。（6）Sorted属性确定列表项是否按升序排列，是逻辑型，通过属性窗口设置。设置为True表示按升序排列列表项目，否则按增加先后次序排列。

2023/11/22（7）MultiSelect属性确定是否一次可选择多个列表项，是整型，通过属性窗口设置。可取值0、1和2，0表示每次只能选择一项；1表示简单多项选择，一次可以选择多项；2表示扩展多项选择，按下Ctrl

或Shift键+鼠标单击，一次可以选择多项。（8）Selected属性在支持多项选择中，判断被选择的列表项。是逻辑型数组，在设计阶段不可用，当数组元素为True时，表示该项被选择，为False时，表示该项未被选择。（9）名称和其他属性2023/11/22列表框的事件和方法1．列表框的事件列表框控接收Click事件、DblClick事件和LostFocus等事件，但大多数程序编写DblClick事件过程。2.列表框的方法列表框可以使用的方法有AddItem、RemoveItem和Clear。利用它们可以在程序运行期间修改列表框的内容。

2023/11/22组合框是具有文本框控件与列表框控件特性的控件。组合框系统的隐含名称为Combo1、Combo2等。

2023/11/22组合框属性（1）Style属性当Style设置为0时（默认样式），是下拉式组合框。单击右侧的箭头时打开选项列表，可从打开的列表中选择列表项目，选择的列表项目将显示在文本框中。也可直接在文本框中输入文本，在DropDown等事件过程中把文本框内容增加到组合框中。当Style设置为1时，是简单组合框。这时文本框右侧无箭头按钮，它看起来象一个文本框和一个标准列表框的结合，列表项始终显示在列表框中。可以从列表中选择项，也可以直接在文本框中输入文本。当Style设置为2时，是下拉式列表框，它与下拉式组合框相似。单击右侧的箭头时打开选项列表，可从打开的列表中选择列表项目，选择的列表项目将显示在文本框中；通过输入可以快速选择文本。与下拉式组合框不同的是：它不能在文本框中输入新的内容。

2023/11/22（2）Text属性返回列表框被选择的列表项目，是字符串类型。在Style为0或1时可以键入文本。组合框的（名称）属性系统隐含为Combo1，Combo2等。在列表框中的属性同样适于组合框。

2023/11/22组合的事件和方法组合框的Style取值不同，能响应的事件也有差异，只有简单组合框能响应DblClick事件，下拉式组合框和下拉式列表框能响应DropDown，所有组合框都能响应Click事件。在列表框中可以使用的方法同样适于组合框。

2023/11/22MsgBox函数和MsgBox语句

MsgBox函数的一般格式如下：

MsgBox（内容[，类型][，标题][，帮助文件，主题编号]）

例4.6

确认删除列表项。设计一个窗体，在窗体上添加一个列表框和两个命令按钮。运行程序时，先选择要删除的列表项，单击“删除”按钮，弹出含有询问对话框，根据用户的不同选择进行不同处理。

2023/11/22MsgBox语句MsgBox的语句格式如下。

MsgBox内容[，类型][，标题][，帮助文件，主题编号]

在程序中MsgBox语句不能提供返回值，一般只用来崭停一下程序。

2023/11/22综合运用

例4.7选课。设计一个窗体，在窗体上添加五个标签框、四个组合框、一个文本框和两个命令按钮。运行程序时，先选择课程、教师和学分并输入姓名，单击“登记”按钮，弹出对话框，根据用户的不同选择进行登记或放弃登记。

例4.8歌咏比赛。设计一个窗体，在窗体上添加在窗体上添加一个标签、两个文本框、三个命令按钮和两个框架。两个框架内分别画上单选按钮和复选按钮。运行程序时，输入歌手姓名、选择性别和参赛项目后，单击“登记”将在文本框登记一行，单击“下一个”清除输入的姓名和选择，为输入下一个准备，每次登记信息占一行，单击“退出”按钮，结束程序运行。

2023/11/22认识图片框和循环程序设计

“例5.1正弦曲线。设计一个窗体，在窗体上添加一个图片框和四个命令按钮。运行程序时，单击绘制曲线、绘制坐标、输出标记，可分别在图片框中绘制正弦曲线、坐标系和标记。2023/11/22绘图方法

坐标系在VB中，窗体和图片框都有确省的坐标系。确省的坐标系规定坐标的原点在窗体和图片框可用空间的左上角，向下为Y方向，向右为X方向，单位是Twip。1440个Twip为1英寸。使用这样的坐标系绘图非常困难，用户可用Scale方法设置自己的坐标系。Scale方法的一般格式：[对象名.]Scale(x1,y1)-(x2,y2)

2023/11/22PSet方法画点用PSet方法可以在窗体或图片框上绘制一个点。PSet方法的一般格式：

[对象名.]PSet(x,y)[,颜色]

2023/11/22Line方法用Line方法可以在窗体或图片框上绘制一条直线或绘制一个矩形。Line方法的一般格式：[对象名.]Line[(x1,y1)]-(x2,y2)[,颜色][,B[F]]其中，(x1,y1)为始点坐标；(x2,y2)为终点坐标；颜色可以使用RGB函数，规定画线或画矩形的颜色。关键字B表示画矩形或填充矩形。当FillStyle属性为1时，表示画空心矩形。FillStyle属性可取值0到7，除FillStyle属性为1外，都为画填充矩形，此时由FillStyle属性决定填充图案，由FillColor属性决定填充颜色。

2023/11/22

Circle方法用Line方法可以在窗体或图片框上绘制一条直线或绘制一个矩形。用Circle方法可以在窗体或图片框上绘制圆、圆弧、扇形或椭圆。Circle方法的一般格式是：[对象名.]Circle(x,y),半径[,颜色][,起始角][,终止角][,长短轴比率]其中，(x,y)为圆心坐标；颜色可以使用RGB函数；起始角和终止角应使用弧度，值在0~2π时绘制圆弧，取负值时绘制扇形；使用长短轴比率可用绘制椭圆。

2023/11/22循环结构

循环结构用来描述有规律地重复执行某一程序段。VB6.0支持循环结构的语句有for、和do等语句，使用循环控制结构编程可以简化程序，提高效率。

For…Next结构For…Next结构在程序中可以实现固定次数的循环。For…Next结构的格式如下：For循环变量=初值To终值[Step步长]循环体[ExitFor]Next循环变量

2023/11/22例5.2连乘之积。设计一个窗体，在窗体上添加两个命令按钮。运行程序时，单击“计算”，程序将弹出输入对话框，要求输入数据，输入5个数之后，将在窗体输出5个数之积。

2023/11/22

Do…Loop结构

DoWhile…Loop形式

DoWhile逻辑表达式循环体[ExitDo]Loop

DoUntil…Loop形式

DoUntil逻辑表达式循环体[ExitDo]Loop2023/11/22Do…LoopWhile形式

Do

循环体[ExitDo]LoopWhile逻辑表达式

Do…LoopUntil形式

Do

循环体[ExitDo]LoopUntil逻辑表达式

2023/11/22循环的嵌套在一个循环结构的循环体内含有另一个循环结构，这就形成了嵌套循环，又叫做多重循环。判断正误DoWhileb1Forj=k1Tok2……LoopNextjDoForj=k1Tok2……NextjLoopWhileb1DoForj=k1Tok2……NextjLoopWhileb12023/11/22图片框和图像框

图片框和图像框都能加载图像文件。图片框功能更强，它不仅可以显示图像，还可以用绘图方法绘制图形、用Print方法显示文本，图片框也能作为其他控件的容器。可加载到这两个控件上的图像文件扩展名是：.Bmp、.Dib、Ico、.Cur、.Emf、.Wmf或.Gif。2023/11/22图片框和图像框的属性（1）Picture属性设置图片框和图像框要显示的图形。可在设计阶段加载图像文件，也可以在程序运行时加载图像文件。（2）AutoSize属性设置图片框是否能自动改变大小以适应图形，该属性是逻辑型。当取值True时，图片框随着图形实际大小自动调整尺寸以适应图形的尺寸；若取值False时,图片框不能改变大小，此时若图片框小于图形尺寸，图形被裁剪。图片框的AutoSize属性缺省为False。

2023/11/22（3）Stretch属性设置能否自动改变图形的大小以适应图像框，该属性是逻辑型。若取值True时,图像框不能改变大小，此时图形被压缩或拉伸以适应图像框；当取值False时，图像框随着图形实际大小自动调整尺寸以适应图形的尺寸。图像框的Stretch属性缺省为False。（4）名称和其他属性2023/11/22在代码中加载图形要使用LoadPicture函数。把LoadPicture函数值赋给图片框或图像框的Picture属性，便可实现在图片框或图像框中显示图形。一般使用的格式为：[对象名.]Picture=LoadPicture（"图形文件名"）2023/11/22例随手画。'本程序演示MouseMove事件过程的用法，在Picture1中随手画'在Picture1中压下鼠标左键并拖动鼠标可绘制图形2023/11/22图片框和图像框事件和方法图片框和图像框都支持Click和DblClick事件，但很少对它们编程。另外图片框和窗体一样支持MouseMove、MouseDown、MouseUp等事件。图片框常用方法在本章第2节介绍了PSet方法、Line方法、Circle方法。这里主要介绍Cls方法和Print方法Cls方法用于清除图片框中显示的文字信息或用绘图方法绘制的图形。Print方法用于在图片框中显示的文字信息。和在窗体使用这两个方法完全相同。Cls方法的一般格式是：[对象名.]Cls2023/11/22其他图形控件在VB除图像框和图片框控件是专门处理图形的控件外，还有画线控件和形状控件，使用这两个控件可以非常方便地构造几何图形，一般不需要编程。1、

Line画线控件Line控件可以用来画线。画线操作的步骤如下：2、

Shape形状控件Shape控件可以用来画矩形、正方形、椭圆、圆、圆角矩形和圆角正方形。通过Shape属性可确定所需要的几何形状。Shape控件的Shape属性取值0到5，其形状分别对应矩形、正方形、椭圆、圆、圆角矩形和圆角正方形。2023/11/22综合运用

例5.5绘制方程线。设计一个窗体，在窗体上添加一个图片框、两个框架、五个标签框、五个文本框和四个按钮。运行程序时，单击“绘制曲线”和“绘制直线”根据函数中给定的数值在图片框内绘制函数的图形。单击“输出坐标”和“结束程序”也能完成相应的功能。

例5.6水仙花数。寻找[100，999]之间的所有水仙花数，所谓水仙花数指一个三位数，其中各位数字的立方和等于该数本身。在窗体上添加一个标签框、一个列表框和两个命令按钮。用户界面请参见图5.21。

2023/11/22例5.7整钱化成毛票。把一圆以上的钞票换成一角，两角，五角的毛票（每种至少一张），求每种换法各种毛票的张数。在窗体上添加一个列表框和两个命令按钮。

例5.8最大公约数和最小公倍数。设计一个窗体，在窗体上添加一个图片框和两个命令按钮。运行程序时，单击“开始”按钮,弹出输入对话框，要求输入两个数，程序将计算两个自然数M和N的最大公约数和最小公倍数。

2023/11/22认识计时器和数组

例6.1输入日期计算天数。设计一个窗体，在窗体上添加一个标签框、一个计时器和两个命令按钮。运行程序并单击“开始”，弹出输入对话框，要求按照固定格式输入日期，程序计算输入日期是该年中的第几天。

2023/11/22

控件属性数组

例6.2列表项操作。设计一个窗体，在窗体上添加一个列表框、一个框架、一个文本框、一个复选按钮和五个命令按钮。运行程序并单击“增加元素”，给列表框增加10个列表项。单击“交换元素”，交换相邻的两个列表项。在查找中输入要查找的文本，单击“开始”，将找到所有含该文本的列表项并使之处于选择状态，选择严格查找，只有列表项的内容和要查找的文本完全一致时，才算找到。单击“反向选择”，使选择的列表项变成未被选择的列表项，而未被选择的列表项变成选择的列表项。单击“删除元素”，将删除所有选择的列表项。2023/11/22控件数组

控件数组由一组相同类型的控件组成。这些控件具有相同的名称，具有很多相同的属性。数组中的每个控件都有唯一的索引号，即下标，下标值由Index属性指定，第1个控件数组元素的下标为0，第2个控件数组元素的下标为1等等。它是创建控件数组时系统自动按顺序赋给每个控件数组元素的，程序通过索引值来区别控件数组中的元素。由于控件数组是由一组相同类型的控件组成，这些控件共用一个相同的名字。数组中的每个控件都有唯一的索引号（下标），所以它们非常方便的共享同一事件过程。在若干控件执行的操作相似的场合最适于使用控件数组。

2023/11/22例6.3计算器。设计一个窗体，在窗体上设计由十个数字按钮、四个运算符、四个函数按钮、一个“C”按钮、一个“=”按钮和一个标签，模拟计算器能完成一步整数计算功能。

2023/11/22自定义数组

在本章介绍列表框的List和Selected属性时，谈到这样的属性是数组。它们分别存放列表框中所有列表项的内容和每个列表项是否被选择的状态。在实际应用中，也经常需要处理成批数据，为此高级语言都提供了数组。它是一种非常有用的数据结构。一般来讲，数组是由一系列元素构成，每个元素的类型相同。

2023/11/22在计算机中数组占据一块内存区域，数组名是这个区域的名称，下标可标识数组元素在该区域的位置。数组应遵循先定义后使用的原则。定义数组的目的是为其留出所需空间。这一点和控件属性中使用到的数组不同，控件属性中用到的数组是系统定义的。定义数组的一般格式：Dim数组名(第一维说明[,第二维说明]…..)[As类型]2023/11/22除使用Dim语句指定下界，还可以使用OptionBase语句指定下界。OptionBase语句格式为：OptionBase下界值

2023/11/22例6.4试验数据。设计一个窗体，在窗体上添加一个文本框、一个图片框、一个列表框和三个命令按钮。运行程序时，单击“模拟数据”按钮，用随机函数产生30个两位模拟试验随机整数，并且显示在文本框中。单击“数据分布”按钮，统计试验数据的分布，按10到19、20到29……90到99分段，统计每段模拟试验数据的个数，并在图片框中显示。单击“计算平均”按钮，计算模拟试验数据的平均值和低于平均值数据的个数，并且显示在列表框中。

2023/11/22例6.5杨辉三角形。设计一个窗体，在窗体上添加一个文本框和三个命令按钮。运行程序时，单击“输出”，弹出输入对话框，用于输入要输出杨辉三角形的行数，假定要输入的数小于11，程序将计算并在文本框中输出杨辉三角形。

2023/11/22可调数组

定义数组的目的是为了预留连续的存储空间，但有时数组的大小只有运行程序时才能确定，定义“足够大”的数组虽然可以解决这个问题，但浪费了很多存储空间。在例8.5中处理gz数组VB的编译程序将预留了100个存储空间，但实际可能只使用其中一部分。为此，VB6.0提供了可调数组用来解决这个问题，可调数组也称动态数组。可调数组的长度可以在运行程序时改变。定义可调数组的方法是(1)用Dim语句（或Private和Public），但不要指定维数。(2)再用ReDim语句指定数组的准确尺寸。

2023/11/22例6.6计算前三名学生成绩。设计一个窗体，在窗体上添加两个命令按钮。运行程序时，单击【计算】，弹出输入对话框，要求输入学生人数。以后要求输入每个学生的成绩，输入结束后计算并输出学生人数和平均成绩，然后再输出成绩最高的前三名学生的成绩。

2023/11/22可变类型数组当一个数组被说明成变体类型的数组，它的每个元素也是变体类型的，因此，可以存放各种类型的数据。OptionBase1PrivateSubForm_Click()Diman(6)Fori=1To3an(i)="Name"+Str(i)NextiFori=4To6an(i)=Int(Rnd*10000)/100NextiFori=1To3Printan(i),an(i+3)NextiEndSub2023/11/22变体变量可以扩充为数组，用Array函数可以给变体变量赋一组数，这组数的数据类型可以不同，赋值以后变体变量扩充为数组，要访问其中的元素。例如：OptionBase1PrivateSubForm_Click()Dimanan=Array("Name1","Name2","Name3",Int(Rnd*10000)/100,Int(Rnd*10000)/100,Int(Rnd*10000)/100)Fori=1To3Printan(i),an(i+3)NextiEndSub2023/11/22计时器控件(Timer)

计时器控件也称定时器或时钟，他是按一定时间间隔自动触发事件的控件，使用计时器可定时重复执行时钟中断过程。在程序运行时，计时器是不可见的。

2023/11/22计时器的属性（1）Interval属性设定计时器触发Timer事件的时间间隔，即两个计时器事件之间的时间间隔，其值以毫秒（0.001秒）为单位，允许范围是0到65,535。该控件会自动检查系统时间是否又到Interval属性值，到了便产生Timer事件，执行时钟中断过程。当Interval属性值为0时屏蔽计时器，使计时器不再产生Timer事件。（2）名称和其他属性

2023/11/22计时器的事件计时器控件的常用事件是Timer事件，是计时器在间隔了一个Interval时间后所触发的事件。例6.7倒计数。设计一个窗体，在窗体上添加两个标签和一个计时器。运行程序时，自动开始倒计数，从10到0每隔一秒倒计数一次，计数时在两个标签中分别显示系统当前时间和倒计数的值。

2023/11/22滚动条控件

滚动条控件用于输入数据，也用于与那些不支持滚动的控件配合使用，给它们提供滚动观察的功能。

2023/11/22滚动条的属性（1）Value属性Value属性标志滚动条的当前值（滚动滑块的位置），当滚动滑块的位置移动时，Value属性值也随之改变。在程序中也可以用代码设置，设置时滚动滑块的位置随之移动。其值为整型，范围应在Min和Max之间。（2）Min属性滚动滑块在最小位置的值，其值为整型，范围应在-32768和32767之间。水平滚动条滚动滑块在最左边，垂直滚动条滚动滑块在最上边，是滚动滑块在最小位置的值。（3）Max属性滚动滑块在最大位置的值，其值为整型，范围应在-32768和32767之间。水平滚动条滚动滑块在最右边，垂直滚动条滚动滑块在最下边，是滚动滑块在最大位置的值。

2023/11/22（4）SmallChange属性当单击滚动条两端箭头时，Value的改变量，其值为整型。（5）LargeChange属性当单击滚动条的空白位置时，Value的改变量，其值为整型。（6）名称和其他属性

2023/11/22滚动条的事件滚动条控件常用的事件有Scroll和Change。当拖动滚动条滑块时触发Scroll事件，当单击滚动条两端箭头时或单击滚动条的空白位置时，触发Change事件。拖动滚动条滑块结束时，也触发Change事件。

例6.8比较Scroll和Change事件。设计一个窗体，在窗体上添加两个文本框和两个水平滚动条。运行程序时，单击左边滚动条两端箭头时或单击滚动条的空白位置时，改变文本框1的宽度和文本框1中字的大小，拖动右边滚动条滑块时，改变文本框2的宽度和文本框2中字的大小。

2023/11/22综合运用

例6.9入网登记。设计一个窗体，在窗体上添加三个标签、一个文本框、一个列表框和两个命令按钮。运行程序时，输入入网人员姓名，单击【入网登记】按钮，在列表框中增加一位网民，若在列表框中单击网民的姓名，将显示该网民入网时间，单击【退出】命令按钮，结束程序运行。

例6.10庆祝中国载人航天的成功。设计一个窗体，在窗体上添加两个标签、一个文本框和一个水平滚动条。运行程序时，文本框中的汉字随时间而改变颜色,改变水平滚动条滑块位置会改变颜色变化的频率，颜色取红、绿和蓝三色。

2023/11/22例6.11奔跑的马。设计一个窗体，在窗体上添加一个图像框。运行程序后，在窗体上显示马奔跑的动画。

例6.12运行中的载人飞船。设计一个窗体，在窗体上添加一个图片框和一个形状控件。运行程序后，模拟飞船绕地球运动。

2023/11/22多文档界面（MDI）应用程序

多文档界面（MDI）允许创建在单个容器窗体中包含多个窗体的应用程序。像MicrosoftExcel与MicrosoftWordforWindows这样的应用程序就具有多文档界面。2023/11/22多文档界面（MDI）应用程序MDI窗体与具有一个限制条件的普通窗体相似。除非控件具有Align属性（如PictureBox控件）或者具有不可见界面（如Timer控件），否则不能将控件直接放置在MDI窗体上。

2023/11/22多文档界面（MDI）应用程序创建MDI应用程序时使用下列步骤来创建MDI窗体及其子窗体。

创建MDI窗体。从“工程”菜单中选取“添加MDI窗体”。创建应用程序的子窗体。要创建一个MDI子窗体，先创建一个新窗体（或者打开一个存在的窗体），然后把它的MDIChild属性设为True2023/11/222023/11/22MDINotePad示例

应用程序是一个简单的文本编辑器

1．指定活动子窗体或控件2．加载MDI窗体及其子窗体3．设置子窗体的大小和位置4．维护子窗体的状态信息5．用QueryUnload卸载MDI窗体2023/11/22多个窗体

1．Load语句Load语句把一个窗体装入内存。2．Unload语句它清除内存中指定的窗体。3．Show方法Show方法用来显示一个窗体。4．Hide方法Hide方法是隐藏窗体，即不在屏幕上显示，但在内存中。2023/11/22多个窗体设置启动窗体

（1）在“工程”菜单中，选取“工程属性”。（2）选取“一般”。（3）在“启动对象”列表框中，选取要作为新启动窗体的窗体。（4）选取“确定”。2023/11/22在VisualBasic中有3种过程：Sub过程、Function（函数）过程和Property（属性）过程。属性过程用来返回和设置属性的值，也可以设置对象的引用，本章不再介绍。下面主要介绍Sub过程、Function过程。

2023/11/221．Sub过程子过程是在响应事件时执行的代码块。将模块中的代码分成子过程后，在应用程序中查找和修改代码变得更容易了。子过程的语法是：[Private|Public][Static]Subprocedurename(arguments)statementsEndSub2023/11/22

子过程以Sub开头，以EndSub结束。

过程名的命名规则与变量名相同。

Sub与EndSub之间的语句称为过程体。

形式参数表的形式参数只在本过程内有意义。2023/11/22例7.1调用窗体的公用过程。设计一个窗体，窗体的标题为“调用窗体的公用过程”，运行程序时，单击“改变文本框内容”，改变窗体中文本框的内容，要求用过程实现。

2023/11/221．关键字Function代替了关键字Sub。2．函数过程有返回值。3．在函数过程体中至少应该有一个给函数过程名赋值的语句。如果不给函数名赋值，则该函数会返回一个缺省值。2023/11/222．函数过程（Function）VisualBasic包含内置的或内部的函数，如Sqr、Cos或Chr。此外，还可用Function语句编写自己的Function过程。函数过程的语法[Private|Public][Static]Functionprocedurename(arguments)[Astype]StatementsEndFunction2023/11/22例7.2调用窗体的公用函数。设计一个窗体，窗体的标题为“公用函数”，在窗体的文本框中输入一个整数，单击“计算阶乘”按钮，在窗体中打印出阶乘的计算结果。要求用函数实现阶乘计算。

2023/11/22调用Sub过程

调用Sub过程有两种方法：'以下两个语句都调用了名为MyProc的Sub过程CallMyProc(FirstArgument,SecondArgument)MyProcFirstArgument,SecondArgument注意，当使用Call语法时，参数必须在括号内。若省略Call关键字，也必须省略参数两边的括号。2023/11/22调用函数

调用自行编写的函数过程的方法和调用VisualBasic内部函数过程的方法一样，即在表达式中写上它的名字。下面的语句都调用函数ToDec。Print10*ToDecX=ToDecIfToDec=10ThenDebug.Print"OutofRange"X=AnotherFunction(10*ToDec)2023/11/22按值传递参数。按值传递参数时，传递的只是变量的副本。如果过程改变了这个值，所作的变动只影响副本而不会影响变量本身。用ByVal关键字指出参数是按值来传递的。例SubPostAccounts(ByValintAcctNumasInteger)..'这里放语句。.EndSub2023/11/22按地址传递参数。按地址传递参数使过程用变量的内存地址去访问实际变量的内容。结果，将变量传递给过程时，通过过程可永远改变变量值。按地址传递参数在VisualBasic中是缺省的。

2023/11/22例7.3多窗体与公共过程、标准模块。设计一个多窗体程序，在两个窗体中分别输入圆的半径，然后计算圆的面积和周长。要求周长的计算调用标准模块中的函数过程，而面积的计算调用窗体的函数过程。

2023/11/22例7.4过程级变量示例。设计一个程序演示过程级变量的使用

2023/11/22例7.5私有模块级变量。设计一个程序演示私有模块级变量的用法

2023/11/22例7.6变量的作用域示例。设计一个窗体，在窗体中打印同名变量在全局和局部范围中的不同值。

2023/11/22综合举例

例7.7验证哥德巴赫猜想。设计一个窗体，在其中输入一个不小于6的偶数，将其表示为两个素数之和。

2023/11/22通用对话框