第4章 控 件 从前几章的学习中，对于控件应该有了基本的了解。控件其实就是构成应用程序的最基本的组成部分，学习Visual Basic语言，其实大部分都是在学习各类控件的用法。本章将系统深入的介绍部分常用控件的使用方法。

4.1 控件概述 控件是Visual Basic应用程序的基本组成部分，有了控件才可以方便的搭建程序界面，方便的开发应用程序。通过改变控件的属性和处理控件的事件，在Visual Basic中很快就能够编写出功能强大的应用程序。 Visual Basic的控件分为两大类，分别是标准控件和ActiveX控件。

4.2 控件的相关操作 下面介绍有关控件的操作方法，例如向窗体添加控件、调整画好的控件的尺寸、移动控件到合适的位置、复制与删除控件、用鼠标选择控件、使用工具调整多个控件的大小位置等。

4.2.1 向窗体上添加控件 向窗体上添加控件的方法与前面章节中讲到的将按钮或者将文本框添加到窗体上的方法一致。主要有两种： 4.2.1 向窗体上添加控件 向窗体上添加控件的方法与前面章节中讲到的将按钮或者将文本框添加到窗体上的方法一致。主要有两种： 在工具箱中点击控件，将鼠标放到窗体的适当位置后，按下鼠标左键，不松开，然后拖拽，直到控件大小合适的时候，再松开左键。 双击工具箱中的控件，也能将控件添加到窗体上。

4.2.2 调整控件的大小 调整已经画到窗体上的控件大小的方法如下： （1）用鼠标单击该控件选中它。 4.2.2 调整控件的大小 调整已经画到窗体上的控件大小的方法如下： （1）用鼠标单击该控件选中它。 （2）将鼠标放到该控件周边的八个小方块中的任一方块上。 （3）当鼠标变为双箭头时，按住左键不要松开，然后拖拽。 （4）感觉大小合适时松开鼠标左键。

4.2.3 移动控件到合适的位置 在设计界面时，经常遇到移动控件到新的位置上的情况。移动控件的方法如下： （1）将鼠标箭头放到该控件内部。 4.2.3 移动控件到合适的位置 在设计界面时，经常遇到移动控件到新的位置上的情况。移动控件的方法如下： （1）将鼠标箭头放到该控件内部。 （2）按住鼠标左键不要松开，将其拖拽的合适的位置。 （3）松开鼠标左键。

4.2.4 复制与删除控件 将窗体界面上的多余控件删除掉的方法为：（具体内容请参照本书）

4.2.5 选择控件 前面讲述的操作都基于单个控件，有时，可能需要对多个控件进行操作，例如移动多个控件、删除多个控件、对多个控件设置相同的属性等。为了对多个控件进行操作，必须先选择需要操作的控件，这通常有两种方法。第一种方法：按住Shift键，不要松开，然后单击每个要选择的控件。被选择的每个控件的周围有8个方块。第二种方法：把鼠标移到窗口中适当的位置（没有控件的地方），然后拖动鼠标画出一个虚线矩形，在该矩形内的控件（包括边线所经过的控件）即被选择。

4.2.6 使用格式菜单调整控件布局 当一个窗体中有多个控件时，会需要调整控件的布局，例如对齐控件、统一控件的尺寸或者调整控件之间的距离等。用手动调整不仅速度慢而且达到的效果也不会很好。Visual Basic为此给用户提供了一些调整布局的功能。这些功能可以从“格式”菜单中找到，例如“对齐”菜单可以使选中的控件用各种对齐方式对齐，“统一尺寸”菜单可以统一选中控件的大小等。

4.3 输入输出函数 输入输出对于每一个编程语言都是至关重要的。它们就像人的耳朵、眼睛和嘴巴，担任着与外界交流的重要任务。Visual Basic的输入输出有着十分丰富的内容和形式，它提供了多种手段，例如前面用过的Print方法，文本框输入输出等等。本节为了方便后面章节中使用，在此将讲授Visual Basic编程中经常用到的InputBox 和MsgBox两个输入输出函数。

4.3.1 InputBox 函数 InputBox 函数用来弹出一个输入对话框，通过该对话框用户可以输入数据，并返回输入的数据。InputBox函数的通用格式为: InputBox (prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])

4.3.2 MsgBox 函数 在Windows操作中，经常会遇到一种小对话框，例如，关闭程序时会跳出一个类似于“是否真的退出程序”提示对话框，并根据用户的选择确定其后的操作。MsgBox函数就是实现这一功能的函数。通常称MsgBox函数调用的对话框为消息框。该函数的格式如下： MsgBox(prompt[, buttons][, title][, helpfile, context])

4.3.3 MsgBox 语句 MsgBox函数也可以写成语句的形式，即： MsgBox prompt[, buttons][, title][, helpfile, context]

