第一章 Visual Basic简介
本章要求：
1.了解 VB特点与安装。
2.了解 VB程序的构成要素。
3,熟习 VB的集成开发环境。
4,初步建立事件驱动面向对象程序设计的概
念, 以及掌握几个基本控件的使用。
1.1 Visual Basic 的特点与安装
一,Visual Basic的发展
Visual Basic 是 Microsoft 公司开发的 Windows 应用
程序开发工具,Visual ——“可视化的,, 是一种开发图形
户界面（ GUI）的方法。
1991年推出 VB1.0
1992,1993,1995,1997,1998,2000相继推出：
2.0,3.0,4.0,5.0,6.0,VB.Net(7.0)版本
5.0,6.0包含三种版本（学习版、专业版和企业版）
1.1 Visual Basic 的特点与安装
何为可视
英文 Visual 的意思是, 视觉的,,, 可视的
Baisc”这个名字可能抽象了点, 但实际上它却是最
直观的编程方法, 之所以叫做, 可视,, 你只要看
到 VB的界面就会明白, 实际上你无需编程, 就可以
完成许多步骤 。
在 VB中引入了 控件 的概念, 在 Windows中控件
的身影无处不在, 如按钮, 文本框等, VB把这些控
件模式化, 并且每个控件都有若干 属性 用来控制控
件的外观, 工作 方法, 能够响应用户操作 （ 事件 ） 。
1.1 Visual Basic 的特点与安装
二,Visual Basic的特点
1,具有面向对象的可视化设计工具
2,事件驱动的编程机制
3,结构化的程序设计语言
4,提供了易学易用的应用程序集成开发环境
5.支持多种数据库系统的访问
6,支持 DDE,DLL和 OLE
7,ActiveX技术
8.VB6.0在开发环境上、网络功能等的增强
1.1 Visual Basic 的特点与安装
三、运行环境
1、硬件：
486DX/66 MHz 或更高的处理器（推荐 Pentium 或更高
的处理器 )，一个 CD-ROM 驱动器,VGA 或分辨率更高的监视
器。 >=16 MB RAM,鼠标或其它定点设备。
2、软件：
Windows 95 或更高版本，或 Windows NT 3.51或更高
版本。
四、安 装
在 CD-ROM 驱动器中插入 Visual Basic6.0系统 CD 盘。
安装程序在 CD盘的根目录下，运行安装程序 Setup.exe，即可
进入, 安装程序向导, 。
1.1 Visual Basic 的特点与安装
1.2 Visual Basic程序的构成要素
一、对象与类
1,对象
是基本的运行时的实体，如窗体、各种控件等，它既包
括作用于对象的操作（方法）和对象的响应（事件）。
将数据和处理这些数据的过程封装在一起,
2.类
类是一个抽象的整体概念,对象是类的实例化。
类与对象是面向对象程序设计语言的基础。
以, 汽车, 为例，说明类与对象的关系。
汽车是一个笼统的名称，是整体概念，我们把汽车看成
一个, 类,,一辆辆具体的汽车（比如你的汽车）就是这个
类的实例，也就是这个类的对象。
1.2 Visual Basic程序的构成要素
工具箱的各种控件并不是对象, 而是代表了各个不同的类 。
通过类的实例化, 可以得到真正的对象 。 当在窗体上画一个控
件时, 就将类转换为对象, 即创建了一个控件对象, 也简称为
控件 。
1.2 Visual Basic程序的构成要素
3、对象的建立和命名
（ 1）对象的建立
方法一,单击工具箱控件对象在窗体上按住左键拖拉
到所需要的大小后释放。
方法二,双击工具箱控件对象，则立即在窗体出现一
个默认大小的对象框。
（ 2）编辑对象
先选中对象（单击对象）
放大、缩小
删除对象
复制对象
1.2 Visual Basic程序的构成要素
（ 3）对象的命名
每一个对象都有有自己的名字 。每个窗体、控件对象
在建立时 VB系统给出了一个默认名。用户可通过属性窗口设置
（名称）来给对象命名。
命名的原则：
1） 必须由字母或汉字开头、随后可以是字母、汉字、数字、
下划线（最好不用）串组成。
2） 长度 <=255个字符。
1.2 Visual Basic程序的构成要素
二、属 性（ Property）
对象中的数据，所有对象都有自的属性。 它们是用来描述和
反映对象特征的参数。例如：控件名称（ Name)、标题
（ Caption)、颜色（ Color)、字体（ FontName)等属性决定了对
象展现给用户的界面具有什么样的外观及功能。
对象属性设置的方法：
方法一,在设计模式下，通过属性窗口直接设置对象的
属性。
方法二,在程序的代码中通过赋值实现，其格式为：
对象,属性 =属性值
例如,Command1.Caption=“显示,
1.2 Visual Basic程序的构成要素
三、事件（ Event）及事件过程（ Event Procedure）
事件 ——可被对象识别的动作。
事件过程 ——是指附在该 对象上的程序代码，是事件
触发后处理的程序。事件过程的形式如下：
Sub 对象名 _事件过程名 [（参数列表） ]
…,,(事件过程代码）
End Sub
例如：
Sub Command1_Click()
Command1.Visible=False
End Sub
1.2 Visual Basic程序的构成要素
四、方 法（ Method）
在对象上可操作的过程，是 VB系统提供的一种特殊的
过程和函数 ——方法。方法是面向对象的，所以对象的方法调
用一般要指明对象。
对象方法 调用形式：
[ 对象,]方法 [ 参数列表 ]
如省略对象，表示在当对象，一般指窗体。
例如：
Form1.print " VB程序设计 "
1.3 Visual Basic程序开发环境
菜单栏
工具栏
代码窗口工具箱
窗体窗口
立即窗口
监视窗口
工程窗口
属性窗口
布局窗口
1.3 Visual Basic程序开发环境
1.主窗口
应用程序窗口,由标题栏、菜单栏和工具栏组成
VB的三种工作模式 （标题栏总显示当前模式）
（ 1）设计模式,创建应用程序的大多数工作都是在设
计时完成的。在设计时，可以设计窗体、绘制控件、编写代
码并使用, 属性, 窗口来设置或查看属性设置值。
（ 2）运行模式,代码正在运行的时期，用户可与应用
程序交流。可查看代码，但不能改动它。
（ 3） 中断模式,程序在运行的中途被停止执行时 。 在
中断模式下, 用户可查看各变量及不是属性的当前值, 从而
了解程序执行是否正常 。
1.3 Visual Basic程序开发环境
2.窗体 (Form)设计窗口
窗体设计窗口是屏幕中央的主窗口，它可以作
为自定义窗口用来设计应用程序的界面。用户可以
在窗体中添加控件、图形和图片来创建所希望的外
观。每个窗口必须有一个的窗体名字，建立窗体时
缺省名为 Form1,Form2,.,,。 应注意窗体名即
Name属性和窗体文件名的区别
1.3 Visual Basic程序开发环境
窗体名
窗体文件名
1.3 Visual Basic程序开发环境
3.代码 (code)窗口
在设计模式中，通过双击窗体或窗体上任何对象或通过
,工程资源管理器, 窗口中的, 查看代码, 按钮来打开代码编
辑器窗口。代码编辑器是输入应用程序代码的编辑器。
1.3 Visual Basic程序开发环境
4,属性 (properties)窗口
属性是指对象的特征，如大小、标题或颜色等
数据。在 Visual Basic6.0设计模式中，属性窗口列
出了当前选定窗体或控件的属性的值，用户可以对
这些属性值进行设置。
1.3 Visual Basic程序开发环境
5,工程资源管理器 (project expror)窗口
工程是指用于创建一个应用程序的文件的集合。
工程资源管理器列出了当前工程中的窗体和模块
1.3 Visual Basic程序开发环境
6,工具箱 (ToolBox)窗口
工具箱提供一组工具，用
于设计时在窗体中放置控件生
成应用程序的用户接口。系统
启动后缺省的 General工具箱
就会出现在屏幕左边，上面共
有 21个常用, 部件,
1.3 Visual Basic程序开发环境
7．窗体布局窗口
窗体布局窗口显示在屏
幕右下角。用户可使用表示
屏幕的小图像来布置应用程
序中各窗体的位置。这个窗
口在多窗体应用程序中很有
用，因为这可以指定每个窗
体相对于主窗体的位置。
1.4使用 Visual Basic建立一个简单程序
一、工程的组成
工程文件 (.Vbp)包含了一个应用程序的所有文件
窗体文件（,frm）,控件及属性、事件过程和自定义过程
窗体的二进制数据文件（,frx）,自动产生同名,.frx文件。
标准模块文件（,bas）
类模块的文件（,cls）
资源文件（,res）
ActiveX控件的文件（,ocx）
一个 VB应用程序中各主要文件的结构关系如下图：
1.4使用 Visual Basic建立一个简单程序
1.4使用 Visual Basic建立一个简单程序
二、创建应用程序的步骤：
分析问题，确定程序要完成什么任务，按下面的步骤创建
应用程序。
（ 1）新建工程。
创建一个应用程序首先要打开一个新的工程。
（ 2） 创建应用程序界面 。
（ 3） 设置属性值 。
（ 4） 对象事件过程的编程 。
（ 5） 保存文件 。
（ 6）程序运行与调试。再次保存修改后的程序
1.4使用 Visual Basic建立一个简单程序
三、一个简单的 VB程序的创建 （实例）
例 1.1 设计一简单应用程序, 在窗体上放置 1个文本框, 3个命令按
钮, 其中单击左边按纽时, 文本框中显示, 欢迎使用 VB6.0”,若单击中
间按纽时, 清除文本框的内容, 若单击右边按纽, 则程序结束 。 用户界
面如图所示 。
1.4使用 Visual Basic建立一个简单程序
在窗体上建立 4个控件,1个文本框 Text1； 3个命令按钮,Command1,
Command2,Command3。单击工具箱中的命令按钮，置入窗体适当位置。
因有 3个命令按钮，因此必须重复 3次。再单击工具箱中的文本框，置
入窗体中，如图所示。
Fo rm 1 窗体
T e x t1 文本框
3 个命令框
1.4使用 Visual Basic建立一个简单程序
② 设置属性。对每个对象而言，有很多属性可用，下面只对每个控件的
Caption进行设置。
对象名 属性 属性值
Form1 Caption,lxl”
Command1 Caption,单击,
Command2 Caption,清屏,
Command3 Caption,结束,
Text1 text 设为空白
③ 编辑代码
编辑代码就是编辑事件过程。
根据题目要求, 单击 Command1,则在文本框中显示, 欢迎
使用 Visual Basic 6.0”,因此, Command1的事件过程应是：
Sub Command1_click()
Text1.text=?欢迎使用 VB 6.0?
End Sub
此过程的功能：当单击, 单击, 控件时, 将, 欢迎使用 VB 6.0”在
文本框上显示 。
Command2的事件过程应是：
1.4使用 Visual Basic建立一个简单程序
Sub Command2_Click()
Text1.Text=? ?
End Sub
过程的功能：单击, 清屏, 控件时，将空格送到文本框，
即清屏。
Command3的事件过程应是：
Command3_Click()
End
End Sub
过程的功能：结束程序。
1.4使用 Visual Basic建立一个简单程序
1.5 Visual Basic基本控件
窗体属性决定了窗体的外观与操作。窗体外观 如下图
一 窗体 Form
1.5 Visual Basic基本控件
一, 属性
（ 一）基本属性
1,Name名称属性（任何对象都具有的）
创建的对象名称,有默认的名,在程序中，控件名是作为对象的标识而
引用，不会显示在窗体上。
2,Height,width,top和 left属性
单位为 twip：
1 twip=1/20点
=1/1440英寸
=1/567cm
1.5 Visual Basic基本控件
3,Caption 标题属性：
决定出现在窗体的标题栏上的文本内容。
4,字体 Font属性组
FontName属性是字符型, 决定对象上正文的字体 （ 缺省为宋体 ） 。
FontSize属性是整型, 决定对象上正文的字体大小 。
FontBold属性是逻辑型, 决定对象上正文是否是粗体 。
FontItalic属性是逻辑型, 决定对象上正文是否是斜体 。
FontStrikeThru属性是逻辑型, 决定对象上正文是否加一删除线 。
FontUnderLine属性是逻辑型, 决定对象上正文是否带下划线 。
1.5 Visual Basic基本控件
5,Enabled属性（逻辑值）
决定控件是否可操作。
True,允许用户进行操作，并对操作出响应 （缺省值 )。
False：呈暗淡色，禁止用户进行操作。
6,Visible属性（逻辑值）
决定控件是否可见
True,运行时控件可见 （缺省值） 。
False：运行时控件隐藏，用户看不到，但控件本身是
存在 的。
1.5 Visual Basic基本控件
7,BackColor属性和 ForeColor属性
BackColor属性用于返回或设置对象的背景颜色，
ForeColor属性用于返回或设置在对象里显示图片和文
本的前景颜色 。
例如,将窗体 Form1的背景色设置为红色, 则可使用下面
三种情况：
Form1.BackColor = RGB(255,0,0)
Form1.BackColor = &HFF&
Form1.BackColor = vbRed
1.5 Visual Basic基本控件
（二）窗体的其它常用属性
1,MaxButton最大化按钮和 MinButton最小化按钮,当
值为 Ture，有最大或最小化按钮,False则无。
2,Picture图片属性,设置窗体中要显示的图片。加载图
片操作同 Icon 控制图标属性。
1.5 Visual Basic基本控件
3,BorderStyle,边框风格,通过改变 BorderStyle 属
性，可以控制窗体如何调整大小。
0-None：无边框；
1-Fixed Single：单线边框，不可以改变窗口大小；
2-Sizable：双线边框，可以改变窗口大小；
3-Fixed Double：双线框架，不可以改变窗口大小。
4-Fixed Tool Window:窗体外观与工具条相似。有关闭按
钮,不可以改变窗口大小。
5-Sizable Tool Window：窗体外观与工具条相似。有关闭
按钮,可以改变窗口大小。
1.5 Visual Basic基本控件
4,WindowsState属性
0-Normal：正常窗口状态，有窗口边界；
1：最小化状态，以图标方式运行；
2：最大化状态，无边框，充满整个屏幕。
5,AutoRedraw属性
该属性决定窗体被隐藏或被另一窗口覆盖之后重新显示，
是否重新还原该窗体被隐藏或覆盖以前的画面。即是否重画
如 Circle,Line,Pset和 Print等方法的输出。
当为 True时，重新还原该窗体以前的画面。
当为 False时，则不重画 AutoRedraw属性。
1.5 Visual Basic基本控件
二、事件
最常用的事件
1 Click/DblClick,单击 /双击窗体触发。
2 Load：
窗体被装入时触发的事件。该事件通常用来在启动应用
程序时对属性和变量进行初始化。
3,Unload事件
卸载窗体时触发该事件 。
4,Resize事件
无论是因为用户交互, 还是通过代码调整窗体的大小,
都会触发一个 Resize事件 。
1.5 Visual Basic基本控件
三、常 用方法
窗体常用的方法有：
打印输出 Print
移动 Move
清除 Cls
显示 Show
隐藏 Hide等方法 。
方法的使用的形式,
[对象,]方法 [参数 ]
1.5 Visual Basic基本控件
例 1.2 利用属性窗口和程序代码设置 Form的属性，要求将窗体
标题又, Form1”修改为, 牛刀小试,,窗体是黑体白字, HOW
ARE YOU”
具体步骤如下,
① 进入 VB6设计环境, 在属性窗口中找到 Caption（ 标题 ） 。 在 Caption
属性值上单击鼠标左键, 将原缺省值 form1删除, 再键入新的内容 。
② 移动鼠标在 BackColor属性值栏上单击鼠标左键, 然后再单击下拉
箭头, 调出调色板, 选中黑色 。
③ 移动鼠标在 ForeColor属性值栏上单击鼠标左键，然后再单击
下拉箭头，
调出调色板，选中白色。
在牛刀小试窗体上双击鼠标左键，调出代码窗口，单击过程
栏的下拉箭头，选择, click事件，在代码区输入 Print "HOW
ARE YOU?"。最后点击工具条中的, ?” 图标则可进入运行阶段。
1.5 Visual Basic基本控件
例 1.3 编写一个随手画程序,程序界面如图所示：
程序代码如下,
Private Sub Form1_MouseMove (Button as Integer,Shift as Integer,x
as Integer,y as Integer)
Line-(x,y)
End Sub
1.5 Visual Basic基本控件
二,命令按钮 CommandButton
接受用户输入的命令,输入命令可以有三种方式,
（ 1）鼠标单击；
（ 2）按 Tab键焦点跳转到该按钮,再按回车键；
（ 3） 快捷键（ Alt+有下划线的字母）
（一）属性
1．基本属性：
Name,Height,Width,Top,Left,Enabled,Visible、
Font等与窗体的使用相同。
2．常用属性
（ 1） Caption,标题属性 ——命令按钮显示的内容，可在
某字母前加, &“设置快捷键。例如,&Ok,显示 Ok
1.5 Visual Basic基本控件
（ 2） Default,确认属性（逻辑值），设置为 True时，按
Enter键相当于用鼠标器单击了该按钮。
注意：在一个窗体只能的一个按钮的 Default设置为
Ture
（ 3） Cancel:取消功能属性（逻辑值），当设置为 Ture时，
程序运行时按 Esc键与单击此命令按钮的效果相同。
注意：在一个窗体只能的一个按钮的 Cancel属性设
置为 Ture
（ 4） Value,检查该按钮是否按下, 该属性在设计时无效,
（ 5） Picture, 按钮可显示图片文件 (.bmp和,Ico)，
只有当 Style属性值设 为 1时有效
（ 6） Style, 确定显示的形式, 0 只能显示文字,
1 文字、图形均可 。
（ 7） ToolTipText, 设置工具提示，和 Picture结
合使用。
1.5 Visual Basic基本控件
1.5 Visual Basic基本控件
（二）、方法
1,Move
移动
2.Setfocus
获得焦点
（三）、事 件
最常用的是 Click()事件，一般也只对该
事件进行编程。
1.5 Visual Basic基本控件
例 1.4利用属性窗口和程序代码设置 Commandbutton控件的属性，
程序界面如图所示。
具体步骤如下,
① 在工具箱中的上单击鼠标左键, 移动到窗体的适当位置, 按住鼠标左键拖
曵, 分别调出 Command1和 Command2。 Command2在 Caption属性值上单击鼠标
左键, 将原缺省值删除, 再键入, 运行代码, 。 选中 Command1的 Style 设为
1——图形外观, 选中 Picture属性, 调出加载图片的对话框 。
② 出现加载图片的对话框后, 从查找范围内选择存放图片的文件夹, 选
择合适的图片, 最后选择, 打开, 按钮 。
③ 移动鼠标在 Command2控件上双击鼠标左键, 在 Command2 _Click()
事件代码窗口中输入设定 Command1控件属性的代码 。
Private Sub Command2_Click()
Command1.Caption = "图形按钮 " ?设置 Command1控件上显示的文字
Command1.Font = "隶书 " ?设置文字的类型
Command1.BackColor = RGB(50,150,0) ?设置 Command1控件上的颜色
Command1.Width = 800 ?设置 Command1控件的宽度
Command1.Height = 800 ?设置 Command1控件的高度
End Sub
最后点击工具条中的, ?” 图标，然后选择, 运行代码, 按钮，就会执行以上
代码。
1.5 Visual Basic基本控件
三,标签 Label
用于显示文本 (输出 )信息，不能作为输入信息的界面。
1,基本属性
Name, Height, Width, Top, Left, Enabled,
Visible,Font,ForeColor,BackColor等与窗体的使用
相同 。
2,常用属性
（ 1） Caption属性
Caption属性用来改变 Label控件中显示的文本 。
Caption属性允许文本的长度最多为 1024字节 。 缺省情况下,
当文本超过控件宽度时, 文本会自动换行, 而当文本超过
控件高度时, 超出部分将被裁剪掉 。
1.5 Visual Basic基本控件
（ 2） Alignment属性
设置 Caption属性中文本的对齐方式, 共有三种可选值：
0 左对齐 (Left Justify)；
1 右对齐 (Right Justify)；
2 居中对齐 (Center Justify)。
（ 3） BackStyle属性
该属性用于确定标签的背景是否透明 。 有两种情况可
选：值为 0时, 表示背景透明, 标签后的背景和图形可见；
值为 1时, 表示不透明, 标签后的背景和图形不可见 。
1.5 Visual Basic基本控件
（ 4） AutoSize属性
AutoSize属性确定标签是否会随标题内容的多少自
动变化 。 如果值为 True,则随 Caption内容的大小自动调整控
件本身的大小, 且不换行；如果值为 False,表示标签的尺寸
不能自动调整, 超出尺寸范围的内容不予显示 。
例 1.5 利用 Label1控件制作一个, 仲夏夜演奏会, 的宣传画，
程 序界面如图所示。
具体步骤如下：
① 在工具箱中的上单击鼠标左键, 移动到窗体的适当位置, 按住鼠标左键
拖曵, 调出 Label1。 在属性窗口修改窗体 Form1的 Picture属性, 加载合适
的图片 。 修改 Label1的 Caption属性值, 键入, 仲夏之夜演奏会, 。 然后选
中 Label1的 Font属性, 调出, 字体, 对话框选择字体为, 华文中宋,, 字型为
,粗体,, 大小为, 小四,, 加下划线 。 再设 Label1的 BackColor为黄
色, ForeColor为红色 。
② 在窗体 Form1上双击鼠标左键, 调出代码窗口在 Form1_Click()事件代码
窗口中输入修改 Label1控件属性的代码 。 如下图所示：
③ 最后点击工具条中的, ?” 图标, 然后在窗体的任一位置单击鼠标左键 。
1.5 Visual Basic基本控件
四,文本框 TextBox
是一个文本编辑区域，在该区域输入，编辑和显示文本。
（一） 属性
1,基本属性
Name,Height,Width,Top,Left,Enabled,Visible、
Font,ForeColor,BackColor等与标签控件相同 。
2,常用属性
（ 1）,Text文本属性
在文本框中显示的正文内容存放在 Text属性中。当程序运
行时，用户通过键盘输入正文内容，保存在 Text属性中。
文本框没有 Caption属性
1.5 Visual Basic基本控件
（ 2） Maxlength,设置正文的最多字符个数,0任意长度值 。
（ 3） MultiLine,是否为多行,默认一行, False
（ 4） ScrollBars,当 MultiLine为 True时,该属性才有效,滚动
条的形式。
0-None：无滚动条、
1-Horizontal,水平滚动条、
2-Vertical,垂直滚动条
3-Both,水平和垂直滚动条。
（ 5） Locked,是否可被编辑属性
False，表示为可编辑。
（ 6） PassWordChar属性
设置 PasswordChar属性为了掩盖文本框中输
入的字符。
该属性的设置只有在 MultiLine设为 False才
有效
1.5 Visual Basic基本控件
（ 7） SelStart,SelLength和 SelText属性
这三个属性是文本框中对文本的编辑属性 。
SelStart：确定在文本框选中文本的起始位置 。 第一字
符 的位置为 0。 若没有选择文本, 则用于返回或设置文本的插
入点位置, 如果 SelStart的值大于文本的长度, 则 SelStart
取当前文本的长度：
SelLength：设置或返回文本框中选定的文本字符串长度
（字符个数）。
SelText：设置或返回当前选定文本中的文本字符串 。
1.5 Visual Basic基本控件
Change事件：
当改变文本框的 Text属性时会引发该事件。当用输入
一个字符，就会触发一次 Change事件。
例：在文本框 Text1的 Change事件编写有如下程序代码：
Private Sub Text1_Change()
Print Text1.tex
End Sub
当程序运行后中输入 ABCD，则在窗体上在输出结果是？
1.5 Visual Basic基本控件
KeyPress事件
当用户按下并释放键盘上一个 ANSI键时，就会触发一
次该事件，并返回一个 KeyAscii参数（字符的 Ascii值）到
该事件过程中。
例如：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Print KeyAscii,Chr(KeyAscii)
End Sub
当程序运行后中输入 ABCD，则在窗体上在输出结果是？
LostFocus, 当控件失去焦点时发生。
GotFocus, 当控件获得焦点时发生。
1.5 Visual Basic基本控件
（三） 常用方法
文本框最有用的方法是,SetFocus，使用形式：
[对象,]SetFocus
功能,是把光标移到指定的文本框对象中。
例 1.6 利用 Textbox控件制作一个密码框
1.5 Visual Basic基本控件
在 Command1 _Click()事件代码窗口中输入代码如下 。
Private Sub Command1_Click()
If Text1.Text = "1111" Then
Form1.Caption = "欢迎进入本系统 "
Form1.BackColor = vbYellow
Label1.Visible = True
Command1.Visible = False
Command2.Visible = False
Text1.Visible = False
Else
Form1.Caption = "密码错, 请重新输入 "
End If
End Sub
5.多重窗体
多重窗体实际上是单一窗体的集合 。 换言之, 多重窗体由多个独立的,
单一的窗体构成, 其中每个单一窗体都有自己的界面和程序代码, 完成不
同的操作 。 利用多重窗体可以设计较复杂的多功能对话窗口 。
【 例 1.8】 设计一个电脑公司的报价单 。 从此报价单上可以查到某品牌微
机的 配置及价格 。
“封面窗体, 有 4个命令按钮, 其事件过程如下：
Private Sub Command1_Click() Private Sub Command3_Click()
SunForm.Show MoonForm.Show
FormCover,Hide Formcover.Hide
End Sub End Sub
Private Sub Command2_Click()
Private Sub Command4_Click( )
BrightForm.Show
End
FormCover.Hide
End Sub
End
本章要求：
1.了解 VB特点与安装。
2.了解 VB程序的构成要素。
3,熟习 VB的集成开发环境。
4,初步建立事件驱动面向对象程序设计的概
念, 以及掌握几个基本控件的使用。
1.1 Visual Basic 的特点与安装
一,Visual Basic的发展
Visual Basic 是 Microsoft 公司开发的 Windows 应用
程序开发工具,Visual ——“可视化的,, 是一种开发图形
户界面（ GUI）的方法。
1991年推出 VB1.0
1992,1993,1995,1997,1998,2000相继推出：
2.0,3.0,4.0,5.0,6.0,VB.Net(7.0)版本
5.0,6.0包含三种版本（学习版、专业版和企业版）
1.1 Visual Basic 的特点与安装
何为可视
英文 Visual 的意思是, 视觉的,,, 可视的
Baisc”这个名字可能抽象了点, 但实际上它却是最
直观的编程方法, 之所以叫做, 可视,, 你只要看
到 VB的界面就会明白, 实际上你无需编程, 就可以
完成许多步骤 。
在 VB中引入了 控件 的概念, 在 Windows中控件
的身影无处不在, 如按钮, 文本框等, VB把这些控
件模式化, 并且每个控件都有若干 属性 用来控制控
件的外观, 工作 方法, 能够响应用户操作 （ 事件 ） 。
1.1 Visual Basic 的特点与安装
二,Visual Basic的特点
1,具有面向对象的可视化设计工具
2,事件驱动的编程机制
3,结构化的程序设计语言
4,提供了易学易用的应用程序集成开发环境
5.支持多种数据库系统的访问
6,支持 DDE,DLL和 OLE
7,ActiveX技术
8.VB6.0在开发环境上、网络功能等的增强
1.1 Visual Basic 的特点与安装
三、运行环境
1、硬件：
486DX/66 MHz 或更高的处理器（推荐 Pentium 或更高
的处理器 )，一个 CD-ROM 驱动器,VGA 或分辨率更高的监视
器。 >=16 MB RAM,鼠标或其它定点设备。
2、软件：
Windows 95 或更高版本，或 Windows NT 3.51或更高
版本。
四、安 装
在 CD-ROM 驱动器中插入 Visual Basic6.0系统 CD 盘。
安装程序在 CD盘的根目录下，运行安装程序 Setup.exe，即可
进入, 安装程序向导, 。
1.1 Visual Basic 的特点与安装
1.2 Visual Basic程序的构成要素
一、对象与类
1,对象
是基本的运行时的实体，如窗体、各种控件等，它既包
括作用于对象的操作（方法）和对象的响应（事件）。
将数据和处理这些数据的过程封装在一起,
2.类
类是一个抽象的整体概念,对象是类的实例化。
类与对象是面向对象程序设计语言的基础。
以, 汽车, 为例，说明类与对象的关系。
汽车是一个笼统的名称，是整体概念，我们把汽车看成
一个, 类,,一辆辆具体的汽车（比如你的汽车）就是这个
类的实例，也就是这个类的对象。
1.2 Visual Basic程序的构成要素
工具箱的各种控件并不是对象, 而是代表了各个不同的类 。
通过类的实例化, 可以得到真正的对象 。 当在窗体上画一个控
件时, 就将类转换为对象, 即创建了一个控件对象, 也简称为
控件 。
1.2 Visual Basic程序的构成要素
3、对象的建立和命名
（ 1）对象的建立
方法一,单击工具箱控件对象在窗体上按住左键拖拉
到所需要的大小后释放。
方法二,双击工具箱控件对象，则立即在窗体出现一
个默认大小的对象框。
（ 2）编辑对象
先选中对象（单击对象）
放大、缩小
删除对象
复制对象
1.2 Visual Basic程序的构成要素
（ 3）对象的命名
每一个对象都有有自己的名字 。每个窗体、控件对象
在建立时 VB系统给出了一个默认名。用户可通过属性窗口设置
（名称）来给对象命名。
命名的原则：
1） 必须由字母或汉字开头、随后可以是字母、汉字、数字、
下划线（最好不用）串组成。
2） 长度 <=255个字符。
1.2 Visual Basic程序的构成要素
二、属 性（ Property）
对象中的数据，所有对象都有自的属性。 它们是用来描述和
反映对象特征的参数。例如：控件名称（ Name)、标题
（ Caption)、颜色（ Color)、字体（ FontName)等属性决定了对
象展现给用户的界面具有什么样的外观及功能。
对象属性设置的方法：
方法一,在设计模式下，通过属性窗口直接设置对象的
属性。
方法二,在程序的代码中通过赋值实现，其格式为：
对象,属性 =属性值
例如,Command1.Caption=“显示,
1.2 Visual Basic程序的构成要素
三、事件（ Event）及事件过程（ Event Procedure）
事件 ——可被对象识别的动作。
事件过程 ——是指附在该 对象上的程序代码，是事件
触发后处理的程序。事件过程的形式如下：
Sub 对象名 _事件过程名 [（参数列表） ]
…,,(事件过程代码）
End Sub
例如：
Sub Command1_Click()
Command1.Visible=False
End Sub
1.2 Visual Basic程序的构成要素
四、方 法（ Method）
在对象上可操作的过程，是 VB系统提供的一种特殊的
过程和函数 ——方法。方法是面向对象的，所以对象的方法调
用一般要指明对象。
对象方法 调用形式：
[ 对象,]方法 [ 参数列表 ]
如省略对象，表示在当对象，一般指窗体。
例如：
Form1.print " VB程序设计 "
1.3 Visual Basic程序开发环境
菜单栏
工具栏
代码窗口工具箱
窗体窗口
立即窗口
监视窗口
工程窗口
属性窗口
布局窗口
1.3 Visual Basic程序开发环境
1.主窗口
应用程序窗口,由标题栏、菜单栏和工具栏组成
VB的三种工作模式 （标题栏总显示当前模式）
（ 1）设计模式,创建应用程序的大多数工作都是在设
计时完成的。在设计时，可以设计窗体、绘制控件、编写代
码并使用, 属性, 窗口来设置或查看属性设置值。
（ 2）运行模式,代码正在运行的时期，用户可与应用
程序交流。可查看代码，但不能改动它。
（ 3） 中断模式,程序在运行的中途被停止执行时 。 在
中断模式下, 用户可查看各变量及不是属性的当前值, 从而
了解程序执行是否正常 。
1.3 Visual Basic程序开发环境
2.窗体 (Form)设计窗口
窗体设计窗口是屏幕中央的主窗口，它可以作
为自定义窗口用来设计应用程序的界面。用户可以
在窗体中添加控件、图形和图片来创建所希望的外
观。每个窗口必须有一个的窗体名字，建立窗体时
缺省名为 Form1,Form2,.,,。 应注意窗体名即
Name属性和窗体文件名的区别
1.3 Visual Basic程序开发环境
窗体名
窗体文件名
1.3 Visual Basic程序开发环境
3.代码 (code)窗口
在设计模式中，通过双击窗体或窗体上任何对象或通过
,工程资源管理器, 窗口中的, 查看代码, 按钮来打开代码编
辑器窗口。代码编辑器是输入应用程序代码的编辑器。
1.3 Visual Basic程序开发环境
4,属性 (properties)窗口
属性是指对象的特征，如大小、标题或颜色等
数据。在 Visual Basic6.0设计模式中，属性窗口列
出了当前选定窗体或控件的属性的值，用户可以对
这些属性值进行设置。
1.3 Visual Basic程序开发环境
5,工程资源管理器 (project expror)窗口
工程是指用于创建一个应用程序的文件的集合。
工程资源管理器列出了当前工程中的窗体和模块
1.3 Visual Basic程序开发环境
6,工具箱 (ToolBox)窗口
工具箱提供一组工具，用
于设计时在窗体中放置控件生
成应用程序的用户接口。系统
启动后缺省的 General工具箱
就会出现在屏幕左边，上面共
有 21个常用, 部件,
1.3 Visual Basic程序开发环境
7．窗体布局窗口
窗体布局窗口显示在屏
幕右下角。用户可使用表示
屏幕的小图像来布置应用程
序中各窗体的位置。这个窗
口在多窗体应用程序中很有
用，因为这可以指定每个窗
体相对于主窗体的位置。
1.4使用 Visual Basic建立一个简单程序
一、工程的组成
工程文件 (.Vbp)包含了一个应用程序的所有文件
窗体文件（,frm）,控件及属性、事件过程和自定义过程
窗体的二进制数据文件（,frx）,自动产生同名,.frx文件。
标准模块文件（,bas）
类模块的文件（,cls）
资源文件（,res）
ActiveX控件的文件（,ocx）
一个 VB应用程序中各主要文件的结构关系如下图：
1.4使用 Visual Basic建立一个简单程序
1.4使用 Visual Basic建立一个简单程序
二、创建应用程序的步骤：
分析问题，确定程序要完成什么任务，按下面的步骤创建
应用程序。
（ 1）新建工程。
创建一个应用程序首先要打开一个新的工程。
（ 2） 创建应用程序界面 。
（ 3） 设置属性值 。
（ 4） 对象事件过程的编程 。
（ 5） 保存文件 。
（ 6）程序运行与调试。再次保存修改后的程序
1.4使用 Visual Basic建立一个简单程序
三、一个简单的 VB程序的创建 （实例）
例 1.1 设计一简单应用程序, 在窗体上放置 1个文本框, 3个命令按
钮, 其中单击左边按纽时, 文本框中显示, 欢迎使用 VB6.0”,若单击中
间按纽时, 清除文本框的内容, 若单击右边按纽, 则程序结束 。 用户界
面如图所示 。
1.4使用 Visual Basic建立一个简单程序
在窗体上建立 4个控件,1个文本框 Text1； 3个命令按钮,Command1,
Command2,Command3。单击工具箱中的命令按钮，置入窗体适当位置。
因有 3个命令按钮，因此必须重复 3次。再单击工具箱中的文本框，置
入窗体中，如图所示。
Fo rm 1 窗体
T e x t1 文本框
3 个命令框
1.4使用 Visual Basic建立一个简单程序
② 设置属性。对每个对象而言，有很多属性可用，下面只对每个控件的
Caption进行设置。
对象名 属性 属性值
Form1 Caption,lxl”
Command1 Caption,单击,
Command2 Caption,清屏,
Command3 Caption,结束,
Text1 text 设为空白
③ 编辑代码
编辑代码就是编辑事件过程。
根据题目要求, 单击 Command1,则在文本框中显示, 欢迎
使用 Visual Basic 6.0”,因此, Command1的事件过程应是：
Sub Command1_click()
Text1.text=?欢迎使用 VB 6.0?
End Sub
此过程的功能：当单击, 单击, 控件时, 将, 欢迎使用 VB 6.0”在
文本框上显示 。
Command2的事件过程应是：
1.4使用 Visual Basic建立一个简单程序
Sub Command2_Click()
Text1.Text=? ?
End Sub
过程的功能：单击, 清屏, 控件时，将空格送到文本框，
即清屏。
Command3的事件过程应是：
Command3_Click()
End
End Sub
过程的功能：结束程序。
1.4使用 Visual Basic建立一个简单程序
1.5 Visual Basic基本控件
窗体属性决定了窗体的外观与操作。窗体外观 如下图
一 窗体 Form
1.5 Visual Basic基本控件
一, 属性
（ 一）基本属性
1,Name名称属性（任何对象都具有的）
创建的对象名称,有默认的名,在程序中，控件名是作为对象的标识而
引用，不会显示在窗体上。
2,Height,width,top和 left属性
单位为 twip：
1 twip=1/20点
=1/1440英寸
=1/567cm
1.5 Visual Basic基本控件
3,Caption 标题属性：
决定出现在窗体的标题栏上的文本内容。
4,字体 Font属性组
FontName属性是字符型, 决定对象上正文的字体 （ 缺省为宋体 ） 。
FontSize属性是整型, 决定对象上正文的字体大小 。
FontBold属性是逻辑型, 决定对象上正文是否是粗体 。
FontItalic属性是逻辑型, 决定对象上正文是否是斜体 。
FontStrikeThru属性是逻辑型, 决定对象上正文是否加一删除线 。
FontUnderLine属性是逻辑型, 决定对象上正文是否带下划线 。
1.5 Visual Basic基本控件
5,Enabled属性（逻辑值）
决定控件是否可操作。
True,允许用户进行操作，并对操作出响应 （缺省值 )。
False：呈暗淡色，禁止用户进行操作。
6,Visible属性（逻辑值）
决定控件是否可见
True,运行时控件可见 （缺省值） 。
False：运行时控件隐藏，用户看不到，但控件本身是
存在 的。
1.5 Visual Basic基本控件
7,BackColor属性和 ForeColor属性
BackColor属性用于返回或设置对象的背景颜色，
ForeColor属性用于返回或设置在对象里显示图片和文
本的前景颜色 。
例如,将窗体 Form1的背景色设置为红色, 则可使用下面
三种情况：
Form1.BackColor = RGB(255,0,0)
Form1.BackColor = &HFF&
Form1.BackColor = vbRed
1.5 Visual Basic基本控件
（二）窗体的其它常用属性
1,MaxButton最大化按钮和 MinButton最小化按钮,当
值为 Ture，有最大或最小化按钮,False则无。
2,Picture图片属性,设置窗体中要显示的图片。加载图
片操作同 Icon 控制图标属性。
1.5 Visual Basic基本控件
3,BorderStyle,边框风格,通过改变 BorderStyle 属
性，可以控制窗体如何调整大小。
0-None：无边框；
1-Fixed Single：单线边框，不可以改变窗口大小；
2-Sizable：双线边框，可以改变窗口大小；
3-Fixed Double：双线框架，不可以改变窗口大小。
4-Fixed Tool Window:窗体外观与工具条相似。有关闭按
钮,不可以改变窗口大小。
5-Sizable Tool Window：窗体外观与工具条相似。有关闭
按钮,可以改变窗口大小。
1.5 Visual Basic基本控件
4,WindowsState属性
0-Normal：正常窗口状态，有窗口边界；
1：最小化状态，以图标方式运行；
2：最大化状态，无边框，充满整个屏幕。
5,AutoRedraw属性
该属性决定窗体被隐藏或被另一窗口覆盖之后重新显示，
是否重新还原该窗体被隐藏或覆盖以前的画面。即是否重画
如 Circle,Line,Pset和 Print等方法的输出。
当为 True时，重新还原该窗体以前的画面。
当为 False时，则不重画 AutoRedraw属性。
1.5 Visual Basic基本控件
二、事件
最常用的事件
1 Click/DblClick,单击 /双击窗体触发。
2 Load：
窗体被装入时触发的事件。该事件通常用来在启动应用
程序时对属性和变量进行初始化。
3,Unload事件
卸载窗体时触发该事件 。
4,Resize事件
无论是因为用户交互, 还是通过代码调整窗体的大小,
都会触发一个 Resize事件 。
1.5 Visual Basic基本控件
三、常 用方法
窗体常用的方法有：
打印输出 Print
移动 Move
清除 Cls
显示 Show
隐藏 Hide等方法 。
方法的使用的形式,
[对象,]方法 [参数 ]
1.5 Visual Basic基本控件
例 1.2 利用属性窗口和程序代码设置 Form的属性，要求将窗体
标题又, Form1”修改为, 牛刀小试,,窗体是黑体白字, HOW
ARE YOU”
具体步骤如下,
① 进入 VB6设计环境, 在属性窗口中找到 Caption（ 标题 ） 。 在 Caption
属性值上单击鼠标左键, 将原缺省值 form1删除, 再键入新的内容 。
② 移动鼠标在 BackColor属性值栏上单击鼠标左键, 然后再单击下拉
箭头, 调出调色板, 选中黑色 。
③ 移动鼠标在 ForeColor属性值栏上单击鼠标左键，然后再单击
下拉箭头，
调出调色板，选中白色。
在牛刀小试窗体上双击鼠标左键，调出代码窗口，单击过程
栏的下拉箭头，选择, click事件，在代码区输入 Print "HOW
ARE YOU?"。最后点击工具条中的, ?” 图标则可进入运行阶段。
1.5 Visual Basic基本控件
例 1.3 编写一个随手画程序,程序界面如图所示：
程序代码如下,
Private Sub Form1_MouseMove (Button as Integer,Shift as Integer,x
as Integer,y as Integer)
Line-(x,y)
End Sub
1.5 Visual Basic基本控件
二,命令按钮 CommandButton
接受用户输入的命令,输入命令可以有三种方式,
（ 1）鼠标单击；
（ 2）按 Tab键焦点跳转到该按钮,再按回车键；
（ 3） 快捷键（ Alt+有下划线的字母）
（一）属性
1．基本属性：
Name,Height,Width,Top,Left,Enabled,Visible、
Font等与窗体的使用相同。
2．常用属性
（ 1） Caption,标题属性 ——命令按钮显示的内容，可在
某字母前加, &“设置快捷键。例如,&Ok,显示 Ok
1.5 Visual Basic基本控件
（ 2） Default,确认属性（逻辑值），设置为 True时，按
Enter键相当于用鼠标器单击了该按钮。
注意：在一个窗体只能的一个按钮的 Default设置为
Ture
（ 3） Cancel:取消功能属性（逻辑值），当设置为 Ture时，
程序运行时按 Esc键与单击此命令按钮的效果相同。
注意：在一个窗体只能的一个按钮的 Cancel属性设
置为 Ture
（ 4） Value,检查该按钮是否按下, 该属性在设计时无效,
（ 5） Picture, 按钮可显示图片文件 (.bmp和,Ico)，
只有当 Style属性值设 为 1时有效
（ 6） Style, 确定显示的形式, 0 只能显示文字,
1 文字、图形均可 。
（ 7） ToolTipText, 设置工具提示，和 Picture结
合使用。
1.5 Visual Basic基本控件
1.5 Visual Basic基本控件
（二）、方法
1,Move
移动
2.Setfocus
获得焦点
（三）、事 件
最常用的是 Click()事件，一般也只对该
事件进行编程。
1.5 Visual Basic基本控件
例 1.4利用属性窗口和程序代码设置 Commandbutton控件的属性，
程序界面如图所示。
具体步骤如下,
① 在工具箱中的上单击鼠标左键, 移动到窗体的适当位置, 按住鼠标左键拖
曵, 分别调出 Command1和 Command2。 Command2在 Caption属性值上单击鼠标
左键, 将原缺省值删除, 再键入, 运行代码, 。 选中 Command1的 Style 设为
1——图形外观, 选中 Picture属性, 调出加载图片的对话框 。
② 出现加载图片的对话框后, 从查找范围内选择存放图片的文件夹, 选
择合适的图片, 最后选择, 打开, 按钮 。
③ 移动鼠标在 Command2控件上双击鼠标左键, 在 Command2 _Click()
事件代码窗口中输入设定 Command1控件属性的代码 。
Private Sub Command2_Click()
Command1.Caption = "图形按钮 " ?设置 Command1控件上显示的文字
Command1.Font = "隶书 " ?设置文字的类型
Command1.BackColor = RGB(50,150,0) ?设置 Command1控件上的颜色
Command1.Width = 800 ?设置 Command1控件的宽度
Command1.Height = 800 ?设置 Command1控件的高度
End Sub
最后点击工具条中的, ?” 图标，然后选择, 运行代码, 按钮，就会执行以上
代码。
1.5 Visual Basic基本控件
三,标签 Label
用于显示文本 (输出 )信息，不能作为输入信息的界面。
1,基本属性
Name, Height, Width, Top, Left, Enabled,
Visible,Font,ForeColor,BackColor等与窗体的使用
相同 。
2,常用属性
（ 1） Caption属性
Caption属性用来改变 Label控件中显示的文本 。
Caption属性允许文本的长度最多为 1024字节 。 缺省情况下,
当文本超过控件宽度时, 文本会自动换行, 而当文本超过
控件高度时, 超出部分将被裁剪掉 。
1.5 Visual Basic基本控件
（ 2） Alignment属性
设置 Caption属性中文本的对齐方式, 共有三种可选值：
0 左对齐 (Left Justify)；
1 右对齐 (Right Justify)；
2 居中对齐 (Center Justify)。
（ 3） BackStyle属性
该属性用于确定标签的背景是否透明 。 有两种情况可
选：值为 0时, 表示背景透明, 标签后的背景和图形可见；
值为 1时, 表示不透明, 标签后的背景和图形不可见 。
1.5 Visual Basic基本控件
（ 4） AutoSize属性
AutoSize属性确定标签是否会随标题内容的多少自
动变化 。 如果值为 True,则随 Caption内容的大小自动调整控
件本身的大小, 且不换行；如果值为 False,表示标签的尺寸
不能自动调整, 超出尺寸范围的内容不予显示 。
例 1.5 利用 Label1控件制作一个, 仲夏夜演奏会, 的宣传画，
程 序界面如图所示。
具体步骤如下：
① 在工具箱中的上单击鼠标左键, 移动到窗体的适当位置, 按住鼠标左键
拖曵, 调出 Label1。 在属性窗口修改窗体 Form1的 Picture属性, 加载合适
的图片 。 修改 Label1的 Caption属性值, 键入, 仲夏之夜演奏会, 。 然后选
中 Label1的 Font属性, 调出, 字体, 对话框选择字体为, 华文中宋,, 字型为
,粗体,, 大小为, 小四,, 加下划线 。 再设 Label1的 BackColor为黄
色, ForeColor为红色 。
② 在窗体 Form1上双击鼠标左键, 调出代码窗口在 Form1_Click()事件代码
窗口中输入修改 Label1控件属性的代码 。 如下图所示：
③ 最后点击工具条中的, ?” 图标, 然后在窗体的任一位置单击鼠标左键 。
1.5 Visual Basic基本控件
四,文本框 TextBox
是一个文本编辑区域，在该区域输入，编辑和显示文本。
（一） 属性
1,基本属性
Name,Height,Width,Top,Left,Enabled,Visible、
Font,ForeColor,BackColor等与标签控件相同 。
2,常用属性
（ 1）,Text文本属性
在文本框中显示的正文内容存放在 Text属性中。当程序运
行时，用户通过键盘输入正文内容，保存在 Text属性中。
文本框没有 Caption属性
1.5 Visual Basic基本控件
（ 2） Maxlength,设置正文的最多字符个数,0任意长度值 。
（ 3） MultiLine,是否为多行,默认一行, False
（ 4） ScrollBars,当 MultiLine为 True时,该属性才有效,滚动
条的形式。
0-None：无滚动条、
1-Horizontal,水平滚动条、
2-Vertical,垂直滚动条
3-Both,水平和垂直滚动条。
（ 5） Locked,是否可被编辑属性
False，表示为可编辑。
（ 6） PassWordChar属性
设置 PasswordChar属性为了掩盖文本框中输
入的字符。
该属性的设置只有在 MultiLine设为 False才
有效
1.5 Visual Basic基本控件
（ 7） SelStart,SelLength和 SelText属性
这三个属性是文本框中对文本的编辑属性 。
SelStart：确定在文本框选中文本的起始位置 。 第一字
符 的位置为 0。 若没有选择文本, 则用于返回或设置文本的插
入点位置, 如果 SelStart的值大于文本的长度, 则 SelStart
取当前文本的长度：
SelLength：设置或返回文本框中选定的文本字符串长度
（字符个数）。
SelText：设置或返回当前选定文本中的文本字符串 。
1.5 Visual Basic基本控件
Change事件：
当改变文本框的 Text属性时会引发该事件。当用输入
一个字符，就会触发一次 Change事件。
例：在文本框 Text1的 Change事件编写有如下程序代码：
Private Sub Text1_Change()
Print Text1.tex
End Sub
当程序运行后中输入 ABCD，则在窗体上在输出结果是？
1.5 Visual Basic基本控件
KeyPress事件
当用户按下并释放键盘上一个 ANSI键时，就会触发一
次该事件，并返回一个 KeyAscii参数（字符的 Ascii值）到
该事件过程中。
例如：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Print KeyAscii,Chr(KeyAscii)
End Sub
当程序运行后中输入 ABCD，则在窗体上在输出结果是？
LostFocus, 当控件失去焦点时发生。
GotFocus, 当控件获得焦点时发生。
1.5 Visual Basic基本控件
（三） 常用方法
文本框最有用的方法是,SetFocus，使用形式：
[对象,]SetFocus
功能,是把光标移到指定的文本框对象中。
例 1.6 利用 Textbox控件制作一个密码框
1.5 Visual Basic基本控件
在 Command1 _Click()事件代码窗口中输入代码如下 。
Private Sub Command1_Click()
If Text1.Text = "1111" Then
Form1.Caption = "欢迎进入本系统 "
Form1.BackColor = vbYellow
Label1.Visible = True
Command1.Visible = False
Command2.Visible = False
Text1.Visible = False
Else
Form1.Caption = "密码错, 请重新输入 "
End If
End Sub
5.多重窗体
多重窗体实际上是单一窗体的集合 。 换言之, 多重窗体由多个独立的,
单一的窗体构成, 其中每个单一窗体都有自己的界面和程序代码, 完成不
同的操作 。 利用多重窗体可以设计较复杂的多功能对话窗口 。
【 例 1.8】 设计一个电脑公司的报价单 。 从此报价单上可以查到某品牌微
机的 配置及价格 。
“封面窗体, 有 4个命令按钮, 其事件过程如下：
Private Sub Command1_Click() Private Sub Command3_Click()
SunForm.Show MoonForm.Show
FormCover,Hide Formcover.Hide
End Sub End Sub
Private Sub Command2_Click()
Private Sub Command4_Click( )
BrightForm.Show
End
FormCover.Hide
End Sub
End
