vb程序设计概述.ppt

1、VB 6.0的集成开发环境,应用程序窗口,由标题栏、菜单栏和工具栏组成 VB的三种工作模式（标题栏总显示当前工作模式）（1）设计模式：创建应用程序的大多数工作都是在设计时完成的。在设计时，可以设计窗体、绘制控件、编写代码并使用“属性”窗口来设置或查看属性设置值。（2）运行模式：代码正在运行的时期，用户可与应用程序交流。可查看代码，但不能改动它。 （3）中断模式：程序在运行的中途被停止执行时。在中断模式下，用户可查看各变量及不是属性的当前值，从而了解程序执行是否正常。还可以修改程序代码，检查、调试、重置、单步执行或继续执行程序。,1.主窗口,2.窗体(Form)设计窗口（1）,窗体设计窗口用于设

2、计窗体界面。用户可以在窗体中添加控件、图形和图片来创建所希望的外观。每个窗口必须有一个窗体名字，建立窗体时缺省名为Form1,Form2, . . .。 应注意窗体名即Name属性和窗体文件名的区别,2.窗体(Form)设计窗口（2）,2.窗体(Form)设计窗口,在设计模式中，通过双击窗体或窗体上任何对象或通过“工程资源管理器”窗口中的“查看代码”按钮来打开代码编辑器窗口。代码编辑器是输入应用程序代码的编辑器。,3.代码(code)窗口,属性是指对象的特征，如大小、标题或颜色等数据。在Visual Basic6.0设计模式中，属性窗口列出了当前选定窗体或控件的属性的值，用户可以对这些属性值进

3、行设置。,4. 属性(properties)窗口,对象列表框,属性显示排列方式,属性列表框,属性解释框,5. 工程资源管理器(project explorer)窗口,工程是指用于创建一个应用程序的文件的集合。工程资源管理器列出了当前工程中的窗体和模块,6. 工具箱(ToolBox)窗口,工具箱提供一组工具，用于设计时在窗体中放置控件生成应用程序的用户接口。系统启动后缺省的General工具箱就会出现在屏幕左边，上面有常用“部件”,7窗体布局窗口,窗体布局窗口显示在屏幕右下角。用户可使用表示屏幕的小图像来布置应用程序中各窗体的位置。这个窗口在多窗体应用程序中很有用，因为这可以指定每个窗体相对于主

4、窗体的位置。,属性是对象的特征,存储了对象中的数据.它们是用来描述和反映对象特征的参数。例如：控件名称（Name)、标题（Caption)、颜色（Color)、字体（FontName)等属性决定了对象展现给用户的界面具有什么样的外观及功能。属性是对象内部的变量对象属性设置的方法：方法一： 在设计模式下，通过属性窗口直接设置对象的属性。方法二： 在程序的代码中通过赋值实现，其格式为：对象.属性=新设置的属性值例如： Form1.Caption = “VB程序设计“ 将窗体的标题属性Caption修改为“VB程序设计”，即把字符串VB程序设计赋给Form1的caption属性,二、属 性（Prop

5、erty）,常用属性Name(名称)：窗体名称，当使用窗体对象时必须要用该名称来标识窗体。Caption属性：决定窗体标题栏中的内容。Forecolor属性：决定窗体的前景颜色(即窗体上正文的颜色)。Backcolor属性：决定窗体的背景颜色。MaxButton属性：最大化按钮属性，为True时，窗体右上角有最大化按钮，为False时则无最大化按钮。MinButton属性：最小化按钮属性，为True时，窗体右上角有最小化按钮，为False时则无最小化按钮。,Icon属性：决定窗体最小化时的图标。ControlBox属性：决定窗体左上角是否有控制菜单框。Picture属性：决定窗体背景中要显示的

