（3）程序运行界面如图1.29所示。
图1.29 命令按钮实例
【实例分析】
该程序应用了命令按钮的常用属性和事件，使用户掌握命令按钮的常用操作。 命令按钮用于接收用户的操作信息，通过单击命令按钮来执行一些操作。 1. 常用属性
多数对象具有共同的属性，前面已经介绍很多属性的功能，以后只介绍具体对象的特有的属性功能，重复的属性不再介绍。
（1）Caption属性。设置命令按钮上显示的文字信息。该属性是说明性的文字，可以是任意的字符串。利用Caption属性可以为命令按钮设置一个快捷键，即在某个字母的前面加上“&”符号，运行程序时，按下Alt键和该字母键，就能执行命令按钮的单击过程。
（2）Default属性和Cancel属性。分别用于设置“默认按钮”和“取消按钮”，当属性值为True时，两个属性生效。“默认按钮”就是只要用户按下Enter键，就相当于触发了单击过程；“取消按钮”就是只要用户按下Esc键，就相当于触发了单击过程。
【提示】
窗体上有多个按钮时，通常只允许有一个默认按钮和一个取消按钮。
（3）Style属性。设置命令按钮的外观。默认值为0，表示以标准的Windows按钮方式显示；值为1，表示以图形按钮显示，此时可用Picture、DownPicture和DisabledPicture属性来分别设置按钮在正常、被按下和不可用三种状态下显示的图片。
【试一试】
通过设置命令按钮的Style属性来改变按钮的显示外观。 实例1.4中的属性设置如表1.17所示。
表1.17 实例1.4中的属性设置
控件名称 Command1 Command2 Command3
Caption属性 窗体变大（&L） 窗体变小（&S） 退出（&E）
Default属性 True False False
Cancel属性 False False True
2. 事件和方法
命令按钮最常用的事件就是Click事件，它不响应DblClick事件。 命令按钮常用的方法是SetFocus方法。
实例1.4中应用了命令按钮的Click事件，事件过程的代码如下所示：
Private Sub Command1_Click() Form1.Height = Form1.Height + 500 Form1.Width = Form1.Width + 500 End Sub Private Sub Command2_Click() Form1.Height = Form1.Height - 500 Form1.Width = Form1.Width - 500 End Sub Private Sub Command3_Click() Unload Me End Sub 另外，实例1.4中还有一个窗体的Load事件，过程代码如下：
Private Sub Form_Load() Form1.Height = 4000 Form1.Width = 4000 End Sub 1.8.3标签
实例1.5 设计一个应用程序，实现标签的显示和隐藏，并改变标签文字的颜色。 【实例说明】
（1）程序有一个窗体，窗体上有一个标签和三个按钮。 （2）标签显示文字“标签实例演示”，对标签进行属性设置。
（3）单击“显示标签”按钮，将标签显示；单击“隐藏标签”按钮，将标签隐藏；单击“改变文字颜色”按钮，随即生成一种颜色。
（4）程序运行效果如图1.30所示。
图1.30 标签实例
【实例分析】
本实例充分运用标签属性进行程序设计，掌握标签的基本操作方法。 标签主要用来显示比较固定的提示性信息。
1. 常用属性
（1）Alignment属性。设置标签中文本的对齐方式。
（2）AutoSize属性。确定标签的大小是否根据内容自动调整大小。默认值为False，表示不自动调整大小。
（3）BackStyle属性。设置标签的背景模式，有两个属性值。默认值是1，表示标签将覆盖背景，0表示标签是“透明”的。
（4）WordWrap属性。设定标签大小是否根据其内容改变垂直方向的大小，即是否以增加或减少行来适应内容的变动，但宽度保持不变。默认值为False，表示不改变标签的垂直方向大小，True表示将改变标签的垂直方向大小。
【提示】
为了使WordWrap属性起作用，应该把AutoSize属性设置为True。 实例1.5中的对象属性设置如表1.18所示。
表1.18 实例1.5中的属性设置 控件名称 Command1 Command2 Command3 Label1
Caption 显示标签 隐藏标签 改变文字颜色 标签实例演示
Alignment
2-Center
FontName 隶书
FontSize 24
BorderStyle
1-Fixed Single
2.常用事件和方法
标签可触发的事件有Click、DblClick等，但在应用程序中很少使用。 标签常用方法有Move，可以移动标签。
实例1.5中没有触发标签的事件，触发了命令按钮的Click事件，事件过程代码如下：
Private Sub Command1_Click() Label1.Visible = True End Sub Private Sub Command2_Click() Label1.Visible = False End Sub Private Sub Command3_Click() Randomize c = Int(15 * Rnd) Label1.ForeColor = QBColor(c) End Sub 【提示】
实例1.5中的Command3_Click()过程代码里使用Randomize产生随机种子，Int(15 * Rnd)用来生成0-14之间的随机整数，以改变文字颜色。 1.8.4 文本框
实例1.6 设计一个应用程序，用文本框显示文字信息。 【实例说明】
（1）程序只有一个窗体，窗体上有三个标签和三个文本框，两个命令按钮。
（2）在第一个文本框输入文字信息，另外两个文本框中显示相同的内容，但是文字的颜色和大小不同。
（3）单击“清除”按钮，将三个文本框中的内容清除；单击“退出”按钮，结束程序。
（4）程序运行效果如图1.31所示。
图1.31 文本框实例
【实例分析】
本实例使用文本框的常用属性、事件和方法进行程序设计，掌握文本框的基本操作方法，丰富程序界面和实现程序基本功能。
文本框为用户提供一个能够输入、编辑和显示文本内容的区域。 1. 常用属性
（1）Text属性。文本框中显示的文字内容，可以是输入的，也可以是输出的。
（2）MaxLength属性。确定文本框中文本的最大长度。默认值为0，表示没有字符限制，单行显示时最大长度为2KB，多行显示时最大长度为32KB。如果将其设置为正整数值，即是文本框可容纳的最大字符数。
（3）MultiLine属性。指定文本框中是否允许显示和输入多行文本。默认值为False，输入单行文本，True表示输入多行文本。
（4）PasswordChar属性。设置密码字符。把该属性值设置为某个字符，比如“*”，用户在文本框中输入的任何字符都将以“*”替代显示，但文本框中的文本实际内容不变，只是显示状态被改变了，因此可以作为密码框使用。
【提示】
只有在MultiLine属性值为False时，PasswordChar属性才能起作用。
（5）ScollBars属性。设置文本框中是否出现滚动条。有4个属性值：默认值为0，表示不出现滚动条；1表示出现水平滚动条；2表示出现垂直滚动条；3表示同时出现水平和垂直滚动条。
（6）Locked属性。设置文本框是否能被编辑。默认值False，表示文本框内容可以编辑修改，True表示文本框只读。
（7）SelStar属性、SelLength属性和SelText属性。这三个属性表示文本框中的文本信息被选定状态，只能在运行模式下使用。SelStar表示选定文本的起始位置，默认值是0，即从第一个字符开始；SelLength表示选定文本的长度；SelText表示选定文本的内容。
实例1.6中文本框的属性设置如表1.19所示。
表1.19 实例1.6中文本框的属性设置 控件名称 Text1 Text2
Text 空白 空白
ForeColor 默认 红色
FontSize 默认 8
FontBold True True
Locked False True
Text3 空白 绿色 14 True True
2.常用事件和方法
文本框可触发事件很多，主要有Click、DblClick、Change、GotFocus、LostFocus等。当文本框的内容发生改变时，触发Change事件。
文本框常用方法有Move方法和SetFocus方法。
实例1.6中应用了文本框的Change事件，用来显示两位两个文本框里的内容，调用了SetFocus方法，来使文本框获得焦点。其事件过程代码如下所示：
Private Sub Text1_Change() Text2.Text = Text1.Text Text3.Text = Text1.Text End Sub Private Sub Command1_Click() Text1.Text = \ Text2.Text = \ Text3.Text = \ Text1.SetFocus End Sub Private Sub Command2_Click() Unload Me End Sub
1.9 本章小结
本章主要介绍了Visual Basic 6.0的发展特点及其安装启动方法，着重讲述了Visual Basic 6.0集成开发环境的应用、对象的基本概念、工程的管理、以及窗体和基本控件的使用。内容阐述采用的是实例驱动的方式，从简单实例入手，分析实例需求，进而解决实例中提出的问题，实现用户开发要求达到的功能。通过本章学习，让读者在对Visual Basic 6.0初步了解的基础上，运用其常用对象，即窗体和基本控件，设计应用程序，掌握应用程序设计的一般步骤，为后面章节的学习打下坚实基础。 1.10 实战训练（给出提示）
1. 在窗体上建立一个标签，单击窗体时，在标签上显示“执行了窗体单击操作”；双击窗体时，在标签上显示“执行了窗体双击操作”。
2. 在窗体上建立三个文本框和两个命令按钮。在前两个文本框输入文字，单击“交换”按钮，将两个文本框中的内容互换；单击“合并”按钮，将两个文本框中的内容连接成一个字符串，输出在第三个文本框中。运行结果如题图1.1所示。
题图1.1 文本框程序运行结果
3. 在窗体上建立三个命令按钮和一个文本框。命令按钮标题分别是“笑脸”、“哭脸”、“改变按钮状态”。初始状态“笑脸”和“哭脸”两个按钮为不可用，单击“改变按钮状态”后，两个按钮变为可用，并且将其转换成图片按钮，分别显示“”和“”图标。单击“笑脸”按钮，文本框显示“我好高兴！”；单击“哭脸”按钮，文本框显示“哦，又生气了！”。运行结果如题图1.2所示。