vb-计算机程序设计基础部分

实验一VB的集成环境

【实验目的】

•熟悉VisualBasic6.0（VB6.0）的集成开发环境。

・了解使用VB6.0实现一个应用程序的操作过程。

・掌握VB6.0应用程序界面设计的操作方法。

•掌握VB6.0程序代码的输入、修改和运行的方法。

【相关知识提要】

1.Windows资源管理器的基本操作

用VB6.0（实现的应用程序都是由多个文件组成的，为了便于管理，一般为每一个应

用程序都建立一个文件夹，用以保存该应用程序中的所有文件。

2.VB6.0的启动与退出

启动VB6.0的步骤如下：

1）点击菜单【开始|程序|MicrosoftVisualBasic6.0中文版|MicrosoftVisualBasic

6.0中文版】（说明：在本指导书中，黑方括号（［］）中的内容表示菜单选择操作。

例如，【XX|YY|ZZ】表示选择“XX”菜单、选择“XX”菜单下的“YY”菜

单、选择“YY”菜单下的“ZZ”菜单。）

2）在“新建”选项卡中选择“标准EXE”工程，单击“打开”按钮（VB启动完毕,

进入其集成开发环境，如图1.1所示）。

图1.1VB开发环境

-1-

3）退出VB就是关闭其集成开发环境的窗口。操作方法是：点击【文件|退出】

3.VB的集成开发环境

VB6.0集成开发环境除了具有标准Windows环境的标题栏、菜单栏、快捷工具栏外,

还有工具箱窗口、属性窗口、工程管理器窗口、对象窗口（窗体设计器窗口）、代码窗口、

立即执行窗口、窗体布局窗口等开发工具。

1）菜单和快捷工具栏

同其他任何Windows软件一样，VB集成开发环境的“菜单”列出了在此环境中可以

进行的各种操作，“快捷工具栏”上摆放了常用操作的快捷方式。有关菜单项的意义，将

在以后用到时加以说明。这里先简要介绍一下快捷工具栏上的快捷方式。

VB提供了“编辑”、“标准”、“窗体编辑器”和“调试”等4种快捷工具栏，并允许

用户定义自己所需要的工具栏。一般情况下，集成环境中只显示标准工具栏，其他工具栏

可以通过“视图”菜单中的“工具栏”命令打开（或关闭）。

“标准”工具栏中的常用按钮如表1.1所示。

表1.1标准工具栏中的常用按钮

图标名称功能

旬添加窗体在工程中添加新窗体，相当于【工程1添加窗体】

直菜单编辑器显示菜单编辑器对话框

打开工程用于打开已有的工程文件

a保存工程用于保存当前的工程文件

剪切将选中的内容剪切到剪贴板中

电复制将选中的内容复制到剪贴板中

粘贴将剪贴板中的内容粘贴到当前位置

►启动开始运行当前的工程

■结束结束当前工程的运行

尊工程资源管理器打开工程资源管理器窗口

囱属性窗口打开属性窗口

2）对象窗口及其基本操作

对象窗口（也叫窗体设计器窗口，见图1.1）是用来设计应用程序用户界面的。用VB

开发的应用程序执行时打开的窗口，就是在此窗口中设计出来的。

（1）显示对象窗口

要打开或调出对象窗口，可以这样操作：【视图I对象窗口】；或者选定要涉及的窗体

之后，单击“工程资源管理器”窗口中的“查看对象”按钮。

（2）将控件放置到窗体中的方法

在“工具箱”窗口选中所需的控件图标（指向某控件时会出现提示），在窗体中拖画

出捽件。或者在“工具箱”窗口双击所需的控件图标（该控件已被放置到窗体的中间），

将其拖放到适当的位置。

（3）调整窗体或者捽件位置和大小的方法

-2-

•粗调控件位置：拖动控件到合适位置放下。

•粗调大小：在对象窗口选中窗体或者控件，移动鼠标到其四周的某一小方块（调

整点）上，当鼠标指针变为双向箭头时，拖动鼠标以调整对象大小，当大小合适

时放下。

•细调位置和大小：通过属性窗口设置其左上角坐标（Left和Top属性）和高度与

宽度值（Height和Width属性）。

3）工具箱窗口及其基本操作