4.4 命令按钮 命令按钮是Visual Basic编程中使用方法最简单，但却是最常用的控件之一。它主要用来接受用户的单击响应。下面将详细讲述命令按钮最常用的属性、方法和事件。

4.4.1 命令按钮的常用属性 （具体内容请参照本书）

4.4.2 命令按钮的事件 命令按钮有很多事件，但是最重要、最常用的就是以前所涉及的Click（单击）事件。该事件在用户使用鼠标单击按钮时发生，当然设置了Default和Cancel属性的按钮也可以使用回车和ESC键触发此事件。（具体内容请参照本书）

4.4.3 应用案例——计算圆的面积 （具体内容请参照本书）

4.5 标签 标签主要用来显示文本信息，通常的作用就是在窗口中显示各种操作提示，以免用户操作错误。标签也有属性、事件和方法，但是其事件和方法一般很少用到。因此下面只介绍标签的常用属性。（具体内容请参照本书）

4.6 文本框 文本框控件既可以用来输入数据，也可以用来输出数据。其作用在Visual Basic程序设计中是不可估量的。本节将详细讲述文本框控件最重要的属性、方法和事件。

4.6.1 文本框的常用属性 （具体内容请参照本书）

4.6.2 文本框的事件和方法 文本框支持Click、DblClick等鼠标事件，同时支持Change、GotFocus、LostFocus等事件。

4.6.3 应用案例——运算器 （具体内容请参照本书）

4.7 单选按钮与复选框 如图4.7所示，喜欢在网上冲浪的读者应该很熟悉类似的界面。其中，用来选择性别的控件叫做单选按钮，选择爱好的控件叫做复选框。单选按钮与复选框的主要区别是：单选按钮只能在一组选项里选择一个，如性别；复选框可以在一组选项里选择多个，也可以一个都不选，如图中的爱好。

4.7.1 单选按钮 单选按钮的常用属性有Caption、Value、Alignment和Style，常用事件有Click事件。（具体内容请参照本书）

4.7.2 复选框 复选框的常用属性和事件与单选按钮的基本上一样。只是其Value属性与单选按钮的Value属性有较大的区别。复选框的Value属性的取值范围为0、1或2。其中： 0——表示没有选择该控件。 1——表示选中了该控件。 2——表示该控件被禁止使用（以灰色显示）。（具体内容请参照本书）

4.7.3 框架 单独使用框架控件没有什么意义。其主要用途是为了将窗体上的控件分组，而且通常是为了把单选按钮分成若干组。因为不管窗体上有多少单选按钮，用户却只能选择其中的一个。但是在实际应用中有时有多组选项，希望在每组选项中各选一项，这时用框架将这些单选按钮分组就很有意义了。

4.7.4 应用案例——文本编辑器 （具体内容请参照本书）

4.8 列表框与组合框 利用列表框可以直观地选择所需要的项目，而组合框可以把一个文本框和列表框组合为一个整体控件。在编程时如果要给用户一种直观的选择，可以使用列表框；当窗体空间很紧张的时候，因为列表框会占据很大的空间，所以这时采用组合框较好。

4.8.1 列表框介绍 列表框用来让用户从中选择所需要的项目。如果有多种选项让用户选择，使用列表框是个不错的方案。比如，Word2003的“主题”对话框内，列出所有可选主题的区域就是一个列表框控件，

4.8.2 列表框的常用属性 （具体内容请参照本书）

4.8.3 列表框的方法和事件 1、AddItem（插入列表项）方法 AddItem方法用来在列表框中插入列表项。虽然在设计阶段可以通过属性窗口里的List属性向列表框内添加列表项，但是考虑到实际应用通常会用程序向列表框内添加列表项。AddItem方法的通用格式为： 列表框.AddItem 项目字符串[,索引号]（具体内容请参照本书）

4.8.4 组合框介绍 组合框可以说是列表框和一个文本框的组合。在Visual Basic的属性窗口里用到Font属性时，其弹出的“字体”对话框内选择“字体”、“字形”、“大小”和“字符集”的控件都是组合框控件，组合框解决了列表框内只能选择给定的选项而不能输入用户选项的缺点。同时组合框可以结合下拉部分，这就意味着组合框可以比普通的列表框占用更小的窗体空间。

4.8.5 组合框的属性、方法和事件 列表框的属性、方法和事件基本上都可用于组合框，此外它还有一些自己的属性和事件。

4.8.6 应用案例——计算机订购程序 【（具体内容请参照本书）

4.9 图像框（Image） 在程序界面中经常会放置一些图形图像来美化自己的界面。因此Visual Basic为用户提供了两个处理图形图像的控件，分别是图片框（PictureBox）和图像框（Image）。在工具箱中，图片框的图标为，图像框的图标为。 图像框控件用来显示图形，它可以说是图片框控件的一个缩写版，如果仅仅要显示一个图形可以选择此控件，因为该控件占用的内存很少。图像框控件最重要的属性有Picture和Stretch两个属性。