6、图形。BorderStyle属性：决定窗体的边框样式。WindowsState 属性：决定窗体执行时以什么状态显示。Font属性：决定窗体文本的外观。,方法:一些常用功能,系统已经将程序代码编好,我们可以直接使用它，每一个功能都有自己的名称，我们将这些功能程序统称为方法。针对不同的对象有同样的方法和不同的方法,所以，在使用时要注明方法是哪一个对象的。 对象方法的调用形式： 对象.方法 参数列表 如省略对象，表示一般指窗体。 例如：我希望程序运行时在窗体上输出如下的内容可以使用下面的命令:Form1.print “欢迎您使用Visual Basic 6.0 “ 此语句调用Print方法在form

7、1窗体显示字符串”欢迎您使用Visual Basic 6.0 ”,四、方 法（Method）,事件：作用于对象上能够被对象识别的动作。例如：单击、双击、鼠标移动等等 事件过程: 是指附在该 对象上的程序代码，是事件触发后处理的程序。事件过程的形式如下：Sub 对象名_事件过程名（参数列表） (事件过程代码）End Sub 例如：Private Sub Form_Click()Form1.Print “你好“End Sub,三、事件及事件过程,2.事件(1) Load事件：当装入窗体时激发，通常用于对属性和变量初始化。 (2) Click事件：当单击窗体时，就会激发该事件。 (3) DblCli

8、ck事件：当双击窗体时，就会激发该事件。 (4) Activate事件：当一个窗体被激活时会发生该事件。 5.keypress:按键盘任意键触发的事件 6.Mousedown：按下鼠标键触发的事件 7.Mouseup松开鼠标键触发的事件,例: 设计一简单应用程序： 1.窗体Form1的属性，背景色为淡蓝色 2.在窗体上单击时，输出如下的内容”欢迎您使用Visual Basic 6.0” 3.用代码修改窗体标题为“高二（1）班+姓名+第一个VB程序”,三、一个简单的VB程序的创建 实例1小菜一碟,小测：设计一个窗体，其背景颜色设置为“绿色”：&H0000C000&，而且无最大化按钮和最小化按钮。

9、当该窗体装入内存时，在窗体的标题栏中显示“窗体的Load事件”。当单击窗体时，设置窗体正文的字号为28，字体为“隶书”；在窗体的标题栏显示“窗体的Click事件”；窗体上显示“VB窗体的使用”、“设置字号为28”、“设置字体为隶书”。,效果：,一、对象与类 1. 对象对象是一个个的实体，如窗体、各种控件等，它既包括作用于对象的操作（方法）和对象的响应（事件）。 将数据和处理这些数据的过程封装在一起。 2. 类(1)类是一个抽象的整体概念 ，对象是类的实例化。 类与对象是面向对象程序设计语言的基础。以“学生”为例，说明类与对象的关系。学生是一个笼统的名称，是整体概念，我们把学生看成 一个“类”，

10、一个个具体的学生（比如你自己）就是这个类的实例，也就是这个类的一个个对象。,2.2 VB中面向对象的基本概念,工具箱的各种控件并不是对象，而是代表了各个不同的类。通过类的实例化，可以得到真正的对象。当在窗体上画一个控件时，就将类转换为对象，即创建了一个控件对象，也简称为控件。,2. 类（2）,例2.1设计一个窗体，其背景颜色设置为“浅黄色”，而且无最大化按钮和最小化按钮。当该窗体装入内存时，在窗体的标题栏中显示“窗体的Load事件”。当单击窗体时，设置窗体正文的字号为28，字体为“隶书”；在窗体的标题栏显示“窗体的Click事件”；窗体上显示“VB窗体的使用”、“设置字号为28”、“设置字体为

11、隶书”。,2.3 标签框对象( Label)1. 作用：用于显示文本(输出)信息，不能作为输入信息的界面。 2. 主要属性 (1) Name（名称）：设置名称的属性 (2) Caption：设置标题的属性 (3) Height、Width、Top、Left：设置大小、位置的属性 (4) Enabled：设置标签框是否可操作的属性 (5) Visible：设置程序运行时标签框是否可见的属性,(6) Font：设置标签框上文本的字 体、大小等属性 (7) BorderStyle设置标签框边框样式的属性 (8) ForeColor设置标签框文本颜色的属性 (9) Backcolor设置标签框背景颜色

12、的属性 (10) Alignmemt设置标签框上文本对齐方式的属性。 3. 事件： 单击（Click） 双击（Dblclick）改变（Change）,例2.2：设计一个应用程序，窗体上有4个标签，其中Label1、Label2、 Label3的Caption属性值分别为“地球人类的家园”、“水更绿，地更青”、“居更佳，人更欢”；当单击窗体时，在Label4标签框中显示“水更绿，地更青；居更佳，人更欢”， Label2、 Label3不可见。,2.4 命令按钮(CommandButton) 1. 作用：接受用户输入的命令。输入命令可以有三种方式：鼠标单击、Tab键焦点到该按钮、快捷键。 2. 主

13、要属性 (1) Name（名称）：设置名称的属性 (2) Caption：设置标题的属性 (3) Height、Width、Top、Left：设置大小、位置的属性,(4) Enabled：设置命令按钮是否可操作的属性 (5) Visible：设置程序运行时命令按钮是否可见的属性 (6) Font：设置命令按钮上文本的字体、大小等属性 (7) Style：用来决定命令按钮的标题中是否可以使用图形 (8) Picture：选择命令按钮上的图形文件 (9) ToolTipText：设置命令按钮的提示信息,2.常用事件 Click、LostFocus、GotFocus、Mouseup、 MouseDo

14、wn,2.5 文本框 (TextBox),作用：是一个文本编辑区域，可在该区域输入，编辑和显示正文内容。 2.主要属性 (1) Name（名称）：设置名称的属性 (2) Text：存放文本框中显示的正文内容,(3) Height、Width、Top、Left：设置大小、位置的属性 (4) Enabled：设置文本框是否可操作的属性 (5) Visible：设置程序运行时文本框是否可见的属性 (6) Font：设置文本框上文本的字 体、大小等属性,(7) Maxlength：决定文本框上能够输入正文的最大长度 (8) PasswordChar：决定是否在文本框中显示用户输入的字符 (9) Loc

15、ked：决定文本框是否可以被编辑 (10) MultiLine：决定文本框是否可以接受多行文本 (11) Scrollbars属性：决定文本框是否加滚动条,2.常用事件 Click、DblClick、Change、eypress、LostFocus 3.常用方法 SetFocus,例2.3：设计一个简单计算器应用程序，窗体上有2个文本框、4个标签框和6个命令按钮，如下图所示。当程序运行时，只需在文本框中输入数据，即可计算出它们的和、差、积、商等数据。,例：制作一个窗体，放置一个按钮，单击按钮时， 窗口标题为 “VB程序设计”； 程序如下：,Private Sub Command1_Click(

16、) form1.caption= “VB程序设计” 窗体标题 “VB程序设计”。 End Sub,三、一个简单的VB程序的创建 （实例2）,三、一个简单的VB程序的创建 （实例3）,例. 设计一简单应用程序，在窗体上放置1个文本框、2个命令按钮，用户界面如图所示。,2.4 窗体,本节主要内容：窗体的结构窗体的属性窗体事件窗体方法,在程序运行前，即设计阶段，称为窗体； 运行后，一般称 为窗口。 窗体包括：控制菜单、标题栏、最大化按钮、最小化按 钮、关闭按钮。,1、窗体的结构,2、窗体的属性,（一）基本属性1. Name名称属性（任何对象都具有的）创建的对象名称,有默认的名。在程序中，控件名是作为

17、对象的标识而引用，不会显示在窗体上。 2. Height、width、top和left属性单位为twip：1 twip=1/20点=1/1440英寸=1/567cm,注意：这四个属性决定窗体（或控件）的大小，在容器中的位置。如右图。,3Caption 标题属性：决定出现在窗体的标题栏上的文本内容，也是当窗体被最小化后出现在窗体图标下的文本。,4 字体Font属性组,FontName属性是字符型，决定对象上正文的字体（缺省为宋体）。FontSize属性是整型，决定对象上正文的字体大小。FontBold属性是逻辑型，决定对象上正文是否是粗体。FontItalic属性是逻辑型，决定对象上正文是否是斜

18、体。FontStrikeThru属性是逻辑型，决定对象上正文是否加一删除线。FontUnderLine属性是逻辑型，决定对象上正文是否带下划线。,5. Enabled属性（逻辑值）决定控件是否可操作。True ：允许用户进行操作，并对操作出响应（缺省值） 。False：呈暗淡色，禁止用户进行操作。6. Visible属性（逻辑值）决定控件是否可见True ：运行时控件可见（缺省值） 。 False：运行时控件隐藏，用户看不到，但控件本身是存在的。,7BackColor属性和ForeColor属性 BackColor属性用于返回或设置对象的背景颜色，ForeColor属性用于返回或设置在对象里显

19、示图片和文本的前景颜色。它们是十六进制长整型数据 在程序代码中可用Windows 运行环境的红-绿-蓝 (RGB) 颜色方案，使用调色板或在代码中使用 RGB 或 QBColor 函数指定标准RGB颜色。,例如，将窗体Form1的背景色用代码设置为红色，则可使用下面几种情况：RGB函数:Form1.BackColor = RGB(255, 0, 0)颜色常数:Form1.BackColor = &HFF& (颜色值四个字节,低字节到高字节分别表示红、绿、蓝的值)Form1.BackColor = vbRed QBColor 函数:QBcolor(颜色值) 颜色值范围：0-15,1MaxButt

20、on最大化按钮和MinButton最小化按钮： 当值为 Ture，有最大或最小化按钮，False则无。,3Icon 控制图标属性： 返回或设置窗体左上角显示或最小化时显示的图标。 注意：此属性必须在ControlBox属性设置为Ture才有效,2ControlBox控制菜单框属性： 设置Ture为有，如设置为False则无控件菜单，同时窗体也无最大化按钮和最小化按钮，即使MaxButton属性和MinButton属性设置为Ture。,（二）窗体的其它常用属性,4Picture图片属性：设置窗体中要显示的图片。加载图片操作同Icon 控制图标属性。,5. BorderStyle：边框风格通过改变

21、 BorderStyle 属性，可以控制窗体如何调整大小。0-None：无边框；1-Fixed Single：单线边框，不可以改变窗口大小； 2-Sizable：双线边框，可以改变窗口大小；3-Fixed Double：双线框架，不可以改变窗口大小。4-Fixed Tool Window:窗体外观与工具条相似。有关闭按钮 ，不可以改变窗口大小。5-Sizable Tool Window：窗体外观与工具条相似。有关闭按钮 ，可以改变窗口大小。,6. WindowsState属性0：Normal：正常窗口状态，有窗口边界；1：最小化状态，以图标方式运行；2：最大化状态，无边框，充满整个屏幕。 7.

22、 AutoRedraw属性该属性决定窗体被隐藏或被另一窗口覆盖之后重新显示，是否重新还原该窗体被隐藏或覆盖以前的画面。即是否重画如Circle、Line、Pset和Print等方法的输出。当为True时，重新还原该窗体以前的画面。当为False时，则不重画AutoRedraw属性。,例1：制作一个窗体，放置一个按钮，单击按钮时， 窗口标题为 “VB程序设计”； 程序如下：,Private Sub Command1_Click() form1.caption= “VB程序设计” 窗体标题 “VB程序设计”。 End Sub,例2：请制作程序：制作一个窗体，按下列要求完成。 运行初始状态为最小化

23、WindowState1 边框类型为可调边框 BorderStyle2 高3000，宽4000 Height，Width 要求窗体的底色为黄色 BackColor 标题显示为“VB程序设计” Caption 不显示最大最小化按钮 MinButton,MaxButton例3 : 创建两个窗体form1 、form2，在两个窗体上分别放一个按钮cmd1、cmd2，form1是启动窗体，单击cmd1,显示form2,单击cmd2,隐藏form2.（ visable属性）,3、事件,例3：按下列要求制作程序(click事件、dbclick事件) ： 单击窗体后窗体宽高扩大两倍,双击窗体后窗体上输出“你

24、好！” 程序如下：Private Sub Form1_Click() width=2*widthheight=2* height End Sub例4:(load unload)工程中有两个窗体form1、form2，form1是启动窗体，单击form1显示 form2,form2的load事件中设置其背景色,form2关闭时,有提示信息. Load 事件被触发：启动窗体在运行时，其load事件直接被触发；当引用其他窗体的属性、方法时，load 事件被触发。 Unload 事件被触发：单击窗口控制菜单中的关闭命令、窗口中的关闭按钮；,例5: （activate事件）制作程序,按下列要求完成：创建

25、一个MIDI窗体midiform，两个子窗体 FORM1、FORM2；FORM1是活动窗体时，显示“form1 active”；FORM1是非活动窗体时，显示”form1 deactive”。 例6：创建一个窗体，窗体上放一个按钮，要求按钮的大小随着窗体大小的改变而改变（resize事件）,例7 :制作程序,按下列要求完成： 要求在load事件中设置窗体的前景色；双击窗体后将一个图片放在窗体中(Picture属性、LoadPicture函数）； 程序如下：Private Sub Form_load()ForeColor = RGB(&H0, &H43, &HCF)End Sub -Privat

26、e Sub Form_DblClick()picture=loadpicture(“e:aa.jpg”)End Sub-,窗体常用的方法有： 打印输出Print、移动Move、清除Cls、显示Show 、隐藏Hide等方法。 使用形式: 对象.方法 参数列表1.Print方法形式: 对象.Print 表达式列表;,作用: 在对象上输出信息对象：窗体、图片框或打印机(Pinter) ,省略对象在窗体上输出。 开始打印的位置是由对象的CurrentX和CurrentX属性决定，缺省为打印对象的左上角0，0。Spc(n)函数：插入n个空格，允许重复使用。Tab(n)函数：左端开始右移动n列，允许重复

27、使用。；(分号)：光标定位上一个显示的字符后。，(逗号)：光标定位在下一个打印区的开始位置处。每个打印区占14列。无 ；，换行。,4、常用方法,例 在窗体Form1的单击事件中写入如下代码： Private Sub Form_Click() a = 10: b = 3.14: c = 100 Print “a=“; a, “b=“; b Print “a=“; a, “b=“; b Print “a=“; a, “b=“; b Print 空一行 Print ; “a=“; a, “b=“; b Print “a=“; a, Tab(18); “b=“; b Print “a=“; a, Sp

28、c(18); “b=“; b Print Print “a=“; a, “b=“; b Print Tab(18); “a=“; a, “b=“; b 从第18列开始打印输出 Print Spc(18); “a=“; a, “b=“; b End Sub,2. Cls方法形式 : 对象.Cls作用 : 清除运行时在窗体或图形框中显示的文本或图形。注意 : 不清除在设计时的文本和图形。清屏后坐标当前回到原点-对象的左上角0，0 。 3. Move方法 形式 : 对象.Move 左边距离，上边距离，宽度，高度 作用 : 移动窗体或控件，并可改变其大小。 对象：可以是窗体及除时钟、菜单外的所有控件，

29、省略代表窗体。 左边距离，上边距离，宽度，高度：数值表达式，单位twip。如果是窗体对象，则“左边距”和“上边距”是以屏幕左边界和上边界为准。其它则是以窗体的左边和上边界为准。,例 使用Move方法移动一个窗体。双击窗体，窗体移动并定位在屏幕的左上角，同时窗体的宽高也缩小一倍。为了实现这一功能，可以在窗体Forml的“代码”窗口中输入下列代码： Private Sub Form_DblClick() Form1.Move 0,0,Form1.Width/2,Form1.Height/2 End Sub 例 启动vb，设置form1的宽度为6000，高度为3000，编写适当的代码，使得运行时,窗

30、体的顶边与屏幕顶边的距离为2000,窗体的左边与屏幕左边的距离为1000。,4Show(显示)方法Show方法用于在屏幕上显示一个窗体，调用 Show 方法与设置窗体 Visible 属性为 True 具有相同的效果。 其调用格式如下：窗体名.Show vbModal | vbModaless,说明 它有两种可能值：vbModal（缺省）或vbModeless，参数表示从当前窗口切换到其他窗口之前用户必须采取的动作。当参数为vbModal时，要求用户必须对当前的窗口隐藏或卸载，才能切换到其他窗口。 试比较下面两个程序的结果。 Form2显示出来；在其关闭之前，后面的提示信息不会显示出来。只有关

31、闭了form2时才会现实提示信息。 Private Sub Form_DblClick() Form2.Show vbModalMsgBox “Test“ End Sub,5Hide(隐藏)方法Hide方法用于使指定的窗体不显示，但不从内存中删除窗体。其调用格式为：窗体名.Hide,Form2显示出来后，后面的提示信息马上就显示出来了。 Private Sub Form_DblClick()Form2.Show vbModelessMsgBox “Test“ End Sub,例 实现将指定的窗体在屏幕上进行显示或隐藏的切换。为了实现这一功能，可以在窗体Forml的“代码”窗口中输入下列代码：

32、Private Sub Form_Click()Form1.Hide 隐藏窗体MsgBox “单击按钮，使窗体重现屏幕“ 显示信息Forml.Show 重现窗体 End Sub,说明：当一个窗体从屏幕上隐去时，其Visible属性被设置成False，并且该窗体上的控件也变得不可访问，但对运行程序间的数据引用无影响。,总结窗体的方法：Hide：隐藏窗体； Show：显示窗体； Cls：只清除运行时在窗体中显示的文本或图形，不清除在窗体设计时的文本或图形； Move：移动窗体并可以改变其大小。,2.5 基本控件,1.掌握命令按钮属性、事件、和方法；2.掌握标签属性、事件、和方法；3.掌握文本框属性

33、、事件、和方法；,本节要求：,一. 标签 Label用于显示文本(输出)信息，不能作为输入信息的界面。标签（Label）是VB中最常用的输出文本信息的工具，目前几乎完全取代了Print方法。 1基本属性Name、Height、Width、Top、Left、Enabled、Visible、Font、ForeColor、BackColor（为使backcolor起作用，应把backstyle设为1)等与窗体的使用相同。 2常用属性 （1）Caption属性Caption属性用来改变Label控件中显示的文本。Caption属性允许文本的长度最多为1024字节。缺省情况下，当文本超过控件宽度时，文本

34、会自动换行，而当文本超过控件高度时，超出部分将被裁剪掉。,（2） Alignment属性设置Caption属性中文本的对齐方式，共有三种可选值：0 左对齐(Left Justify)； 1 右对齐(Right Justify)；2 居中对齐(Center Justify)。（3）BackStyle属性该属性用于确定标签的背景是否透明。有两种情况可选：值为0时，表示背景透明，标签后的背景和图形可见；值为1时，表示不透明，标签后的背景和图形不可见。,（5）WordWrap属性 WordWrap （显示方式）：True-垂直；False-水平（默认）。(为使WordWrap起作用，应把Autosiz

35、e设为True)例 在窗体上，放置5个标签，其名称使用默认值Label1Label5，在属性窗口，按下表设置它们的属性,（4）AutoSize属性AutoSize属性确定标签是否会随标题内容的多少自动变化。如果值为True，则随Caption内容的大小自动调整控件本身的大小，且不换行；如果值为False，表示标签的尺寸不能自动调整，超出尺寸范围的内容不予显示。,设置后各标签的显示如图,例：建立一个Label控件和Command控件，按下表设计时设置属性。加入如下代码，运行程序。,Private Sub Command1_Click()Label1.WordWrap = TrueLabel1.A

36、utoSize = TrueLabel1.BorderStyle = 1Label1.BackColor = &H80000014 End Sub 由运行结果可知，单击命令按钮后，标签控件可以自动适用内容，并自动换行，且加上边框，背景色为白色以突出显示文字。,二、 文本框 TextBox文本框是一个文本编辑区域，可在该区域输入，编辑和显示正文内容。 （一） 属性 1基本属性 Name、Height、Width、Top、Left、Enabled、Visible、Font，ForeColor、BackColor等与标签控件相同。 2常用属性 （1）Text文本属性在文本框中显示的正文内容存放在Te

37、xt属性中。当程序运行时，用户通过键盘输入正文内容，保存在Text属性中。文本框没有Caption属性,（2）Maxlength： 设置正文的最多字符个数, 0任意长度值。（3） MultiLine： 是否为多行,默认一行. False（4）ScrollBars： 当MultiLine为True时,该属性才有效,滚动条的形式。 0-None：无滚动条 1-Horizontal：水平滚动条2-Vertical垂直滚动条 3-Both水平和垂直滚动条。（5）Locked： 是否可被编辑属性，False，表示为可编辑。（6）PassWordChar属性设置PasswordChar属性为了掩盖文本框中

38、输入的字符。该属性的设置只有在MultiLine设为 False才有效,（7）SelStart、SelLength和SelText属性这三个属性是文本框中对文本的编辑属性。SelStart：确定在文本框选中文本的起始位置。第一字符的位置为0。若没有选择文本，则用于返回或设置文本的插入点位置。SelLength：设置或返回文本框中选定的文本字符串长度（字符个数） 。SelText：设置或返回当前选定文本中的文本字符串,如果没有字符被选中，则为空字符串 (“”)。,（二）常用事件Change ：当改变文本框的Text属性时会引发该事件。输入一个字符，就会触发一次Change事件。 LostFocu

39、s ： 当控件失去焦点时发生。GotFocus ： 当控件获得焦点时发生。,（三） 常用方法 文本框最有用的方法是：SetFocus，使用形式：对象.SetFocus功能： 是把光标移到指定的文本框对象中。例题,接收键盘或鼠标的能力,焦点只能移到可视且可用的窗体或控件中，即其 Enabled 和 Visible 属性都设置为 True 时才能接收焦点,*例1：设置一个文本框，赋值字符串，使用数据输入函数指定需要查找的文本，然后查找该文本并在找到后选中它。Private Sub Form_Load() Text1.Text = “Two of the peak human experiences

40、“ Text1.Text = Text1.Text & “ are good food and classical music.“ End Sub - Private Sub Command1_Click() Dim Search, Where 声明变量。 获取需要查找的字符串。 Search = InputBox(“输入希望查找的字符串:“) Where = InStr(Text1.Text, Search) 在文本中查找字符串。 If Where Then 如果找到Text1.SelStart = Where - 1 设置选定的起始位置并Text1.SelLength = Len(Sear

41、ch) 设置选定的长度。 ElseMsgBox “找不到指定的字符串.“ 给出通知。 End If Text1.SetFocus 设置焦点到文本框 End Sub,三.命令按钮CommandButton接受用户输入的命令.输入命令可以有三种方式:（1）鼠标单击；（2）按Tab键焦点跳转到该按钮, 再按回车键；（3） 快捷键（Alt+有下划线的字母） （一）属性 1基本属性 Name、Height、Width、Top、Left、Enabled、Visible、Font等与窗体的使用相同。 2常用属性 （1）Caption: 标题属性命令按钮显示的内容，可在某字母前加 “&“设置快捷键。例如： &

42、Ok ,显示 Ok,（2） Default：确认属性（逻辑值），设置为True时，按Enter键相当于用鼠标器单击了该按钮。注意：在一个窗体只能的一个按钮的Default设置为Ture （3）Cancel:取消功能属性（逻辑值），当设置为Ture时，程序运行时按Esc键与单击此命令按钮的效果相同。注意：在一个窗体只能的一个按钮的Cancel设置为Ture （4）Value: 检查该按钮是否按下. 该属性在设计时无效. （5）Style : 确定显示的形式. 0 只能显示文字, 1 文字、图形均可 。 （6）Picture : 按钮可显示图片文件(.bmp和.Ico)，只有当Style属性值为1

43、时有效 （7）ToolTipText ：设置工具提示，和Picture结合使用。 （二）方法、事件 Move、Setfocus方法； 单击事件Click,例:1、在窗体上画一个文本框和一个命令按钮（按钮的标题设置为“显示信息”），运行时点击命令按钮，在窗体内显示“AAAAAAA”，在文本框内显示“BBBBBB”。 2、 在窗体上画一个文本框和一个命令按钮，运行时点击命令按钮使文本框位于窗体的左上角，同时文本框内显示“欢迎使用”的信息。,2.6 vb工程的管理,新建工程 打开工程：使用菜单中的“文件/打开工程”，在“最新”选项卡中，可以选择最近使用过的工程文件，也可以直接使用“现存”选项卡找到要

44、打开的工程文件。然后可对打开的程序修改。 保存工程：在关闭VB时，系统提醒您保存文件。 保存窗体文件：将窗体文件保存在指定的位置。 保存工程文件：将工程文件保存在指定的位置。它的保存在本工程的所有文件保存后最后保存。 保存其他文件：如果有模块文件、类模块文件和其他文件需要保存，也应该同样保存。 保存工程组文件：如果是工程组，则在所有工程保存完毕，再将工程组文件保存在指定的位置。 也可以使用菜单中的“文件/另存为”将文件存储为其他名称 程序的运行 解释运行：在菜单的“运行/启动”的执行可以运行正在修改的工程。一旦开始运行，也可以使用“中断”来中断程序的运行，在中断后，可以使用“继续”使程序继续运

45、行。“结束”将结束程序的运行。 生成可执行文件：一般来讲，提交给用户的程序是可执行文件(.exe)。使用菜单中的“文件/生成*.exe文件”可以将源程序文件编译成扩展名为exe的可执行文件，在生成之前需要我们指定exe文件的文件名字。 添加、删除文件 设置启动窗体,工程环境的设置：可以使用菜单的“工具/选项”打开对话框，对编辑器进行设置编辑器选项卡的设置： 代码编辑器是一个窗口，它有很多功能便于编写程序。可以使用菜单的“工具/选项”打开对话框，对编辑器进行设置。 代码设置： 自动语法检测 要求变量声明：要求所有变量一定要先声明，再使用。标准模块中在声明部分中增加下面的命令： Option Ex

46、plicit 语句必须写在模块的所有过程之前。 如果模块中使用了 Option Explicit，则必须使用 Dim、Private、Public、ReDim 或 Static 语句来显式声明所有的变量。如果使用了未声明的变量名在编译时间会出现错误。,自动列出成员：当输入代码时，自动列出本语句或方法的成员信息。 自动显示快速信息：当输入代码时，自动列出函数的参数信息。 自动显示数据提示：当光标位于一个变量上，自动显示变量的值。 自动缩进：后一行代码以前一行代码的缩进位置为起点。 Tab宽度：设置制表符宽度。 窗口设置 编辑时可拖放文本：可从代码窗口向立即窗口或监视窗口拖放代码。 缺省为整个模块查阅：同时查看多个过程。和“全模块查看”按钮功能相同。 过程分隔符：每个过程之间有一行线。,VB工程结构,1、标准模块 标准模块也称为全局模块，有全局变量声明、模块层声明及通用过程等几部分组成。 2、窗体模块 窗体模块包括声明部分、通用过程部分、事件过程部分。 3、Sub Main过程 在含有多个窗体或多个工程的应用程序中，有时候需要在调用窗体前进行初始化操作，这就需要先运行一个特定的过程，在VB中这一过程称为启动过程，命名为Sub Main。 在“工程”菜单中的“工程属性”中可以设置最先启动的窗体，也可以设置为Sub Main。 注意：Sub Main过程必须在标准模块中声明。,