工具箱窗口（见图1.1）中存放着构成VB应用程序的常用基本构件，称为控件（Control）。

每个控件由一个工具图标表示。

要打开或调出工具箱窗口，可以这样操作：【视图I工具箱】

4）属性窗口及其基本操作

属性窗口（见图1.1）用来对选定的窗体或控件的属性进行设置。

（1）显示属性窗口

要打开或调出属性窗口，可以这样操作：【视图I属性窗口】

（2）选择窗体或控件

・选择窗体：单击窗体的空白处，或者从“属性窗口”上端的对象组合框中选择。

•选择控件：单击窗体中的控件（如果要选择多个控件，可按下Shift键然后再单

击要选择的各个控件；或者在窗体上拖鼠标使得虚线框罩住要选择的控件时放

开）。或者从属性窗口上端的对象组合框中选择。

（3）设置属性。利用属性窗口为窗体或者控件设置属性的操作步骤如下:

①先选中要设置属性的窗体或者控件（选中的对象四周有,8个小方块）

②在“属性”窗口中找到需要设置的属性名并单击之

③设置属性。具体做法是:

如果属性名右边是文本框（比如，窗体的Caption属性IonForml),则

在其中输入属性值;

如果属性名右边是组合框（比如，图像框的Visible属性VisibleTrue』),

则从组合框中选择所需的属性值；

・如果属性名右边是具有浏览按钮（省略号）的文本框（比如，图像框的Picture

属性国505^^・gone））,则可以直接在文本框中输入属性值，也可以单击浏

览按钮，去寻找所需的属性值。

5）工程资源管理器窗口

VB6.0把应用程序称为“工程”。一个工程一般都是由许多各种类型的文件组成的。

例如工程文件（.vbp）、窗体文件（.frm）、标准模块文件（.bas）等等。

工程资源管理器窗口（见图1.1）就是用来管理工程中的各种文件的。该窗口中以树

状列表的形式显示当前工程的文件组成。通过该窗口，可以很方便地对选中的文件进行管

理（如查看代码、查看对象、保存文件等）。

6）代码窗口及其基本操作

-3-

代码窗口（图1.2）用来编辑事件过程（即事件响应代码）和其他通用过程。

|显示一个代码黄|显示全部代码娱］

图1.2代码窗口

（1）显示代码窗口

启动VB6.0时，代码窗口并不自动打开。当需要编写代码时可以通过如下任意一种

方式来打开代码窗口：【视图I代码窗口】；或者双击窗体的任何地方；或者在对象窗口中

右击鼠标【查看代码】；或者单击工程管理窗口中的“查看代码”按钮。

（2）输入/编辑代码

输入代码的操作步骤如下：

①从“对象”下拉列表框（见图1.2）中选择要输入代码的对象

②从“事件”下拉列表框（见图1.2）中选择要输入代码的事件

③在事件过程中输入自己编写的代码。

特别提醒：输入代码时必须弄清楚代码定多个对象哪个亮仔的？!

4.VB应用程序的实现过程

使用VB实现一个应用程序一般需要如下几个步骤:

（1）创建新的VisualBasic工程

（2）创建应用程序的用户界面

（3）设置对象的属性

（4）编写程序代码

（5）调试和运行程序

（6）保存程序

（7）编译、生成可执行的应用程序

（8）制作发布包

【实验内容】

1.任务

用“Windows资源管理器”在某磁盘（比如D:盘）上建立一个以自己的学号为名的文

-4-

件夹（用来保存自己编写的程序）。然后，实现一个完成如下功能的程序：

1）程序运行时出现一个标题为“我的第一个程序”的窗口（一般来说，每一个VB

应用程序都至少有一个窗体）；

2）窗口中显示蓝色的隶书体文字“我们开始学习VB了！”，所显示的信息在窗口中

从左往右移动，当从窗口右端消失时，再从窗口的左边出现。

实现步骤：

（先照着做，别问为什么，但要特别注意每一步的操作方法）

1）创建•个工程

如果VB没有启动，则按如下步骤进行：

（1）【开始I程序IIMicrosoftVisualBasic6.0中文版】（出现"新建工程”对话

框，如图1.3所示）

（2）在“新建工程”对话框中选择“新建”页面中的“标准EXE”，然后单击“打开”

