1、11/29/20221VBVB程序设计基础程序设计基础 课程安排课程安排（总学时（总学时1616周周 9696节课节课=教学教学64+64+实验实验3232）（实际教学（实际教学6060，机动，机动4 4）第第1 1章章 集成开发环境和程序设计入门集成开发环境和程序设计入门 （4 4）第第2 2章章 基本数据类型及运算类型（基本数据类型及运算类型（3 3）第第3 3章章 程序控制结构（程序控制结构（7 7）第第4 4章章 常用标准控件（常用标准控件（3 3）第第5 5章章 数组与类型（数组与类型（4 4）第第6 6章章 过程（过程（5 5）第第7 7章章 菜单与对话框（菜单与对话框（3 3）第
2、第8 8章章 多重窗体与环境应用（多重窗体与环境应用（2 2）第第9 9章章 键盘与鼠标事件过程（键盘与鼠标事件过程（2 2）第第1010章章 文件（文件（3 3）11/29/20222第1章 集成开发环境和程序设计入门 1.1 VB1.1 VB的发展和功能特点的发展和功能特点 1.2 VB1.2 VB集成开发环境集成开发环境 1.3 1.3 对象与事件驱动编程机制对象与事件驱动编程机制 1.4 1.4 常见常见VBVB对象及其属性、方法和事件对象及其属性、方法和事件 1.5 1.5 可视化编程的基本步骤可视化编程的基本步骤 1.6 VB1.6 VB源程序的格式与文件组成源程序的格式与文件组成
3、 1.7 1.7 简单程序实例简单程序实例 11/29/202231.1 VB1.1 VB的发展和功能特点的发展和功能特点 1.1.1 VB1.1.1 VB的发展的发展 VB(VB(即即Visual BasicVisual Basic的简称的简称),),有两次大的变革飞跃：有两次大的变革飞跃：（1 1）从）从Basic Visual BasicBasic Visual Basic是一次大的飞跃是一次大的飞跃（Visual BasicVisual Basic经历了多种版本：经历了多种版本：1.01.0、2.02.0、3.03.0、4.04.0、5.05.0、6.06.0版本）。版本）。（2 2）
4、VB 6.0 VB 6.0 目前的目前的VB.NetVB.Net。本书学习本书学习VB 6.0VB 6.0 ，它普及流行、经久不衰。，它普及流行、经久不衰。11/29/202241.1.2 VB的功能特点 例1-1 程序的界面（窗体）上有4个命令按钮及1个标签等5个控件对象。其中，标有“左移”、“右移”字样的按钮被单击时，分别控制标签向左、向右移动一步；而单击标有“变色”字样的按钮时，标签的文字颜色发生变化；而单击标有“退出”字样的按钮时，程序退出运行状态。（运行界面如下图）。例1-1 程序界面11/29/202251.1.2 VB的功能特点1.1.具有具有面向对象面向对象的可视化设计工具的可
5、视化设计工具2.2.事件驱动事件驱动的编程机制的编程机制3.3.提供了易学易用的应用程序集成开发环境提供了易学易用的应用程序集成开发环境4.4.结构化的程序设计语言结构化的程序设计语言5.5.其它：其它：支持多种数据库系统的访问、支持多种数据库系统的访问、ActiveActive技术、网技术、网络功能、完备的络功能、完备的helphelp联机帮助功能。联机帮助功能。11/29/202261.2 VB1.2 VB集成开发环境集成开发环境 启动启动VB，新建标准，新建标准EXE工程，进入集成开发环境界面：工程，进入集成开发环境界面：窗体窗口窗体窗口代码窗口代码窗口工具箱工具箱工程窗口工程窗口属性窗
6、口属性窗口立即窗口立即窗口窗体布局窗体布局VB集成开发环境界面图集成开发环境界面图常规部分常规部分11/29/202271.2 VB1.2 VB集成开发环境集成开发环境1.2.1 1.2.1 常规组成部分常规组成部分 Visual Basic Visual Basic 程序，也跟其他程序，也跟其他WindowsWindows应用程序一样，应用程序一样，具有具有标题栏标题栏、菜单栏菜单栏、工具栏工具栏这些常规组成部分。这些常规组成部分。1.1.标题栏标题栏：“Microsoft Visual Basic Microsoft Visual Basic 设计设计”内容。内容。2.2.菜单栏菜单栏：提
7、供了编辑、设计和调试：提供了编辑、设计和调试VBVB应用程序所需要应用程序所需要的菜单命令。的菜单命令。3.3.工具栏工具栏：是一些菜单命令的快捷按钮。：是一些菜单命令的快捷按钮。11/29/202281.1.窗体窗体(form)(form)窗口窗口 要设计的要设计的vbvb程序界面。程序界面。2.2.代码代码(code)(code)窗口窗口 用来编辑窗体、标准模块中的程序代码。用来编辑窗体、标准模块中的程序代码。3.3.工具箱工具箱(toolbox)(toolbox)窗口窗口 包含建立应用程序所需要的内部控件（标准控件）包含建立应用程序所需要的内部控件（标准控件）。4.4.工程资源管理器工程
8、资源管理器(project expror)(project expror)窗口窗口 保存一个应用程序所有的文件。保存一个应用程序所有的文件。5.5.属性属性(properties)(properties)窗口窗口 所有窗体或控件的属性设置。所有窗体或控件的属性设置。6.6.其他窗口其他窗口立即窗口立即窗口：调试程序用：调试程序用 。窗体布局窗口窗体布局窗口：用于指定程序运行时的初始位置。：用于指定程序运行时的初始位置。1.2.2 VB61.2.2 VB6特有组成部分特有组成部分11/29/202291.3 1.3 对象与事件驱动编程机制对象与事件驱动编程机制 1.3.1 1.3.1 类和对象的
9、概念类和对象的概念 1.1.对象对象 对象是具有某些特性的具体事务的抽象。对象是具有某些特性的具体事务的抽象。如一个具体的人、一个具体的动物、一辆具体的车、如一个具体的人、一个具体的动物、一辆具体的车、等等，都是生活中所指的一个对象。等等，都是生活中所指的一个对象。2.2.类类类是同种对象的集合与抽象。类是同种对象的集合与抽象。如所有的人构成人类。如所有的人构成人类。3.3.类和对象的关系类和对象的关系类是创建对象实例的模板，而对象是类的一个实例。类是创建对象实例的模板，而对象是类的一个实例。4.4.对象的三要素对象的三要素 描述其特征的描述其特征的属性属性；反映其动作的行为（称作；反映其动作
10、的行为（称作方法方法）；）；还有在一定条件下发生的还有在一定条件下发生的事件事件。11/29/2022101.3.2 VB1.3.2 VB对象的基本操作对象的基本操作1.1.控件对象的建立控件对象的建立 建立一个对象即指在程序窗体中添加一个对象建立一个对象即指在程序窗体中添加一个对象(画出对象画出对象)。方法有一：单击工具箱中一个对象类，出现十字形鼠标指针，方法有一：单击工具箱中一个对象类，出现十字形鼠标指针，用该指针在窗体上用该指针在窗体上拖曳鼠标拖曳鼠标即可即可画出画出一个控件对象；一个控件对象；方法有二：方法有二：双击双击工具箱中一个对象类，即可加入一个该类控工具箱中一个对象类，即可加入
11、一个该类控件对象。件对象。2.2.控件对象的命名：控件对象的命名：任何控件对象都具有一个最基本的属性，即任何控件对象都具有一个最基本的属性，即“名称名称”属性属性；“名称名称”属性的值就是该对象的名称属性的值就是该对象的名称。注意：注意：在同一个程序中，每个对象的名称必须不同在同一个程序中，每个对象的名称必须不同。11/29/2022111.3.2 VB1.3.2 VB对象的基本操作对象的基本操作3.3.控件对象的选定控件对象的选定单击一个对象可选定一个对象，这时该对象周围会出现八个方向单击一个对象可选定一个对象，这时该对象周围会出现八个方向的控制柄的控制柄(即八个小方块点即八个小方块点)。要
12、同时选定多个对象，有二法：。要同时选定多个对象，有二法：（1 1）拖动鼠标指针，将欲选定对象包含在一个虚框内既可。）拖动鼠标指针，将欲选定对象包含在一个虚框内既可。（2 2）先选定一个对象，按）先选定一个对象，按CtrlCtrl键，再单击其他要选定的对象。键，再单击其他要选定的对象。4.4.控件对象的复制和删除控件对象的复制和删除 （1 1）复制对象：）复制对象：选定选定要复制的对象，单击要复制的对象，单击“复制复制”，再单击，再单击“粘贴粘贴”；这时会出现一个对话框询问是否建立控件数组，单；这时会出现一个对话框询问是否建立控件数组，单击击“否否”，于是就复制出一个大小、标题相同，但名称不同的
13、对，于是就复制出一个大小、标题相同，但名称不同的对象。象。（2 2）删除对象：选中要删除的对象，再按）删除对象：选中要删除的对象，再按DelDel键或键或DeleteDelete键。键。11/29/2022121.3.3 1.3.3 事件驱动编程机制事件驱动编程机制两个状态概念：两个状态概念：设计时：指编写设计时：指编写VBVB代码和给控件指定属性值的阶段。代码和给控件指定属性值的阶段。运行时：指启动运行程序的阶段，若程序有错误将不能继续运行时：指启动运行程序的阶段，若程序有错误将不能继续 运行下去。运行下去。1.1.使用对象的属性使用对象的属性 属性属性(Property)(Property
14、)：即反映对象特征的数据。：即反映对象特征的数据。（1 1）给对象属性设置值：）给对象属性设置值：利用属性窗口给对象属性设置值（利用属性窗口给对象属性设置值（填表方式填表方式）；）；利用程序语句给对象属性设置值（利用程序语句给对象属性设置值（代码方式代码方式），格式为：），格式为：对象名对象名.属性名属性值属性名属性值 11/29/2022131.3.3 1.3.3 事件驱动编程机制事件驱动编程机制1.1.使用对象的属性使用对象的属性（2 2）引用对象的属性值：）引用对象的属性值：指在代码中将对象的当前属性值作为已知值使用。形式：指在代码中将对象的当前属性值作为已知值使用。形式：对象名对象名.
15、属性名属性名 举例：举例：Label2.Caption=Label1.CaptionLabel2.Caption=Label1.Caption 引用引用Label1Label1的标签属性，用它设置的标签属性，用它设置Label2Label2的标签属性的标签属性 Print Label1.HeightPrint Label1.Height 引用引用Label1Label1的高度属性，将它打印出来的高度属性，将它打印出来11/29/2022141.3.3 1.3.3 事件驱动编程机制事件驱动编程机制2.2.使用对象的方法使用对象的方法方法方法(Method)(Method)：是描述对象行为的过程。
16、：是描述对象行为的过程。使用对象方法的一般语法格式：使用对象方法的一般语法格式：对象名对象名.方法名方法名 参数列表参数列表 比较：比较：对象方法的使用格式与属性相似，都是对象名和方法名之间加点；对象方法的使用格式与属性相似，都是对象名和方法名之间加点；不同的是，方法的使用多数都带有参数。不同的是，方法的使用多数都带有参数。举例：举例：Form1.Print Form1.Print 欢迎使用欢迎使用VBVB （对（对Form1Form1对象使用对象使用PrintPrint方法）方法）Print Print 欢迎使用欢迎使用VBVB (对当前对象使用对当前对象使用PrintPrint方法方法,可
17、省对象可省对象名名)11/29/2022151.3.3 1.3.3 事件驱动编程机制事件驱动编程机制3.3.使用对象的事件使用对象的事件 事件：事件是指窗体或控件能识别的活动，通俗点讲就是是指事件：事件是指窗体或控件能识别的活动，通俗点讲就是是指当前发生的事情。事件发生在用户与应用程序交互时。当前发生的事情。事件发生在用户与应用程序交互时。如：单击控件、键盘输入、移动鼠标等，都是一些事件。如：单击控件、键盘输入、移动鼠标等，都是一些事件。部分事件由系统产生，不需要用户激发。如：计时器事件、程部分事件由系统产生，不需要用户激发。如：计时器事件、程序启动时窗体加载事件等。序启动时窗体加载事件等。V
18、BVB为每个对象预定义了若干事件为每个对象预定义了若干事件,这些事件对象能识别。这些事件对象能识别。一个事件对应一个事件处理子程序，事件处理子程序的格式：一个事件对应一个事件处理子程序，事件处理子程序的格式：Sub Sub 对象名对象名_ _事件名事件名()()用户编写的处理代码用户编写的处理代码 (也可不写任何代码也可不写任何代码 )End Sub End Sub 11/29/2022161.3.3 1.3.3 事件驱动编程机制事件驱动编程机制3.3.使用对象的事件使用对象的事件 常见事件处理子程序常见事件处理子程序及其功能：及其功能：1)Form_1)Form_LoadLoad()()：当
19、窗体加载时应做何响应。：当窗体加载时应做何响应。2)xxx_2)xxx_ClickClick()()：当用户在：当用户在xxxxxx对象上单击鼠标时应做何响应。对象上单击鼠标时应做何响应。3)Form_Paint()3)Form_Paint()：当窗体由于要重画时应做何响应。：当窗体由于要重画时应做何响应。4)xxx_4)xxx_TimerTimer()()：当：当xxxxxx定时器的定时间隔到时，应做何响应。定时器的定时间隔到时，应做何响应。6)xxx_6)xxx_ChangeChange()()：当：当xxxxxx文本框中内容发生变化时系统应做何响应。文本框中内容发生变化时系统应做何响应。
20、5)Form_5)Form_MouseDownMouseDown():():当用户在窗体上按下鼠标键时，应做何响应。当用户在窗体上按下鼠标键时，应做何响应。7)Form_7)Form_MouseMoveMouseMove()()：当鼠标在窗体上移动时应做何响应。：当鼠标在窗体上移动时应做何响应。括号中有省略号的，表示省写了一些参数。括号中有省略号的，表示省写了一些参数。说明：对一个具体程序，只要填写程序所关心的部分事件处理程序的代码。说明：对一个具体程序，只要填写程序所关心的部分事件处理程序的代码。而对于那些不感兴趣的事件不填写事件的处理代码。而对于那些不感兴趣的事件不填写事件的处理代码。11
21、/29/2022171.3.3 1.3.3 事件驱动编程机制事件驱动编程机制4.4.事件驱动程序的机制事件驱动程序的机制 （1 1）应用程序基于对象组成；）应用程序基于对象组成；（2 2）每个对象都有预先定义的事件；）每个对象都有预先定义的事件；（3 3）每个事件的发生都依赖于一定的条件每个事件的发生都依赖于一定的条件(即用户的驱动等即用户的驱动等););（3 3）每个事件发生后系统该做何反映则取决于用户给该事件过每个事件发生后系统该做何反映则取决于用户给该事件过 程编写了什么代码。程编写了什么代码。核心机制：核心机制：由用户控制事件的发生，而代码做出响应。由用户控制事件的发生，而代码做出响应
22、。与过程式程序的比较：与过程式程序的比较：过程程序设计过程程序设计-流程完全取决于代码。流程完全取决于代码。事件驱动程序事件驱动程序-流程掌握在运行时用户的控制中。流程掌握在运行时用户的控制中。11/29/2022181.3.3 1.3.3 事件驱动编程机制事件驱动编程机制例例1-2 1-2 设计一个界面如图所示的程序。设计一个界面如图所示的程序。各对象的名称：各对象的名称：窗体对象：窗体对象：frmTimefrmTime；三个命令按钮对象：三个命令按钮对象：cmdRedcmdRed、cmdBluecmdBlue、cmdExitcmdExit；标签对象：默认名称。标签对象：默认名称。设置各对象
23、的字体和设置各对象的字体和CaptionCaption属性：属性：字体属性全用属性表设置；三个命令按钮对象的字体属性全用属性表设置；三个命令按钮对象的CaptionCaption属性用属性表设置；属性用属性表设置；标签的标签的CaptionCaption属性则用语句设置属性则用语句设置(用到一个用到一个VBVB内部函数内部函数NowNow获取系统时间获取系统时间)。编写事件处理代码：编写事件处理代码：只对只对 cmdRedcmdRed按钮、按钮、cmdExitcmdExit按钮的单击事件处理程序写代码。按钮的单击事件处理程序写代码。例1-2 界面图11/29/2022191.4 1.4 常见常
24、见VBVB对象及其属性、方法和事件对象及其属性、方法和事件1.4.1 1.4.1 窗体对象及其属性、方法、事件窗体对象及其属性、方法、事件窗体是一个特殊的控件对象，它是其它控件的容器（或称载体）。窗体是一个特殊的控件对象，它是其它控件的容器（或称载体）。窗体的常用属性窗体的常用属性（1 1）名称属性名称属性：窗体对象的：窗体对象的名字名字，供程序中引用、称呼。，供程序中引用、称呼。运行后不能更改其值运行后不能更改其值。（2 2）CaptionCaption属性属性：字符型值，是窗体的：字符型值，是窗体的标题标题栏内容。栏内容。（3 3）BorderStyleBorderStyle属性属性：用于
25、设置窗体的：用于设置窗体的边框式样边框式样。运行后更改其值没有效果运行后更改其值没有效果。可取值为可取值为0 05 5的整数，其中最常用的值有两个：的整数，其中最常用的值有两个：2-Sizable2-Sizable：可修改窗体尺寸的普通窗体：可修改窗体尺寸的普通窗体形式形式。3-FixedDialog3-FixedDialog：不能修改窗体尺寸的对话框形式。：不能修改窗体尺寸的对话框形式。11/29/2022201.4.1 1.4.1 窗体对象及其属性、方法、事件窗体对象及其属性、方法、事件1.1.窗体的常用属性窗体的常用属性（4 4）Top,LeftTop,Left；Width,Height
26、Width,Height属性：属性：TopTop和和LeftLeft确定窗体确定窗体的位置，分别表示该窗体相对于父窗体或屏幕的左边、的位置，分别表示该窗体相对于父窗体或屏幕的左边、顶边的距离；为增加）。顶边的距离；为增加）。WidthWidth和和HeightHeight分别表示该窗分别表示该窗体的大小体的大小(Width(Width是宽度是宽度,Height,Height是高度是高度)。默认单位是缇。默认单位是缇。（5 5）ScaleTop,ScaleLeftScaleTop,ScaleLeft；ScaleWidth,ScaleHeightScaleWidth,ScaleHeight属属性：
27、它们分别表示该窗体工作区（即除掉边框后的内部性：它们分别表示该窗体工作区（即除掉边框后的内部区域）的位置和大小。区域）的位置和大小。2.2.窗体的常用方法窗体的常用方法（1 1）PrintPrint方法：在窗体上打印字符、数值。方法：在窗体上打印字符、数值。基本格式：基本格式：窗体名称窗体名称.Print.Print 要打印的内容要打印的内容 如：如：Form1.Print Form1.Print 欢迎来到欢迎来到;602;602;机房机房 11/29/2022211.4.1 1.4.1 窗体对象及其属性、方法、事件窗体对象及其属性、方法、事件2.2.窗体的常用方法窗体的常用方法（2 2）Cl
28、sCls方法：清除窗体上用方法：清除窗体上用PrintPrint方法打印的字符和数值方法打印的字符和数值（清屏方法）。（清屏方法）。一般格式：一般格式：窗体名称窗体名称.Cls.Cls如：如：Form1.ClsForm1.Cls（Form1Form1清屏），清屏），ClsCls（当前窗体清屏）。（当前窗体清屏）。3.3.窗体的常用事件窗体的常用事件（1 1）LoadLoad事件事件：当窗体加载到内存时发生。：当窗体加载到内存时发生。该事件处理过程框架形式为：该事件处理过程框架形式为：Private Sub Form_Load()Private Sub Form_Load()加载窗体时要执行的语
29、句加载窗体时要执行的语句,常把初始化代码放在此处常把初始化代码放在此处End SubEnd Sub11/29/2022221.4.1 1.4.1 窗体对象及其属性、方法、事件窗体对象及其属性、方法、事件3.3.窗体的常用事件窗体的常用事件（2 2）Resize Resize 事件事件：当窗体改变其尺寸时发生。该事件处：当窗体改变其尺寸时发生。该事件处理过程框架形式为：理过程框架形式为：Private Sub Form_Resize()Private Sub Form_Resize()当窗体改变其尺寸时要执行的语句放在此处，常在当窗体改变其尺寸时要执行的语句放在此处，常在此处写修改其它控件尺寸的
30、语句此处写修改其它控件尺寸的语句End SubEnd Sub 11/29/2022231.4.2 1.4.2 按钮对象及其属性、方法、事件按钮对象及其属性、方法、事件1.1.按钮的常用属性按钮的常用属性(1)Name(1)Name（名称）属性：按钮的名字。（名称）属性：按钮的名字。(2)(2)CaptionCaption属性：按钮的标题内容属性：按钮的标题内容,表示按钮所显示的内容。表示按钮所显示的内容。(3)(3)LeftLeft、TopTop，WidthWidth、HeightHeight属性：属性：(Left,Top)(Left,Top)描述按钮描述按钮相对于其容器窗体的坐标位置；相对于
31、其容器窗体的坐标位置；(Width,Heigh)(Width,Heigh)描述按钮的描述按钮的大小（宽度、高度）。其意义见下列示意图大小（宽度、高度）。其意义见下列示意图 。控件位置、大小属性示意图控件位置、大小属性示意图Width HeightLeft(0,0)Top11/29/2022241.4.2 1.4.2 按钮对象及其属性、方法、事件按钮对象及其属性、方法、事件1.1.按钮的常用属性按钮的常用属性(4)Font(4)Font系列属性：决定按钮表面文字的格式，含子属性：系列属性：决定按钮表面文字的格式，含子属性：FontName(FontName(字体字体)：值为字符型。可以指定为：值
32、为字符型。可以指定为 宋体宋体、黑体黑体 之类的名称。之类的名称。FontSize(FontSize(字号字号)：值为整数。值越大，字越大。：值为整数。值越大，字越大。FontBold(FontBold(是否加粗是否加粗)：值为逻辑型。设为：值为逻辑型。设为TrueTrue时加粗；设为时加粗；设为FalseFalse不加粗。不加粗。FontItalic(FontItalic(是否倾斜是否倾斜)：值为逻辑型。设为：值为逻辑型。设为TrueTrue时倾斜；设为时倾斜；设为FalseFalse不倾不倾斜。斜。FontStrikethru(FontStrikethru(是否加删除线是否加删除线)：值为
33、逻辑型。设定值为：值为逻辑型。设定值为TrueTrue时，加删除时，加删除线；为线；为FalseFalse时不加删除线。时不加删除线。FontUnderline(FontUnderline(是否加下划线是否加下划线)：值为逻辑型。设定值为：值为逻辑型。设定值为TrueTrue时，加下划时，加下划线；为线；为FalseFalse时不加下划线。时不加下划线。11/29/2022251.4.2 1.4.2 按钮对象及其属性、方法、事件按钮对象及其属性、方法、事件1.1.按钮的常用属性按钮的常用属性(5)(5)ForecolorForecolor属性：前景颜色，即标题文字的颜色。颜色值属性：前景颜色，
34、即标题文字的颜色。颜色值的表示方式有几种：的表示方式有几种：系统常量（如系统常量（如vbRedvbRed、vbBluevbBlue等）；等）；调调色板函数色板函数RGB(RGB(红红,绿绿,蓝蓝)；QBColorQBColor函数函数；十六进制整数。；十六进制整数。(6)(6)VisibleVisible属性：对象可见性，值为逻辑型。设定值为属性：对象可见性，值为逻辑型。设定值为TrueTrue时，对象可见；设定值为时，对象可见；设定值为FalseFalse时对象不可见。时对象不可见。2.2.按钮的常用方法按钮的常用方法 SetFocusSetFocus方法：将焦点移至指定的按钮，使指定的按钮
35、被选方法：将焦点移至指定的按钮，使指定的按钮被选中（被激活、获得焦点）。中（被激活、获得焦点）。语法格式：语法格式：object.SetFocusobject.SetFocus 这里，这里，objectobject所在处应换成具体按钮对象的名称。所在处应换成具体按钮对象的名称。SetFocus SetFocus 方法也可用于其它可视的窗体或控件对象。方法也可用于其它可视的窗体或控件对象。11/29/2022261.4.2 1.4.2 按钮对象及其属性、方法、事件按钮对象及其属性、方法、事件3.3.按钮的常用事件按钮的常用事件（1 1）Click()Click()事件：当鼠标单击按钮时发生。事件
36、：当鼠标单击按钮时发生。其事件处理过程的形式为：其事件处理过程的形式为：Private Sub CommandX_Click()CommandXPrivate Sub CommandX_Click()CommandX处是按钮的名字处是按钮的名字 此处写响应该事件的处理代码此处写响应该事件的处理代码End SubEnd Sub（2 2）DblClick()DblClick()事件：用鼠标左键双击按钮控件时发生。其事事件：用鼠标左键双击按钮控件时发生。其事件处理过程的形式为：件处理过程的形式为：Private Sub Form_DblClick()Private Sub Form_DblClick
37、()此处写响应该事件的处理代码此处写响应该事件的处理代码End Sub End Sub 11/29/2022271.4.3 1.4.3 文本框对象及其属性、方法、事件文本框对象及其属性、方法、事件1.1.文本框的常用属性文本框的常用属性（1 1）名称属性：字符类型的值，是文本框的名字。）名称属性：字符类型的值，是文本框的名字。（2 2）TextText属性属性：字符类型的值，是文本框内显示的内容。：字符类型的值，是文本框内显示的内容。（3 3）LeftLeft、TopTop，WidthWidth、HeightHeight属性：同前述。属性：同前述。（4 4）FontFont系列属性：同前述。系
38、列属性：同前述。（5 5）ForecolorForecolor属性：同前述。属性：同前述。（6 6）VisibleVisible属性：同前述。属性：同前述。（7 7）MultiLineMultiLine属性属性：其值只能取逻辑值（：其值只能取逻辑值（TrueTrue或或FalseFalse），），该属性的作用是决定文本框能否显示多行文本（默认值是该属性的作用是决定文本框能否显示多行文本（默认值是FalseFalse：不能显示多行文字）。：不能显示多行文字）。11/29/2022281.4.3 1.4.3 文本框对象及其属性、方法、事件文本框对象及其属性、方法、事件1.1.文本框的常用属性文本框
39、的常用属性（8 8）ScrollBarsScrollBars属性：该属性的作用是决定文本框中是否有滚属性：该属性的作用是决定文本框中是否有滚动条。可以取值动条。可以取值0 0NoneNone：（默认值）无滚动条；：（默认值）无滚动条；1 1HorizontalHorizontal：仅有水：仅有水平滚动条；平滚动条；2 2VerticalVertical：仅有垂直滚动条；：仅有垂直滚动条；3 3BothBoth：有两种滚动条。：有两种滚动条。说明：对于说明：对于ScrollBarsScrollBars的属性设置值为的属性设置值为1 1、2 2、3 3的的TextBoxTextBox控件，必须将控
40、件，必须将MultiLineMultiLine属性设置为属性设置为TrueTrue滚动条才会出现。滚动条才会出现。（9 9）AlignmentAlignment属性：该属性的作用是决定文本框中文字的对其属性：该属性的作用是决定文本框中文字的对其方式。可以取值方式。可以取值0 0、1 1和和2 2，意义分别为：，意义分别为：0 0Left JustifyLeft Justify：（默认值）文本左对齐；：（默认值）文本左对齐；1 1Right JustifyRight Justify：右对齐；：右对齐；2 2CenterCenter：居中。：居中。11/29/2022291.4.3 1.4.3 文
41、本框对象及其属性、方法、事件文本框对象及其属性、方法、事件1.1.文本框的常用属性文本框的常用属性（1010）PasswordCharPasswordChar属性：返回或设置一个值，该值指示所属性：返回或设置一个值，该值指示所键入的字符在键入的字符在TextBoxTextBox控件中的显示形式。控件中的显示形式。语法格式：语法格式：Object.PasswordChar =valueObject.PasswordChar =value其中：其中：ObjectObject处为文本框的名称处为文本框的名称;value value 为显示的字符为显示的字符。为了创建一个密码输入文本框，则应该使用此属
42、性。如大多数基于为了创建一个密码输入文本框，则应该使用此属性。如大多数基于WindowsWindows的应用程序使用星号的应用程序使用星号(*)即即Chr(42)Chr(42)，（Chr(42)Chr(42)代表代表ASCIIASCII码为码为4242的那的那个字符）个字符）。此属性不影响此属性不影响TextText属性；属性；TextText准确地包括所键入或代码中所设置的内容。准确地包括所键入或代码中所设置的内容。将将 PasswordCharPasswordChar设置成长度为设置成长度为0 0的字符串的字符串()()（缺省值），将显示实际的文本。（缺省值），将显示实际的文本。能够将任意
43、字符串赋予此属性，但只有第一个字符是有效的，所有其它的能够将任意字符串赋予此属性，但只有第一个字符是有效的，所有其它的字符将被忽略。字符将被忽略。如果如果MultiLineMultiLine属性被设为属性被设为TrueTrue，那么，那么PasswordCharPasswordChar属性将不起作用。属性将不起作用。11/29/202230 例如：试在窗体中画一个文本框和按钮例如：试在窗体中画一个文本框和按钮(名称取默认值名称取默认值)，将，将文本框的文本框的PasswordCharPasswordChar属性设为属性设为*符号，符号，在按钮单击事件处理在按钮单击事件处理程序中加入如下代码：程
44、序中加入如下代码：Print Text1.TextPrint Text1.Text 程序运行时在文本框中输入任意字符，然后单击按钮，观察程序运行时在文本框中输入任意字符，然后单击按钮，观察文本框中输入的字符和看到的字符有何区别。文本框中输入的字符和看到的字符有何区别。1.4.3 1.4.3 文本框对象及其属性、方法、事件文本框对象及其属性、方法、事件2.2.文本框的常用方法文本框的常用方法SetFocusSetFocus方法：将焦点移至文本框方法：将焦点移至文本框(也即置插入点也即置插入点)。语法格式：语法格式：object.SetFocusobject.SetFocus这里，这里，objec
45、tobject所在处代表文本框对象的名称。所在处代表文本框对象的名称。11/29/2022311.4.3 1.4.3 文本框对象及其属性、方法、事件文本框对象及其属性、方法、事件3.3.文本框的常用事件文本框的常用事件(1)(1)GetFocus()GetFocus()事件事件：当文本框获得焦点时产生该事件当文本框获得焦点时产生该事件。其事件处理过程的形式为：其事件处理过程的形式为：Private Sub TextName_GotFocus()Private Sub TextName_GotFocus()这里填写文本框获得焦点时要执行的语句这里填写文本框获得焦点时要执行的语句End SubEn
46、d Sub(2)(2)Change()Change()事件事件：改变文本框的内容时发生改变文本框的内容时发生。其事件处理过程的形式为：其事件处理过程的形式为：Private Sub TextName_Change()Private Sub TextName_Change()此处写文本框内容发生变化时要执行的语句此处写文本框内容发生变化时要执行的语句End Sub End Sub 11/29/2022321.4.4 1.4.4 标签对象及其属性、方法、事件标签对象及其属性、方法、事件1.1.标签的常用属性标签的常用属性 标签的常用属性有：名称属性，标签的常用属性有：名称属性，CaptionCap
47、tion属性，属性，LeftLeft、TopTop属属性，性，WidthWidth、HeightHeight属性，属性，ForecolorForecolor属性，属性，VisibleVisible属性。属性。这些属性的含义同前面所述控件的相应属性。这些属性的含义同前面所述控件的相应属性。2.2.标签的常用方法标签的常用方法MoveMove方法：移动对象的位置并可同时改变对象的大小。方法：移动对象的位置并可同时改变对象的大小。格式：格式：Object.Move Left,Top,Width,HeightObject.Move Left,Top,Width,HeightObjectObject：可
48、选的。在这里代表标签的名称。：可选的。在这里代表标签的名称。LeftLeft：必需的。：必需的。单精度值单精度值，指示对象移到新位置的水平坐标指示对象移到新位置的水平坐标(x-(x-轴轴)。TopTop：可选的可选的。单精度值，指示。单精度值，指示对象移到新位置的对象移到新位置的垂直坐标垂直坐标(y-(y-轴轴)。WidthWidth：可选的可选的。单精度值，指示。单精度值，指示对象对象新的宽度。新的宽度。HeightHeight：可选的可选的。单精度值，指示对象新的高度。单精度值，指示对象新的高度。11/29/2022331.4.4 1.4.4 标签对象及其属性、方法、事件标签对象及其属性、
49、方法、事件3.3.标签的常用事件标签的常用事件Click()Click()事件：单击标签时发生。事件：单击标签时发生。其事件处理过程的形式为：其事件处理过程的形式为：Private Sub LabelName_Cick()LabelNamePrivate Sub LabelName_Cick()LabelName为标签的名称为标签的名称 此处写标签被单击时应执行的语句此处写标签被单击时应执行的语句End SubEnd Sub 11/29/2022341.4.5 1.4.5 标准控件的默认属性与常见的公共属性标准控件的默认属性与常见的公共属性1.1.标准控件的标准控件的默认属性默认属性 每个标准
50、控件对象都将自己一个最常用的属性作为它的默认属性。每个标准控件对象都将自己一个最常用的属性作为它的默认属性。控件的默认属性在使用时可以省略不写。控件的默认属性在使用时可以省略不写。如对文本框如对文本框Text1Text1使用其默认属性使用其默认属性TextText，以下两种写法都可以：，以下两种写法都可以：Text1.TextText1.Text 中南大学中南大学 Text1Text1 中南大学中南大学 默认属性名默认属性名TextText可以省略可以省略 常见对象的默认属性表11/29/2022351.4.5 1.4.5 标准控件的默认属性与常见的公共属性标准控件的默认属性与常见的公共属性2