4.9.1 设置图像框中的图形 在图像框里显示图形文件，通常会用到Picture和Stretch两个属性。Picture属性用来给窗体、图片框、图像框添加图形，这些图形文件的类型可以是：位图文件（.BMP或.DIB），图标文件（.ICO或.CUR），图元文件（.WMF或.EMF），JPEG文件(.JPG)和GIF文件（.GIF）。Picture属性可以在设计阶段通过属性窗口设置，也可以在运行阶段通过LoadPicture（）函数设置。

4.9.2 使用LoadPicture函数设置图形 要在运行阶段给图像框设置图形，必须使用LoadPicture函数，LoadPicture函数的格式为： 图像框.Picture=LoadPicture(“文件名”)

4.9.3 相对路径——App.Path 上一小节LoadPicture函数中带有盘符的路径在程序设计语言里被称为绝对路径，在编程时写绝对路径是一个很不好的习惯，因为开发出来的应用程序会被安装到千万台不同的计算机上，这时谁也保证不了这些计算机的C盘下会有程序使用到的那个图形文件。因为上述原因，通常在程序里都要使用相对路径。用法如下： Imag1.Picture = LoadPicture(App.Path & " \111.jpg")

4.9.4设置鼠标指针形状 在使用Windows应用程序时，经常会看到不同的鼠标指针形状，例如有箭头、十字、小工字、双向箭头等等。这些指针形状提示了用户下一步应该做什么样的操作。试想一下如果用户想要通过拖拽窗口的边界改变窗口的大小时，鼠标指针的形状怎么也不变成双箭头时的情景，用户肯定会认为不能改变这个窗口的尺寸，从而放弃这个操作。因此，在应用程序中设置好指针形状是一件很必要的事情。

4.9.5 应用案例——看图学英语 图像框与其他大部分控件一样也有单击、双击等事件。下面的例题使用了其单击事件。

4.10 图片框（PictureBox） 图片框控件相对于图像框控件来说可以说是重量级控件，因为其占用的内存比较大。如果只是显示图片，可以采用前面介绍的图像框，而如果要在其中使用画图语句绘制图形，或者要在其中放置控件，则应该使用图片框。

4.10.1 图片框介绍 图片框不仅可以用来显示图形，也可以作为其他控件的容器，而且还能用Print在其上输出文字、用Line、Circle等方法在其上绘制直线、圆等几何形状。 可以在图片框Picture1中输出字符串“Free!”，（具体内容请参照本书）

4.10.2 应用案例——移动小蜜蜂 （具体内容请参照本书）

4.11 计时器 Visual Basic为用户提供了一个名叫计时器（Timer）的控件，该控件在运行阶段是不可见的，因此可以将其放到窗体的任何地方。计时器的属性和事件很少，最重要的属性有Interval和Enabled、最重要的事件也是唯一的事件有Timer。计时器控件在Enabled属性为True的前提下，每隔Interval/1000秒就会自动触发Timer事件。

4.11.1 Interval 属性 Interval（时间间隔）属性以千分之一秒为单位，该属性用来控制计时器事件触发的时间间隔。例如，如果将该属性设置为1000，Visual Basic就会每隔1秒钟触发一次Timer事件，如果想让Timer事件每隔3秒钟就触发一次，那应该设置Interval为3000。当然前面已经提到过是在Enabled属性为True的前提下上面的描述才有效。

4.11.2 Timer 事件 Timer 事件是计时器控件的唯一事件。当Enabled属性为True的前提下，它在每隔Inerval/1000秒就会自动发生，根据此特性编程人员经常使用计时器控件计时或实现动画效果。（具体内容请参照本书）

4.11.3 应用案例——实现弹球动画 上一节的应用案例“移动小蜜蜂”实现了通过单击按钮来移动图形的效果，这一节将带领读者使用图片框、图像框和计时器完成图形自动移动的功能。（具体内容请参照本书）

4.12 滚动条 在Windows中，会经常遇到滚动条，有垂直的、有水平的，都附在窗口、组合框、列表框的上面，用来拖动观察窗口或框中未能显示出来的部分，这种滚动条是系统自动添加上的，不需要用户自己设计。而下面要介绍的不是这种滚动条。（具体内容请参照本书）

4.12.1 滚动条的属性 通常，垂直滚动条的值由上往下递增，最上端代表最小值（Min），最下端代表最大值（Max）。水平滚动条的值从左向右递增，最左端代表最小值，最右端代表最大值。滚动条的值均以整数表示，其取值范围在-32768~32767。