按钮（图1.3中画圈之处）。

至此，一个应用程序的基本框架已经

建立。

如果VB已经启动，则在VB界面中按

如下步骤进行：

（1）保存当前工程（【文件I保存工

程】或者【文件I工程另存为】）

（2）新建工程（【文件I新建工程】）

（出现“新建工程”对话框，如图1.3所示）

（3）在“新建工程”时话框中选择“新

建”页面中的“标准EXE”，然后单击“打

开”按钮。

至此，一个应用程序的基本框架已经图1.3“新建工程”对话框

建立。

2）设计界面

根据程序功能要求，在窗体中放置•个标签控件（Labell）和个计时器控件

图1.4界面设计的操作界面

-5-

按照表1.2设置窗体和控件的有关属性:

表1.2设置窗体和控件的有关属性

窗体或控件属性设置值说明

Name（名称）forml（默认）［注］

窗体

Caption我的第一个程序

Name（名称）labell（默认）

AutoSizeTrue

用来显示

标签Caption我们开始学习VB了！

文字

Font隶书，三号

ForeColor蓝色

Name（名称）Timerl（默认）用来控制

计时器

InterVai200文字移动

［注］:每一个对象在创建时系统都为其取一个默认的名字，如果使用该默认名字，

则“名称”属性无需设置。

对象（窗体或窗体中的控件）的属性，可以通过属性窗口在设计阶段设置（静态设置）,

也可以通过代码在程序运行时设置（动态设置）。现在，让我们通过属性窗口来设置标签

（Label1）的Caption和AutoSize属性。操作步骤如下：

（1）在属性窗口的“对象”下拉列表框中选择要设置属性的对象（这里是Label1,

如图1.5所示），或者在窗体中选择好对象然后激活属性窗口；

（2）找到Caption属性，输入属性值：“我们开始学VB了！"（注意：双引号不要输

入）；

（3）找到AutoSize属性,选择要设置的属性值:True（如图1.6所示）。

星性-Labell

ItabellLabelV]

单击下拉按钮|

Label1Label

Timer

Appearance1-3Dr选择对冢।

AutoRedrawFalse

BackColor口&H800000

BorderStyle2-Sizabl（

