计算机应用基础(VB)简单的VB程序设计第2章简单的VB程序设计学习要求教学目标：主要介绍一些概念和几个基本控件的使用。使学生对VB可视化
界面设计有个基本了解。了解对象的概念；了解构成对象的三要素；掌握对象的建立与编辑；掌握窗体、文本框、标签、命令按钮的常用属性、事件
及方法；掌握工程管理及环境设置;掌握程序调试过程；重点：窗体、文本框、标签、命令按钮的常用属性、事件及方法；难点：工程管理及环境设
置;程序调试过程；第2章简单的VB程序设计2.1对象的概念2.2窗体和基本控件2.3工程管理及环境设置2.4程序
调试2.5实战演练2.1对象的概念2.1.1对象和类1.对象对象：即指现实世界中各种各样的实体，是具有某些特性的具体事物的
抽象。如一个人、一辆汽车。每个对象都有自己的特征、行为和发生在该对象上的一切活动。例如某个“人”具有身高、体重等特征，具有跑、跳、
说话等行为，以及外界作用在“人”对象上的各种活动，如下雪、上课铃响等。对象是由数据和代码组合而成的封装体。对象的特征→属性，对象的
行为动作→方法，作用到对象本身上的活动→事件。属性、事件、方法构成对象的“三要素”。注意：对象是构成程序的基本成分和核心2.类对
象是可以分类的，例如：轿车、卡车、面包车各种各样属于汽车这个“类”，张三、李四属于人这个“类”。具有相似性质，执行相同操作的对象
，是同一种对象的集合的抽象，它包含所创建对象的公共属性和行为特征的定义，称为类。类是创建对象实例的模板，对象是类的一个实例。对象实
例化后，可改变其自己的属性，在共享该类通用的属性、事件、方法可以有自己的事件过程、属性等。使用者只需了解类的外部特性，不需了解内部
结构。3.VB中的类和对象VB中类分两种：系统设计（本书只介绍）；用户自定义。工具箱提供标准控件类：Text1就是类（Text
Box）的实例化，其属性值可由用户修改。系统对象：打印机（Printer）、剪贴板（Clipboard）、屏幕（Screen）、应
用程序（App）等注意：窗体是特例，它既是类也是对象。2．1．2对象的属性、事件和方法例：张三180cm、180斤、散步、红灯
亮、停、绿灯亮、走。1．属性描述对象特征的参数，不同的对象具有不同的属性，而每个对象又有若干属性来描述。例如：控件名称name；
标题Caption；文本Text等属性决定了对象的外观及功能。两种方法设置对象属性：（1）在设计阶段利用属性窗口直接设置：（2）在
运行阶段利用代码窗口，通过赋值语句设置：格式：对象名.属性名=属性值；如：Text1.text=”欢迎学习VB！”可读/写属性：
在设计阶段或在运行阶段都可设置属性。只读属性：只能在设计阶段通过属性窗口设置，而在运行阶段不可改变的属性。如控件名称（Name）属
性等；少数属性只能在运行阶段设置：如选定文本（SelText）属性等。2．事件事件：是对象对外部变化的响应。事件是系统预先定义好
的一系列的动作，由用户或者系统触发，能被对象识别的动作。一个对象可响应多个不同的事件，例如：单击Click、双击DblClick
、改变Change、获取焦点GotFocus等不同对象所能识别的事件不同（Load事件）。程序的执行通过事件驱动，触发某个事件，
执行与其相关的过程。没事件发生，程序处于等待。注意：按钮无DblClick事件。事件过程：对象触发了某个事件后，要处理这个事件，就
必须设计事件处理步骤，应用程序处理这个事件的步骤又称事件过程。VB的主要任务就是为对象编写事件过程中的代码。VB事件过程的形式为
：Sub对象名_事件名（[参数列表]）……事件过程代码EndSub例如：PrivateSubCommand1_C
lick()Label1.FontName="黑体"Label1.ForeColor=vbRedEndSub
其中Command1是对象名Name属性；事件名是能被对象识别的预定好的事件；参数列表一般无，有的也有参数；事件过程代码是指定处理
该事件的程序。事件驱动程序设计：面向过程代码执行顺序，是按设计好的先后次序执行，用户无法改变程序执行流程。事件驱动由用户或系统
触发的事件，触发顺序决定执行的顺序，各事件的发生顺序是任意的，是响应不同事件时执行相应的过程代码，每次有可能不同。所以在编写代码无
需考虑顺序，编写相应代码即可。执行过程：系统等待→事件触发→执行事件过程→系统等待3．方法方法是对象自身的行为动作，是对象本身包
含的特殊函数或过程，用于完成某种特定功能。格式：[对象名.]方法名[参数名表]例如：Form1.Print"欢迎学习VB
!"注意：若省略对象名表示当前对象，一般指窗体。用法：依赖于有无参数和返回值无参无返：[对象名.]方法名Form1.show有
参：[对象名.]方法名参数表（有多个参数用逗号隔开）Form1.move0，02．1．3对象的建立和编辑1.对象的建立
包括：双击，单击+拖动，Ctrl+单击（一次按下，多次使用，添加多个同类控件，单击指针图标添加结束）2.对象的选定包括：单选（单
击，8个控制点），多选（Ctrl或Shift），框选（拖动区域）注意：实心的8个控制点对象为基准对象。3．改变对象大小4．移动对象
5．删除对象：del、“编辑”→“删除”、快捷菜单→“删除”（Ctrl+Z可撤销）。6．对象的命名对象的名称是系统识别该对象的标
识符。每个控件都有默认的名称，用户也可在属性窗口设置Name（名称）属性来给对象重新命名。命名的原则：必须由字母或汉字开头、随后
可以是字母、汉字、数字、下划线（最好不用）组成。长度<=255个字符。2.2窗体和基本控件控件分三类：（1）标准控件（内部控件）
：工具箱上20个+指针。（2）ActiveX控件：扩展名.OCX或.DLL的独立文件，通过“工程”→“部件”来添加。（3）可插入对
象：“部件”中的“插入对象选项卡”，将应用程序添加到工具箱使用。本节介绍四个基本控件：（a）窗体：画布，是所有控件的容器，设置Fo
nt系列属性后，窗体上的控件都有相同Font属性值。（b）标签：用于窗体显示文字，Caption属性设置，不能作为输入信息控件。（
c）命令按钮：启动事件过程的执行，Click事件。（d）文本框：信息输入、编辑和显示的控件，简易文本编辑器。2．2．1通用属性
控件外观由一系列属性决定，例如大小、颜色、位置、名称等。不同控件有不同属性，也有相同属性，通用属性就是大部分控件（注：不是全部）
具有的属性。每个属性有默认的属性值。最常见的通用属性：1.Name（名称）属性所有对象都有。系统识别对象的唯一标识。所有的控件
在创建时有默认的名称。该属性只能在属性窗口的名称栏修改，在运行时是只读的。作用：作为在程序中引用的标识，不会显示在窗体上。2.Ca
ption（标题）属性决定控件上显示的文本内容。利用该属性还可以为命令按钮、菜单项等指定访问键，即Caption属性值设为“
标题&字母”，运行时按下“ALT+字母”键相当于单击操作。代码中给窗体的Caption属性赋值（其他属性和方法与之相似）可用以下几
种形式：Form1.Caption=“hello”Me.Caption=“Hello”（me指当前窗体）Caption=“hell
o”（默认访问当前窗体）“欢迎”按钮设置访问键H3.left、Top、Width、Height属性：决定控件在窗体中的位置。窗
体的默认坐标系：左上角为坐标原点，上边框为坐标横轴，左边框为坐标纵轴。left、top：表示对象距容器左边距和顶边距的距离，决定对
象在容器中的位置。窗体的容器是屏幕，控件的容器是窗体，也可以是框架（Frame），图片框（PictureBox）或选项卡（SSTa
b）控件。Height、Width：决定对象的高度和宽度。坐标单位为缇（twip）（1twip=1/20点=1/1440英寸=1
/567厘米）注意：该属性在程序运行时起作用。控件位置属性示意图4.Font系列属性改变指定对象上显示文本的外观。Fon
tName：字符型，字体名称。FontSize：整型，字体大小，以磅为单位。FontBold：逻辑型，是否是粗体。默认值是Fa
lse，不加粗。FontItalic：逻辑型，是否是斜体。默认值是False，不倾斜。FontStrikethru：逻辑型，是否
加删除线。默认值是False，不加删除线。FontUnderline：逻辑型，是否带下划线。默认值是False,不带下划线。举
例：Me.FontName=“黑体”Me.FontSize=12（字号为12磅，1磅=20缇）Me.FontBold=True
加粗另外一种形式：Text1.Font.Underline=True（这种形式是在访问Font对象的某个属性）5.Enabl
ed属性决定控件在运行时是否能够响应事件。True：允许用户进行操作，并对操作做出响应。默认值。False：禁止用户进行操作，
控件呈暗淡色。6.Visible属性决定控件是否可见。True：程序运行时控件可见。默认值。False：程序运行时控件隐藏起来
，不可见，但控件本身仍然存在。7.颜色属性（1）ForeColor属性 设置或返回控件的正文颜色。改变该属性不影响已创建的文本
或图形。（2）BackColor属性设置控件正文以外的显示区域的颜色。注：颜色属性值均是16进制常数。用户可以在调色板中选择颜
色。在编程时，可利用QBcolor、RGB函数设置所需的颜色。 同时VB提供8个颜色常数，可直接使用颜色设置：vbBlue、vbR
ed、vbGreen、vbYellow、vbBlack、vbWhite、vbMagenta（洋红）、vbCyan（青色）等。
例如：Form1.BackColor=RGB(255,0,0)Form1.ForeColor=vbRedForm
1.Backcolor=QBColor(4)8.BackStyle属性指定标签控件或形状控件的背景是否透明。0—Tr
ansparent：透明，即控件背景颜色不显示。1—Opaque：非透明，此时可以用BackColor属性设置控件背景颜色。9.
BorderStyle属性设置对象的边框样式。10.MousePointer属性运行时鼠标指针类型，设置值的范围一般
在0-15之间和99，99表示用户自定义鼠标图标。默认值为0。11.MouseIcon属性 该属性在MousePointe
r设置自定义图标时可用的图标，类型为.ico.cur。12.Alignment属性决定控件中文本的对齐方式。对Labe
l和TextBox控件，属性值为：0—LeftJustify：（缺省值）文本左对齐。1—RightJustify：
文本右对齐2—Center：文本居中13.AutoSize属性决定控件是否自动调整大小。其属性值有：True：自动调整
大小，以显示全部内容。False：（缺省值）保持控件大小不变。超出控件区域的内容自动裁剪。14.WordWrap属性用来
指示Label控件是否要进行水平或垂直展开以适合其Caption属性中指定的文本的要求。True：Label控件垂直展开或
缩短，以使其与文本和字体大小相适。水平大小不变。False：（缺省值）Label控件水平地展开或缩短以使其与文本的长度相适，并
且垂直地展开或缩短以使其与字体的大小和文本的行数相适应。AutoSize属性设为True时，WordWrap属性才有效。15.
TabIndex：按Tab键，焦点在控件的移动顺序。焦点：是可视化程序中频繁使用的一个术语，当对象具有焦点，可以接收用户输入文本，
只有一个窗体或控件具有这种能力，具有焦点的对象通常会以高亮显示的标题或标题栏表示。可通过SetFocus方法将焦点定位到自身，程序
运行时，可以使用Tab键使焦点在各对象之间切换。有焦点周围有虚线框。获得或失去焦点会产生GotFocus或LostFocus事件。
默认情况下，Menu、Timer、Data、Image、Line、Shape、Frame、Label不能获得焦点，但仍保持在Tab
键顺序中，切换时跳过。可改变TabIndex属性值改变键序，可在设计阶段或运行阶段改变，第一个为0。16.TabStop属性决
定是否可以使用Tab键来使对象具有焦点。True：使用Tab键可以使该对象具有焦点。默认值，False：使用Tab操作时将跳过该对
象，即该对象得不到焦点。17.控件的默认值反映控件最重要的属性。程序运行时，不用指明属性名而可改变其值的属性。给该属性赋值，可
直接赋值给该对象名。（文本框：Text，标签：Caption，命令按钮：Default，图形、图像框：Picture，单选按钮、复
选框：Value）因此：Text1.Text=“123”等价于Text1="123"Label1.Caption=“
Start”等价于Label1="Start"控件默认属性控件默认属性文本框命令按钮单选按钮TextDef
aultValue标签图形、图像框复选框CaptionPictureValue控件默认属性所谓默认属性是程序运行时，可以改变
某控件的值，而不必指定该控件的哪个属性。例如，下面两条语句是等价的：Text1.Text="VisualBASIC"Text1
="VisualBASIC"本章目录2.2.2窗体窗体就是“画布”，所有控件的容器，“画”出界面。1．主要属性（窗体的外观设计
）（1）Caption属性：决定窗体标题栏内容（控件表面显示的文字），该属性的默认值与对象的默认名称（name）相同（容易混淆
）。（2）ControlBox控制菜单框、MaxButton、MinButton边框元素：逻辑值，ControlBox为False
，MaxButton、MinButton自动为False且无关闭按钮。注意：窗体的ControlBox、MaxButton、Mi
nButton是只读属性。（3）Icon图标：控制菜单的图标也是最小化时显示的图标，可加载.ico。（4）BorderStyle（
0—5）边框样式：默认为2.0：无边框、无标题、无按钮、无法移动\改变大小。1：单线边框，可移动，不可改变大小，有一个关闭按钮2：
双线边框，可移动\改变大小，有最大最小化关闭3个按钮。3：固定对话框，不可改变大小，一个关闭按钮，可移动，圆角。4：与工具条相似，
单线边框，不可改变大小，一个关闭按钮，方角。5：与工具条相似，双线边框，能改变大小，一个关闭按钮。注意：（1）除了2外，系统自动将
MinButton、MaxButton设为False。只有0无法移动。（2）窗体的BorderStyle是只读属性。窗体的外观（
5）Picture：窗体中显示的图片，也可通过LoadPicture函数加载一个图形文件。（6）WindowState属性：设
置执行时窗口状态。0—Normal:正常窗口状态，有窗口边界。1—Minimized：最小化状态，以图标方式显示。2—Maximi
zed：最大化状态，无边框，充满整个屏幕。在代码中可使用数值，也可用VB常数vbNormal、vbMinimized、vbMaxi
mized。（7）AutoRedraw属性：该属性决定窗体被隐藏或被另一窗口覆盖之后重新显示，是否重新还原该窗体被隐藏或覆盖以前的
画面。即是否重画如Circle、Line、Pset和Print等方法的输出。当为True时，重新还原该窗体以前的画面。当为Fals
e时，则不重画AutoRedraw属性。（8）Moveable属性：禁止窗体被用户移动。2．事件常用的事件有Click\Dbl
Click、MouseDown、MouseUp、MouseMove、装入（Load）、卸载（Unload卸载\关闭窗体时触发）、
Active/Deactivate（活动窗口和非活动窗口转变瞬间）、Paint（绘画）、Resize（窗体第一次显示或改变窗体的大
小时触发）。重点是Load：装入工作区触发，程序启动自动执行该事件，所以通常用来对属性和变量进行初始化注意：一般应用程序结构包
括变量说明、变量赋初值、功能处理、输出结果的线性控制流程。VB以事件驱动，头是启动窗体的Load（无Initialize事件）事件
，尾是End（1）窗体的加载指窗体及其所有控件被装入内存，但界面尚未显示。窗体必须先通过加载阶段才能显示在屏幕上。加载发生lo
ad事件，其代码开始执行，因此，load事件中加入窗体初始化代码。如设置窗体和控件属性的初始值。例题1：为窗体和按钮属性设置初始值
。Me.Caption=“在窗体上显示文字”Me.FontSize=12Me.FontName=“黑体”Me.For
eColor=vbBlueMe.BackColor=vbWhiteMe.top=300Me.left=300Comm
and1.Caption=“移动窗体，显示坐标位置”窗体的卸载语句指窗体被关闭而从屏幕上消失。单击关闭按钮或Unload语句，即
可卸载窗体。Unload对象（form1/me）注意:(1)区分Unload和End。(2)Unload语句和Unload事
件是有区别的。(3)点击关闭按钮触发Unload事件，但结束按钮不触发该事件。3.方法窗体常用的方法：Print、Cls、Mov
e1.Print方法形式：[对象.]Print[{Spc(n)|Tab(n)}][输出列表参数][;|,]作用：用于在窗体、
图形框和打印机上输出信息。省略对象，则在窗体上输出。Spc函数：插入n个空格，允许重复使用。Tab(n)函数：左端开始右移动n列，
允许重复使用。输出列表参数：是显示在窗体上的文本。多个输出项，必须用分号或逗号分隔。（1）；(分号)：光标定位上一个显示的字符后
，表示各项连续输出，紧凑输出。注意：输出为字符串时连续输出；输出为数字时，有空格，且正数前多有一个符号位；（2），(逗号)：逗号表
示各输出项按分区格式输出，光标定位在下一个分区的开始位置处。每个分区占14个字符列。注意：a.无分号和逗号的情况下换行。b.如
果省略各参数，则输出一个空行。c.开始打印的位置是由对象的CurrentX和CurrentY属性决定，缺省为打印对象的左上角0，
0。2.Cls方法Cls清除运行时窗体或图片框中用Print方法显示的文本或用绘图方法所产生的图形。[对象].Cls注意
：a.省略对象默认为窗体。b.Picture属性设置的背景位图和放置在窗体上的控件不受cls方法影响。c.不清除在设计时的文
本和图形。d.清屏后坐标当前回到原点—对象的左上角0，0。3.Move方法Move移动窗体或控件对象的位置，并可改变对象大
小。形式：[对象].Move左边距离[,上边距离[,宽度[,高度]]]作用：移动窗体或控件，并可改变其大小。对象：可以是窗体，
和除时钟、菜单外的其他可视控件，省略代表窗体。左\上边距，宽度，高度：数值表达式，单位twip。对象是窗体：则“左边距”
和“上边距”是以屏幕左边界和上 边界为准。对象是窗体内控件：是以窗体的左边界和上边界为准。Print和Move方法的综合使
用例题1：用Move方法移动窗体，Print方法在窗体上只显示当前坐标。Me.moveme.left+200,me.top
+200例题2：用Move方法移动飞机（图像框，Stretch属性）例题3：使控件大小与窗体大小相适应，改变窗体大小，文本框充满整
个窗体。PrivateSubForm_Resize（） Text1.Move0，0，form1.ScaleWidth，Me.
ScaleHeightEndSub注意：Load先执行，Resize后执行；App.Path表示装入的图片文件与应用程序在同一
个文件夹，函数用法：LoadPicture（app.path+”\图片名称.类型”）。多窗体应用程序一个应用程序中多个并列的普
通窗体。（1）添加新窗体：注意：添加的窗体不能与工程内已有的任何窗体同名；添加进来的现存窗体实际是由多个工程共享，对窗体的改变影响
到共享该窗体的所有工程。（2）设置启动对象：首先执行的对象叫启动对象，默认第一个创建的窗体为启动对象，可用“工程”→“工程属性”，
如果启动对象为SubMain不加载任何窗体。（3）移除窗体（4）窗体的显示与隐藏a：show方法b：hide方法4.Show方
法形式：[窗体名.]show参数，拥有者 非模式0—vbModeless默认值，模式1—vbModal，拥有者指定“父窗体”，
随父窗体放大缩小，通常设置为Me。例如：Form2.showvbModeless，Me作用：用于在屏幕上显示一个窗体，调用Sh
ow方法与设置窗体Visible属性为True具有相同的效果。说明：（1）其中参数表示从当前窗口或对话框切换到其他窗口或
对话框之前用户必须采取的动作。当参数为vbModal时，要求用户必须对当前的窗口或对话框做出响应，才能切换到其他窗口。（2）该方法
将要显示的窗体先自动装入、再将该窗体显示。5.Hide方法形式：[窗体名].Hide作用：Hide方法用于使指定的窗体不显示，
但不从内存中删除窗体。说明：当一个窗体从屏幕上隐去时，其Visible属性被设置成False，并且该窗体上的控件也变得不可访问，但
对运行程序间的数据引用无影响。若要隐去的窗体没有装入，则Hide方法会装入该窗体但不显示。例题：单击关于按钮，另一个窗体显示版本
信息。2.2.3命令按钮1．常用属性（1）Caption：按钮上显示的文字，带下划线的快捷访问键设置（字母前加“&”符），用户
ALT+该字母可操作按钮，这种设置访问键的方法，适于其它具有Caption属性的控件。（2）default（按钮的默认属性）：逻辑
值，设置为默认的“活动按钮”。一个窗体只能有一个按钮default为True，无论焦点在什么控件，运行时，按下回车键，执行defa
ult为true的按钮。通常将“确认”按钮的default设为True。（3）Cancel：设置为默认的“取消按钮”，设为True
按下键盘ESC键，激活该按钮，同样只有一个Cancel属性值为True，通常将“取消或退出”按钮的Cancel设置为True。（4
）Style属性决定命令按钮中是否可以显示图形。0-Standard：（默认）标准的，按钮上不能显示图形或设置背景色只显示标题
。1-Graphical：图形的，按钮上可同时显示文本、图形和背景色。（5）Picture、DownPicture属性Pictur
e属性：按钮可装入图形文件（.ico或.bmp）。DownPicture属性：设置按钮被单击并处于按下状态时，在按钮中所显示图形。
注意：只有当Style属性设置为1时，上述二个属性才有效。（6）ToolTipText：加以文字提示（运行时指向该按钮），字符串
类型。（7）Enabled：是否可用。（8）Value:检查该按钮是否按下，逻辑值。该属性在设计时无效。2．常用事件最主要的事件
是单击（Click）事件。能触发Click事件的操作包括：（1）单击命令按钮（2）焦点（tab键切换焦点）在按钮上时按回车或空格键
。（3）使用快捷访问（Alt+有下划线的字母）（4）在代码中将按钮的Value属性设为True（选中）注意：Value检查该
按钮是否按下。该属性在设计时无效。3.常用方法SetFocus，将焦点定位到指定的命令按钮上。对象名.SetFocus。注意：
窗体和大多数可视控件也具有SetFocus方法。SetFocus在Load事件中不起作用，将其放在窗体的Activate事件中。
2．Print方法用于在窗体、图片框和打印机上显示文本。格式：[对象].Print[参数列表]例如：Form1.Print
"欢迎学习VB!" Picture1.Print"VB易学易用!"3．Cls方法用来清除运行时窗体或图片框所生成的图形和
文本。格式：[对象].Cls例如：Picture1.Cls‘清除图片框内的图形或文本Cls‘清除当前窗体显示的内容4．Mo
ve方法用于移动窗体或控件，并可以改变其尺寸大小。格式：[对象].Move左边距离[,上边距离[,宽度[,高度]]]例如：
Move0,0,600,300’窗体移到屏幕左上角，设置窗体宽600缇，高300缇例2-4：简单的动画演示。窗体上有一幅“汽
车”图片，单击“行驶”按钮一次，其自右至左移动50缇（Twip），且越来越大。事件过程代码：PrivateSubComma
nd1_Click()Image1.MoveImage1.Left-50,Image1.Top,_Image1.
Width+20,Image1.Height+20EndSub2.2.4标签标签的主要作用是在窗体上相对固定的
位置显示提示信息，可以用作标题、栏目名状态等说明注释文字，也可作为结果信息的输出区域，常和文本框一起使用。不能输入信息，不能编辑，
用Caption属性设置或修改。注意：标签不能接受焦点。1．常用属性（1）BackStyle：背景样式，0为透明显示，1为不透明
，可设置背景色（2）BorderStyle：边框样式，0为无边框，1有单边框。（3）Alignment：标题Caption对齐方式
，0左对齐、1右对齐、2居中对齐。文本框等可视控件具有此属性。（4）AutoSize：控件自动调整以显示所有内容，True可自动调
整，且不换行。False表示标签的尺寸不能自动调整，超出尺寸范围的内容截掉。（5）WordWarp：可多行显示,前提是AutoSi
ze为True。（6）Appearance立体外观：1（默认值）为立体效果，0为平面效果。注意：可在运行阶段赋值，Labe1.Ca
ption=time$例2-2：利用两个标签控件，显示具有浮雕效果的文字。(两个标签，通过白色和黑色错位叠加，且可切换上下位置)
2．常用事件标签经常接收的事件有：单击（Click）、双击（Dbclick）、改变（Change），但Label控件的主要作
用是显示文本，一般不需要编写事件过程代码。例题：用标签创建访问键（1）Tab键次序和TabIndex属性Tab在个控件中切换，切
换的次序就是Tab键次序，由TabIndex决定的，（0开始递增，按添加的先后顺序）。（2）访问键：对于有Caption属性的控件
可设置，没有Caption属性的控件（文本框、列表框等），可将快捷访问键定义在标签的Caption属性中，利用标签为其设置快捷访问
键，由于标签存在TabIndex次序，但不能接受焦点，因此，按照Tab键次序，自动移动到下一个控件处。注意：（1）首先确保标签的
UseMnemonic（是否将&符号定位访问键）为True。（2）要使某个控件在窗体启动首先获得焦点，可在设计阶段，窗体的Loa
d事件中，将TabIndex=0（相当于Setfocus）3．其它用法标签除了直接在设计阶段设置之外，也常常在运行阶段用程序的
方式来显示时间。例如：label1.caption=time$ 要在标签中同时显示2行以上的字符串，就一定要靠代码来实现，即在字
符串与字符串之间加上chr$(13)+chr$(10)（回车换行）控制码或vbCrLf常量。例：label1.caption=d
ate$+chr$(13)+chr$(10)+time$或：label1.caption=date$+vbCrLf+
time$2.2.5文本框文本框是一个文本编辑区域，可在该区域输入，编辑和显示正文内容。小型文本编辑器（可使用剪切、粘贴及其快
捷键）1．基本属性Name、Height、Top、Enabled、Visible、BackColor等与标签控件相同。?2．常用
属性（1）Text属性在文本框中显示的正文内容和程序运行时用户通过键盘输入的内容。存放在Text属性中。注意：文本框没有Capt
ion属性。（2）MaxLength属性指明文本框中可输入的正文内容的最大长度。0：默认值，任意长的字符串。非0值：文本框中字符
个数的最大值。注意：在VB中字符长度以字为单位，也就是一个西文字符与一个汉字都是一个字，长度为1，占二个字节。（3）MultiL
ine：设置文本框能否输入和显示多行文本。True：可输入、显示多行文本。同时具有文字处理器的自动换行功能，注意：属性窗口Ctrl
+Enter键换行，运行状态直接按Enter键换行。False：默认值，限制所有的文本在一行内显示。（4）scrollbars属
性设置文本框是否有滚动条。0-None：无滚动条。1-Horizontal：有水平滚动条。2-Vertical：有垂直滚动条。3
-Both：同时有水平、垂直滚动条。说明：只有当multiline属性设置为true时，scrollbars属性才有效。（5）L
ocked属性指定文本框是否可以编辑，创建只读文本框。False：默认值，表示文本框可编辑。True：只读文本框，可浏览和选定文本
框内文本，但不能更改，可使用复制命令，但不能用剪切命令。此时相当于标签控件的作用。（6）PasswordChar属性 设置显示文本
的替代符。例如，当设置为“”，则在文本框输入的内容均以“”显示，而存储的值是用户输入的原文。一般用于设置口令的输入。SelSt
art、SelLength和SelText是文本框对文本的编辑属性。注意：这些属性只在运行期间使用，设计期间不可用，即在属性窗口无
显示。（7）SelStart属性 确定在文本框选中文本的起始位置。第一个字符的位置为0，第二个为1……依次类推。注意:a.若没有
选择文本，则用于返回或设置文本的插入点位置；b.若值=0，插入点置于第一个字符之前。c.若值大于或等于文本长度，插入点置于最后
一个字符之后。即取当前文本的长度。（8）SelLength属性设置或返回文本框中选定的文本字符串长度（字符个数)（9）SelTex
t属性设置或返回当前选定文本中的文本字符串。注意:a.如果无选定字符，就是空字符串。b.对该属性赋值可以替换当前选中文本；
没有选定文本，则在当前插入点插入文本。d.设置了SelStart、SelLength后，VB自动将选定文本送入SelText中存
放。例1：有字符串“0123456789”，如果SelStart=5,SelLength=4,则SelText=“5678”。例2
：单击窗体，将文本框Text1中的前8个字符，在Text2中显示。（VB程序设计教程第三版）例3：利用SelText属性实现两个文
本框中文本信息的复制、剪切。2.常用方法SetFocus方法：文本框最有用的方法是SetFocus。该方法能够使文本框获得输入焦
点，把光标移到指定的文本框中。格式：[对象.]SetFocus例如：Text1.SetFocus‘文本框Text1获得焦点
注意：SetFocus方法还可以用于如CheckBox、CommandButton、ListBoxComboBox等控件。在Fo
rm_Load()事件中失效。例：利用文本框，实现简单的两数加法运算。要求文本框具有对输入数进行合法性检查的功能，过滤不合法的数
据。3．常用事件（1）Change事件通过任意方式使Text属性值发生变化就会引发Change事件。当用输入一个字符，就会触发、
一次Change事件。例：程序运行后，在文本框中输入“Yes”一词时，就会触发3次Change事件。思考：在文本框Text1的Ch
ange事件编写有如下程序代码：PrivateSubText1_Change()PrintText1.textEndSu
b当程序运行后中输入ABCD，则在窗体上在输出结果是？（2）KeyPress(KeyAsciiAsInteger)事件
当用户按下并释放键盘上的一个具有ASCII码值的键时，就会触发一次。KeyPress事件，并返回一个KeyAscii参数（字符的A
scii值）到该事件过程中。例如：PrivateSubText1_KeyPress(KeyAsciiAsInteger)
‘在Text1中输入字符“b”PrintKeyAscii,Chr(KeyAscii) ‘输出98和bEndSub注意：
KeyPress事件最常用在对键入的是否为回车符（KeyAscii的值为13）的判断，表示文本输入结束。（3）LostFocus事
件当按下Tab键或者用鼠标选择窗体中的其他对象时，文本框失去焦点时触发LostFocus事件。 该事件主要是用来对数据进行验证和
确认，常用于检查Text属性的内容。（4）GotFocus事件GotFocus事件：GotFocus事件与LostFocus事件
相反，当对象获得焦点时，将触发该事件。例2-3：用Change事件改变文本框的Text属性值。窗体上有3个文本框、3个命令按钮“显
示”、“清除”和“退出”。程序运行时，单击“显示”按钮，文本框1中显示一个字符串，同时文本框2中显示该字符串全部小写字母，文本框3
中显示全部大写字母。单击“清除”按钮，三个文本框全部清空。单击“退出”按钮，程序运行结束。2.3工程管理及环境设置2．3．1
工程的组成工程文件(.vbp)包含了一个应用程序的所有文件窗体文件（.frm）:控件及属性、事件过程和自定义过程窗体的二进制数据
文件（.frx）标准模块文件（.bas）类模块的文件（.cls）资源文件（.res） ActiveX控件的文件（.ocx）2．
3．1工程的组成一个VB应用程序中各主要文件的结构关系如下图：2．3．2创建、打开和保存工程1.创建工程启动VB，在“新建
工程”中选择工程类型，单击“打开”。执行“文件|新建工程”命令，选择工程类型，单击“确定”。2．3．2创建、打开和保存工程2
.打开工程执行“文件|打开工程”命令，在“打开工程”对话框中，打开“现存”或“最新”选项卡，从中选择要打开的工程，单击“打开”。
2．3．2创建、打开和保存工程3．保存工程执行“文件|保存工程”命令，弹出“文件另存为”对话框。输入窗体或模块名，单击“保存
”。如果工程中包含有多个窗体或模块等，则“文件另存为”对话框仍然存在，直到工程中所有的文件保存完毕。最后出现“工程另存为”对话
框，输入工程名，单击“保存”按钮。2.3.3添加、删除和保存文件1.添加文件（1）添加新文件打开“工程”菜单，选择要添加的文
件类型。（2）共享文件?执行“工程|添加文件”命令，选择一个文件，单击“打开”按钮，即可将其他工程中的文件添加到新的工程中。2
.3.3添加、删除和保存文件2.3.3添加、删除和保存文件2．删除文件?在工程资源管理器中选中文件，执行“工程|移除”命令
单击右键，执行“移除”命令提示：在工程中删除的文件仍存在于磁盘上。3.保存文件在工程资源管理器中选中文件，执行“文件|保存”命
令。注意：文件重命名指定启动窗体2.3.3添加、删除和保存文件指定启动窗体方法：执行“工程|工程属性”命令，选择“通用”选项
卡，在“启动对象”下拉列表中，选中某个窗体。2．3．4环境设置执行菜单“工具|选项”命令，弹出“选项”对话框：1.“编辑器
”选项卡2．3．4环境设置（1）自动语法检测2．3．4环境设置（2）要求变量声明（3）自动显示快速信息2．3．4环境
设置（4）自动列出成员2．3．4环境设置2．“通用”选项卡2．4程序调试2．4．1错误类型编译错误运行错误逻辑错误
2．4．1错误类型1.编译错误2．4．1错误类型2.运行错误在程序运行时，如果一个语句无法正常完成自己的功能，就会出现这类错
误。例如，加载一个图片时文件不存在，或执行除法操作时除数为0等。2．4．1错误类型3.逻辑错误应用程序的代码完全符合语法要求，运行时也没有任何错误，但却未出现期望的结果，这表明程序中存在逻辑错误。这类错误是因为代码中存在逻辑上的缺陷而引起的，例如，设置的选择条件不合适、循环次数不当等。逻辑错误最隐蔽，较难发现和排除。2．4．2调试和排错1.设置断点将光标放置在需要设置断点处，执行“调试|切换断点”命令。直接在要设置断点的行的左边单击。在需要设置断点的代码行前添加一个Stop语句。例如：Fori=1To10s=s+iIfi=5ThenStop‘当i=5时，程序暂停，进入中断模式Nexti2．4．2调试和排错2．调试窗口（1）“立即”窗口2．4．2调试和排错“Me”是指本窗体（2）“本地”窗口当执行到断点语句“Prints/5”时各变量的值。2．4．2调试和排错（3）“监视”窗口用来显示当前监视表达式的值。方法：在设计阶段，执行“调试|添加监视或快速监视”命令添加要监视的表达式以及设置的监视类型。运行时，在“监视窗口”中即出现相应的显示。2.5实战演练例2-5：编写程序输入语文、数学、英语三门功课的成绩，要求输入的同时计算平均成绩并输出。OptionExplicitDimsumAsDoublePrivateSubText1_Change()sum=0IfText1.Text<>""Thensum=sum+Val(Text1.Text)IfText2<>""Thensum=sum+Val(Text2)IfText3<>""Thensum=sum+Val(Text3)Text4=sum/3EndSub2.5实战演练例2-6：创建一个能剪切、复制和粘贴的便笺板程序。2.3综合应用CH1-3/V3J02-06.VBP例CH1-3/V3J02-06.VBP2.6建立一个类似记事本的应用程序，提供：(1)剪切、复制和粘贴的编辑操作(2)字体大小的格式设置分析：(1)建立一个文本框输入文本，文本框应该有滚动条，为了便于调试，程序运行时文本框有初始值。(2)利用文本框的SelText属性实现“剪切、复制和粘贴”的编辑操作。(3)“格式”设置利用Font对象实现。本章目录本章小节类是同种对象的集合与抽象，包含所创建对象的属性描述和行为特征的定义，是创建对象实例的模板。对象三要素：属性、事件、方法窗体是所有控件的容器基本控件：标签、文本框、命令按钮本章目录谢谢 |
|