4.12.2 滚动条的事件 滚动条最有用的事件只有两个，分别是Scroll和Change事件。当在滚动条内拖动滑块时触发Scroll事件，而改变滑块的位置后触发 Change事件。这样听起来这两个事件好像没什么区别，实际上Scroll事件在拖动滑块的过程中不断的被触发，而Change事件只是在最后停止拖拽而且滑块位置被改变后才会被触发。例如，如果将滑块从最左侧拖拽到最右侧，并且在不松开鼠标左键的状态下再拖回到最左侧，整个过程中Scroll事件会不断地被触发，而Change事件因为滑块的位置最终没有被改变，所以一次都没有被触发。

4.12.3 应用案例——选择背景颜色 （具体内容请参照本书）

4.13 驱动器列表、目录列表和文件列表 驱动器列表控件（DriveListBox）用来显示计算机中的驱动器盘符，目录列表控件（DirListBox）用来显示某驱动器的目录树，而文件列表控件（FileListBox）用来列出某目录下所有文件的清单。在设计应用程序时，通常是一起联合使用这三个控件。下面通过一个例子讲解这三个控件的用法。（具体内容请参照本书）

4.14 焦点与Tab 顺序 在本书前面的内容中曾经提到过焦点。所有可见控件都可以获得焦点。例如文本框获得焦点的方法有：一、用鼠标单击文本框。二、在程序中使用文本框的SetFocus方法。除此之外，实际上窗体中所有可见对象还有一种获得焦点的方法，那就是使用键盘上的Tab键切换焦点。（具体内容请参照本书）

4.15 在工具箱中增加其他控件 Visual Basic自带了很多控件，但并未在工具箱中全部显示出来。下面举例说明如何将一些没有显示出来的控件添加到工具箱中。（具体内容请参照本书）

4.16 使用RichTextBox 编写超级文本编辑器 通过上一节讲述的方法已经将RichTextBox 控件添加到了工具箱中。该控件可用于输入和编辑文本，它同时提供了比以前所学的TextBox 控件更高级的格式特性。比如，TextBox控件里当改变字体、字号时所有文字的字体、字号都会被改变，而RichTextBox可以只改变所选择的文字的字体、字号，而其他未被选择的文字的字体、字号不会被改变，RichTextBox甚至可以显示图形。下面用一个例题说明RichTextBox 控件在文字编辑方面的强大功能。RichTextBox 控件的名称前缀是rtf。（具体内容请参照本书）

4.17 树型视图控件与图像列表控件 树型视图控件是Visual Basic中的高级控件之一，通常用其显示有目录结构的内容。其使用方法相对其它普通控件较复杂。图像列表控件是Visual Basic中较常用的控件之一，主要用其存放图形文件。本节将介绍树型视图控件的一部份内容和图像列表控件的使用方法。

4.17.1 创建树型视图（TreeView） Windows资源管理器左边的目录树就是一个树型视图，如图4.39所示。这种视图形式主要是用来清晰的表达层次结构。在一些复杂的资料管理系统中为了方便的组织和管理资料文档会经常使用这种视图形式。（具体内容请参照本书）

4.17.2 设置树型视图的外观 设置树型视图的外观，主要用到Style和LineStyle两个属性。Style属性有7种值可以选择，

4.17.3 图像列表控件（ImageList） 图像列表（ImageList）控件在程序运行时是不可见的。该控件是加入树型视图控件时在工具箱中多出来的9个控件之一，它也位于Microsoft Windows Common Control 6.0控件中。其在工具箱中的图标为。ImageList控件的用法很简单，作为图片得容器主要用来给其他控件提供图标，比如树型视图控件。

4.17.4 给树型视图添加内容 要给树型视图添加内容只能通过程序实现，而且要用到Node对象，因为视图中的每一个节点都是一个Node对象。（具体内容请参照本书）

4.17.5 设置展开/折叠和单击节点时的图标 （具体内容请参照本书）

4.17.6 获取被选中的节点的信息 反映节点信息的常用属性有FullPath、Text、Key等属性。

4.18 SSTab控件 在程序设计中，经常会需要具有多个选项卡的对话框，SSTab控件就是Visual Basic为用户制作这种对话框而提供的控件。它位于Microsoft Tabbed Dialog Control 6.0部件中。将该控件添加到工具箱中后其图标为。在SSTab控件中有一组选项卡，它们都能够作为其他控件的容器。在SSTab控件中一次只能有一个选项卡被激活。当某个选项卡被激活后，该选项卡中的控件被显示出来，而其他选项卡和其中的控件都会被隐藏起来，（具体内容请参照本书）

4.19 OLE 容器控件 OLE的全称是Object Linking and Embedding（对象链接与嵌入）。在Visual Basic中，用户可以将外部数据或软件载入到自己的程序中，其使用工具便是OLE容器控件。OLE控件在工具箱中的图标是。下面用一个简单的例子说明该控件的基本用法。（具体内容请参照本书）