[Caption.Forml

|ClipContr«lsTrue

IControlBoxTrue

AutoSize

iCaption

鑫用霰建的标照栏中或图决定控件是否能自动调整大小以显示所有的

内容.

图1.5在属性窗口中选择对象图L6为选中的对象设置属性

按上述方法继续设置FontsForcColor属性以及窗体和其它控件的有关属性。

3）编写代码

在Timerl控件的Timer事件中编写如下代码（注意下图中输入代码的位置）:

,标签的位置右移100个单位

-6-

Label1.Left=Label1.Left+100

,如果标签移出窗体的右边界，则将其重置与左边界以外

IfLabel1.Left>=Me.WidthThen

Label1.Left=-Label1.Width

EndIf

注意：单引号后的文字为注释。注释•般用来对代码的作用作简要的说明。操作方法

如下:

（1）打开“代码窗口”：（双击当前设计的窗体，或者【视图I代码窗口】）

（2）从“对象”下拉列表框中选择要编写代码的对象Timerl（如图1.7所示）

（3）从“过程”下拉列表框

中选择要编写代码的（事件）过程。

由于Timerl对象只有一个（事件）

过程Timer,所以此步无需进行。

（4）将代码输入到所选对象

的指定（事件）过程中。本例是

Timerl对象的Timer（事件）过图1.7选择要编码的对象

程。（如图1.8所示）

特别提醒：

（1）注意字母“O”和数字

“0”的区别，小写字母“1”和

数字“1”的区别；

（2）代码中的标点符号都是

西文的，不得出现中文标点；图1.8Timerl对象的Timer事件过程代码输入位置

（3）注释可以不输入。

图1.9所示的是上述代码输入

后的情况。

4）保存工程

在以自己的学号为名的文件夹

中，再建立一个名为“0101”的文

件夹，然后将本程序的所有文保存

在0101文件夹中。窗体文件和工程

文件都用默认的文件名（Forml.frm图1.9Timerl对象的Timer事件过程代码

和工程l.vbp）o

操作步骤:

（1）【文件I保存工程】（出现“文件另存为”对话框）

（2）从“文件另存为”对话框中的“保存在”下拉列表框中找到并打开自己的文件

夹（比如2005xxxx,如图1.10所示）

-7-

（3）单击“创建新文件夹”

工具按钮（当’）（建立了名为

“新建文件夹”的文件夹）

（4）输入文件夹名“0101”,

并将0101文件夹打开（双击）

（5）指定相应的文件名，并

单击“保存”按钮

图1.10“文件另存为”对话框

5）运行程序

运行程序的方法是：选择菜单【运行I启动工或者单击“启动”工具按钮（>）;或

者直接使用F5键。

注意：要想关闭运行中的程序，可以采用如下方法中的一种：关闭运行的窗体：或者

选择菜单【运行I结束】；或者单击工具栏中的“结束”工具按钮（・）。

程序运行之后应该检查程序是否实现了预期的功能，如果有错误或者欠缺，应该对程

序进行修改，修改后需要重新保存。

至此，一个应用程序基本制作完毕，剩下来的工作就是将该应用程序编译并生成可执

行的文件（.EXE）,然后打包发布。不过这些暂时还用不到，故从略。

现在，想知道文字为什么能够移动吗？其实很简单：因为计时器控件的Timer事件代

码会每隔一定的时间（该间隔时间由InterVai属性值决定，比如本例为200毫秒）自动执

行一次，而我们为计时器控件的Timer事件所写的代码功能是将显示文字的标签控件向右

移动100个单位，这样标签就向右不停的移动了。

想一想，怎样能让文字移动的更快一点或者更慢一点？想好了就试一试。

2.练习

（1）仿照上题步骤，自己实现另一个程序，保存于名为0102的文件夹中。该程序完

成的功能与上题类似，只是文字信息为红色黑体字，而且移动方向改为从右往左。程序的

窗体文件以Exp02.frm为名，工程文件以Exp02.vbp为名。

界面和上题相同，计时器控件的Timer事件的代码为：

，标签的位置左移100个单位

Label1.Left=Label1.Left-100

1如果标签移出窗体的左边界，则将其重置于窗体的右边界以外

IfLabel1.Left<-Label1.WidthThen

Label1.Left=Me.Width

EndIf

（2）如果有兴趣，现在或者课后再实现一个程序，该程序兼有上面两个程序的特性,

即蓝色文字从左往右移，红色的文字从右往左移。

-8-

提示如下：

①界面设计：窗口中放置两个标签控件（Label1和Labcl2）和两个计时器控件（Timerl

和Timer2）。

②编写代码：用计时器控件Timerl控制标签控件Label1的移动，计时器控件Timer2

控制标签控件Label2的移动。这样计时器控件Timerl的事件代码可以原样照抄2题的代

码，而计时器控件Timer2的事件代码可以仿抄3题的代码（将3题代码中的所有Label1

均改为Label2）»

-9-

实验二窗体与对话框

【实验目的】

・巩固在实验一中所学到的知识一一VB集成开发环境的基本操作。

・学习并掌握窗体的常用属性、事件和方法的作用于用法。

・学习并掌握系统预定义对话框的作用于用法。

【相关知识提要】

1.对象以及对象的属性、事件和方法等有关概念

1）对象

我们将现实世界中任何有明确意义的事物称为实体。实体既可以是具体的事物，也可

以是人为的概念。例如，学校、学生、成绩、公司、职工、贷款、债权等等，都是实体。

对象就是描述实体特性的数据和对这些数据的处理程序的封装体。

在现实世界中，一个事物可以由多个其它事物组成。类似地，在面向对象的程序设计

中，,个对象也可以由多个其它对象组成。

在程序实现（解决实际问题）时，对象可以表现为一个窗口、窗口中的一个按钮、•

个图画框、一个表格等可视的程序组件，还可以表现为变量、文件等不可视的程序元素。

2）属性

对象中描述实体静态特性的数据称为（对象的）属性。例如，对于对象“学生”，学

号、姓名、性别、年龄等等都是其属性。

在程序中，引用某属性的值或者改变某属性的值称为访问该属性。访问对象属性的一

般形式为：对象名.属性名。

例如，假设Student是学生对象，Age是学生对象的年龄属性，则下面的程序段是先

将学生年龄加1,然后显示出年龄：

Student.Age=Student.Age+1

PrintStudent.Age

3）方法

对象中用以模拟实体行为的数据处理程序称为（对象的）方法。例如，对于“圆”这

个对象，移动其位置、改变其大小等等都是方法。

在程序中，使某个方法执行称为调用该方法。调用对象方法的一般形式为：

〈对象名〉.〈方法名〉〈参数表》

或者

〈对象名》.〈方法名〉（〈参数表））

例如，C是窗体上的一个对象，Move是移动其位置的方法，则下面的语句可以将其移

-10-

动到窗体的左上角：

C.Move0,0

4）事件

导致对象的某个“操作”（即方法）被执行的过程称为事件。

在面向对象的程序设计中，某个事件发生时对象所执行的操作称为事件响应。每一个

对象都预先定义了许多事件，一个事件发生了，如何响应，需要程序员根据具体功能编写

相应的响应代码。例如，窗口中有一个按钮对象，希望在用户单击此按钮时显示一个信息

框：“你刚才单击了我！”，则应该为该按钮的Click（单击）事件编写响应代码：

MsgBox''你刚才单击了我！”

2.窗体及窗体的常用属性、事件和方法

窗体的属性决定了窗体的外观特性和某些行为特征。常用的属性列于表2.1：

表2.1窗体的常用属性

属性名意义

Name对象名称

Caption对象的标题

AutoRedraw窗体是否具有自动重绘特性

Fontname,fontsize,font…对象上所显示文字的字体名称、大小、…

Forecolor,Backcolor指定对象的前景和背景颜色

MaxButton,MinButton窗体是否有最大（小）化按钮

BorderStyle指定窗体的边框类型

Picture指定窗体的背景图像

窗体的事件决定了窗体何时可以处理程序员编写的代码。常用的事件列于表2.2：

表2.2窗体的常用事件

事件触发时间

Click单击窗体时

Load装入窗体时

Initialize窗体初始化时

Resize窗体大小改变时

Unload窗体关闭时[注3]

窗体的方法决定了窗体可以提供1可种服务。常用的方法列于表2.3：

表2.3窗体的常用方法

方法功能

Show显示窗体

Hide隐藏窗体

Cis清除窗体上的输出信息

Print输出数字或文本

Line,Circle,…绘图（详见第9章）

3.系统预定义对话框

1）消息对话框（MsgBox）

消息对话框的作用主要是用来向用户发出提示信息或者询问有关问题，它有两种使用

格式，如果不关心用户的回答，则一般使用如下格式：

-11-

MsgBox〈信息内容》[,〈对话框类型＞[,〈对话框标题＞]]

或者

CallMsgBox（〈信息内容＞[,〈对话框类型＞[,〈对话框标题＞]]）

如果需要根据用户的回答进行不同的操作，则使用如下格式：

变量=MsgBox（〈信息内容＞[,〈对话框类型＞[,〈对话框标题＞]]）

其中，对话框类型是一个整数，用来控制在对话框内显示的按钮、图标，其值与按钮

和图标的关系如表2.4所示：

表2.4对话框类型参数

类型常量值作用

vbOKOnly0只显示“确定”按钮

vbOKCanccl1显示“确定”及“取消”按钮

vbAbortRetrylgnore2显示“终止”、“重试”及“忽略”按钮

按钮类型

vbYesNoCancel3显示“是”、“否”及“取消”按钮

vbYesNo4显示“是”及“否"按钮

vbRetryCancel5显示“重试”及“取消”按

vbCritical16显示停止图标

vbQuestion32显示问号（？）图标

图标按钮

vbExclamation48显示感叹号（！）图标

vbInformation64显示信息图标

vbDefoultButtonl0指定默认按钮为第1个按钮

默认按钮vbDefaultButton2256指定默认按钮为第2个按钮

vbDefaultButton3512指定默认按钮为第3个按钮

类型参数的组成原则是从每一类中选择•个值，把这几个值加在一起决定对话框类

型。

MsgBox函数的返回值是一个整数，这个整数与所单击的命令按钮有关，具体关系如

表2.5所示。

表2.5MsgBox对话框函数的按钮与返回值

按钮确定取消终止重试忽略是否

返回值1234567

常量vbOKvbCancelvbAbortvbRetryvblgnorevbYesvbNo

2）输入对话框（InputBox）

InputBox函数的作用是提示用户输入数据，其使用格式一般为:

变量=InputBox（〈信息内容＞[,〈对话框标题＞][,〈默认内容〉]）

注意，用InputBox函数接收的用户输入，是作为•个字符串来处理的，如果用于接收

该输入的变量类型不是字符串（String）类型（有关变量类型的说明参见教材第3章），则

一般需要使用类型转换函数进行类型转换。比如，如果用于接收输入数据的变量x的类型

为整型（Integer）,则应使用语句：

x=Val（InputBox（"请输入年龄"，"提示"，18））

其中，Val（s）是个函数，作用是将自变量s转换为数值返回给调用者。

-12-

【实验内容】

1.任务1

编写满足如下要求的程序：

当窗体的Click,Load,Initialize,Unload事件发生时，给出相应的报告：

“窗体发生了XX事件”

（运行该程序时，请注意Load,Initialize,Unload三个事件发生的先后顺序）

实现步骤：

1）创建一个工程

操作方法：参见实验一。

2）设计界面

本程序只需一个窗体。

3）编写代码

在窗体（Forml）的上述各事件过程中编写如下形式的代码：

MsgBox“窗体发生了XX事件”

代码输入情况如图2.1所示。

4）保存工程

保存于0201文件夹中，工程文件以prj0201.vbp为名。

5）运行程序

2.练习1

仿照上题，自己实现另个报告窗体事件发生的程序，保存于名为“0202”的文件夹

中。要求当窗体的Load,ReSize,QueryUnload事件发生时，给出相应的报告：

“窗体发生了XX事件”

3.任务2

编写一个计算圆面积的程序，圆的半径由键盘输入。

要求程序的执行情况如下：

1）程序运行后显示•个标题为“计算圆面积”

的窗口，并在窗口中显示提示如下信息：

“这是一个可以计算圆面积的程序，如果您想

计算圆的面积，请单击窗体

2）当单击窗口时，显示提示输入圆半径的对

话框（如图2.2所示）。

3）当用户输入了一个半径（比如10）并单

图提示输入圆半径的对话框

击“确定”按钮时，显示如图2.3所示的报告计算2.2

结果的信息框•

-13-

实现步骤：

1）创建一个工程

操作方法：参见实验一。

2）设计界面

本程序只需要一个窗体，但需要设置窗体的如下属性：

AutoRedraw属性设置为True（表示当窗口由不活动变为活动时，自动重新显示其中

用Pr血等方法输出的内容）。

Caption属性设置为“计算圆面积”。

3）编写代码

为实现提示的功能，可以在窗体的Load事件中用Print方法显示提示信息。代码为：

PrivateSubForm_Load（）

Print"这是一个可以计算圆面积的程序，如果您想计算圆的面积，请单击窗体。”

EndSub

为实现提示输入和报告计算结果的功能，可以使用输入对话框（InputBox）来提示用

户输入数据，使用消息对话框（MsgBox）来报告计算结果，这些工作应该在窗体的单击

事件中完成，所以需要编写窗体的Click（单击）事件代码。具体代码为：

PrivateSubForm_Click（）

r=Val（InputBox（"请输入圆的半径","提示"，10））

s=3.14*r*r

MsgBox"半径为"&r&"的圆，其面积为："&s,0+vblnformation,"计算结果"

EndSub

请注意InputBox函数和MsgBox过程的参数设置。

4）保存工程并运行该程序

4.练习2

1）仿照上题，自己编写一个计算圆的周长的程序。

2）创建•个工程，测试窗体的BorderStyle、ControlBox>MaxButton和MinButton

等属性对窗体外观特性的影响。

提示：测试的方法是每改变一下窗体的上述某个属性的值，就运行一下程序，注意观

察窗体的外观特征，并试一试改变窗体大小、使窗体最大化、最小化、移动窗体位置等操

作，从中体会这些属性的意义。

-14-

实验三标签、文本框及命令按钮控件

【实验目的】

・通过实例来进一步理解对象以及对象的属性、事件和方法等有关概念。

・熟悉标签、文本框及命令按钮控件的常用属性和事件。

・学习使用标签、文本框及命令按钮控件来编写简单程序。

【相关知识提要】

1.标签的作用及其常用属性、事件和方法

标签主要用于显示（输出）文本信息。其主要属性和事件列于表3.1：

表3.1标签的常用属性

属性名称意义说明

Caption显示的文本标签的事件

Alignment文本的对齐方式和方法很少

AutoSize是否自动大小使用

BackStyle背景是否透明

BorderStyle有无边框

Wordwrap文本是否自动折行

2.文本框的作用及其常用属性、事件和方法

文本框用来编辑（输入）数据（文本或数字信息）。其主要属性和事件列于表3.2：

表3.2文本框的常用属性、事件和方法

属性/事件名称意义/触发条件

Text显示待编辑的文本

Alignment文本的对齐方式

Locked是否可以编辑

MultiLine是否多行

属性

BorderStyle有无边框

Maxlength最大长度（0=任意）

ScrollBars有无滚动条

PasswordChar密码回显字符

Change内容改变时触发。

事件GotFocus获得焦点时触发。

LostFocus失去焦点时触发。

方法Setfocus设置焦点

3.命令按钮的作用及其常用J属性、事件和方法

命令按钮主要用来发布某种操作的执行命令。其主要属性和事件列于表3.3：

-15-

表3.3命令按钮的常用属性、事件和方法

属性/事件名称意义/触发条件

Caption按钮上显示的文字

Cancel是否为取消按钮（ESC二单击）

属性Default是否为缺省按钮（Enter二单击）

Style外观（标准，图形）

Picture按钮上的图片文件

事件Click单击时触发

【实验内容】

1.任务1

编写一个满足如下要求的程序（程序保存于名为0301的文件夹中，工程文件以Prj0301

为名）：

1）程序运行界面如图3.1；

2）当单击“计算”按钮时、在该按钮右边的标签中显示圆的面积。

实现步骤：

1）创建一个工程

操作方法：略。

2）设计界面

由图3.1可知，本程序需在窗体中一个文本框（用于输入圆的半径）、三个标签（两个

用于显示提示信息，一个用于显示计算结果）和一个命令按钮（用于发布计算命令）。

窗体和有关控件的属性，按表3.4设置。

表3.4窗体和有关对象的属性设置

窗体或控件属性设置值说明

Name(名称)frm0301

窗体

Caption计算圆的面积

Name（名称）txtR

文本框Alignment1（右对齐）清除Text属性内容

Text

Name(名称)cmdjs

命令按钮

Caption计算

Name（名称）Label1>Label2,IblA

仅对IblA设置

标签（三个）Caption半径:，面积：，（空）

BorderStyle属性

BorderStyle1(FixedSingle)

3）编写代码

本程序只需编写命令按钮的Click事件代码:

PrivateSubcmdJs_Click（）

r=Val(txtR.Text)'获得圆的半径

s=3.14159*r*r'计算圆的面积

-16-

IblA.Caption=s'输出圆的面积

EndSub

4）保存工程并运行该程序

本例告诉我们，对于一个简单的数据计算问题，我们可以这样实现：

・用一些标签和文本框控件来提示用户输入原始数据；

・用一些标签来显示计算的结果信息；

•用命令按钮来完成计算任务（计算代码写在其Click事件过程中）。

请思考下列问题：

①这个程序和实验二的计算圆面积的程序相比，你认为哪个更好一些？理山是什

么？

②运行这个程序，单击使窗体标题行上的最大化按钮，或者拖一拖窗口的边框（改

变了窗口的大小），这时有什么感觉？是不是有了“这个窗口不应该有最大化按钮”、“这

个窗口不应该能够改变大小”之类的想法？如果有，那就动动手，让它符合你的想法（如

果实验二的第5题做了，你肯定已经知道该怎么做了）。

③在实现本程序时，我们设置了窗体和一些控件的Name（名称）属性，比如三个标

签控件，前两个都使用默认名称Label1和LabeI2,而第3个却没有使用默认名称Label3,

而改设置为IblA,能知道为什么要这样做吗？

2.练习1

仿照上题，自己编写一个计算圆的周长的程序（程序保存于名为0302的文件夹中，

窗体文件以frm0302为名，工程文件以Pij0302为名）。

3.任务2

编写一个计算圆柱体体积的程序（程序保存于名为0303的文件夹中，窗体文件以

limOBOB为名，工程文件以PijO3O3为名）。

1）程序运行界面如图3.2；

2）当单击“计算”按钮时，在该

按钮右边的标签中显示圆柱体的体

积。

实现步骤：

1）创建一个工程

图3.2任务2的程序运行时界面

操作方法：略。

2）设计界面

由图3.2可知，本程序需在窗体中两个文本框（用于输入圆柱体的底圆半径和高）、四

个标签（三个用于显示提示信息，一个用于显示计算结果）和•个命令按钮（用于发布计

算命令）。

窗体和有关控件的属性，按表3.5设置。

-17-

表3.5窗体和有关对象的属性设置

窗体或控件属性设置值说明

Name（名称）frm0301

控件位置调整好之后将

窗体Caption计算圆的面积

窗口调整到适当大小

BordeStyle3

Name（名称）txtR,txtH

文本框

Alignment1（右对齐）清除Text属性内容

（2个）

Text

Name（名称）cmdjs

命令按钮

Caption计算

Name(名称)Label1,Label2,Label3,IblV

仅对IblV设置

标签（4个）Caption半径:，高:，体积:，（空）

BorderStyle属性

BorderStyle1(FixedSingle)

3）编写代码

本程序只需编写命令按钮的Click事件代码:

PrivateSubcmdJs_Click()

r=X^l(txtR.Text),获得底圆半径

h=Val(txtH.Text)'获得圆柱体的高

s=3.14159*r*r’计算底圆面积

v=s*h'计算体积

IbIV.Caption=v'输出体积

EndSub

4）保存工程并运行该程序

4.练习2

编写一个以上各题功能的程序，要求程

序运行界面如图3.3所示。程序保存于名为

0304的文件夹中，窗体文件以frm0304为名，

工程文件以Prj0304为名。

5.练习3图3.3练习2的程序运行时界面

使用控件常见的错误及其处理方法

使用控件编程时经常会遇到“要求对象”和“未找到方法或数据成员”这样的错误提

示。本练习将介绍如何进行处理。

清按如下要求建立一个新工程（文件保存于

名为0305的文件夹中，工程文件以PijO3O5为名）：

1）程序设计界面如图3.4。窗体及各控件的

属性按表3.6设置；

2）程序代码如下：

图3.4练习3的程序设计界面

-18-

PrivateSubcmdzh_Click()

yc=Val(txtYC.Caption)

Im=2.54*yc

Label3.Caption=Im

EndSub

表3.6练习3的窗体和有关对象的属性设置

窗体或控件属性设置值说明

Name（名称）Form1(默认)

窗体

Caption英制转换为公制

Name（名称）txtYC

文本框Alignment1（右对齐）清除Text属性内容

Text

Name（名称）cmdZH

命令按钮

Caption=

Name(名称)Label1,Label2,IblLM

仅对IblLM设置

标签（3个）Caption英寸:，厘米:，（空）

BorderStyle属性

BordcrStylc1(FixedSingle)

完成设计之后，请运行该程序。

当在文本框中输入了数据之后单击“=”MicrosoftVisualBasic

按钮时程序出错，显示如图3.5所示的“未A弱译错误：

找到方法或数据成员”错误信息框。单击该q未找到方法或数据成员。

信息框中的“确定”按钮时，系统将程序挂

|{…糠筵…il帮助1

起（暂停执行），并自动进入代码编辑窗口，

显示出出错的代码（如图3.6）。图3.5“未找到方法或数据成员”错误提示框

这种错误，•般都是由错写了对象的方

法名或属性名所引起的。比如，本例是将文本框E工程1-frm0305(Code)

|»dZH

txtYC的"Text”属性误写为"Caption"T«

遇到这种错误时，应该分析错误原因，修改中PrivateSubcmdzh_Click()

yc=Vai1txtYCKBTtB?)

代码中的错误，然后可以继续运行程序（按F5Im=2.54*yc

键或单击工具栏上的快捷按钮.），也可以终止Label3.Caption=Im

EndSub

程序的执行（单击工具栏上的快捷按钮■）。

比如,本例,将“Caption”改为“Text”后图3.6错误的属性