Ｖｉｓｕａｌ Ｂａｓｉｃ 项目化程序设计教程-2

任务一掌握Ｌａｂｅｌ控件属性设置与使用一、认识Ｌａｂｅｌ控件在项目一中，我们已经知道，任何一个ＶｉｓｕａｌＢａｓｉｃ程序都是由操作界面及相应的程序代码组成的，而操作界面则是由诸如“命令按钮控件”“文本框控件”“标签控件”等控件以及窗体共同组成的。从本项目开始，我们进入控件的学习。在ＶｉｓｕａｌＢａｓｉｃ工具箱中，标签控件的图标如图２－１所示。标签的默认名称（Ｎａｍｅ）和标题（Ｃａｐｔｉｏｎ）为ＬａｂｅｌＸ（Ｘ为１、２、３等），比如Ｌａｂｅｌ１、Ｌａｂｅｌ２、Ｌａｂｅｌ３、…。下一页返回任务一掌握Ｌａｂｅｌ控件属性设置与使用标签控件的主要属性如下。１Ｃａｐｔｉｏｎ（标题）属性此属性用来设置在标签上显示的文本信息，而文本信息可以在创建界面时设置，也可以在程序中改变，如项目一中列举的例子，就是通过单击按钮改变标签显示的字样。２ＢｏｒｄｅｒＳｔｙｌｅ（边框）属性本属性用来设置标签的边框类型，有两种值可选：０，代表标签无边框；１，代表标签有边框，并且具有三维效果。两种标签如图２－２所示。ＢｏｒｄｅｒＳｔｙｌｅ属性可以在设计界面时指定，如图２－３所示。上一页下一页返回任务一掌握Ｌａｂｅｌ控件属性设置与使用３Ｆｏｎｔ（字体）属性０或１（０或１，两者取一）本属性用来设置标签显示的字体，既可以在创建界面时设定（图２－４），也可以在程序中改变。在图２－４的设置界面中，除了可以选择字体，还可以设置显示文字为粗体、斜体、下划线等特征。４Ａｌｉｇｎｍｅｎｔ（False）对齐）属性此属性用来设置标签上显示的文本的对齐方式，值为０表示左对齐；值为１表示右对齐；值为２表示居中显示。此属性可以在界面设置时设定，如图２－５所示。上一页下一页返回任务一掌握Ｌａｂｅｌ控件属性设置与使用５Ｖｉｓｉｂｌｅ（可见）属性本属性在大多数控件中都有，它能设置该控件是否可见，当值为Ｔｒｕｅ时，控件可见；当值为Ｆａｌｓｅ时，控件隐藏。控件的可见属性可以在界面设置时设置，如图２－６所示。二、标签控件（Ｌａｂｅｌ）的主要事件所谓的事件，其实就是用户对应用程序的操作，如项目一中用鼠标单击“命令按钮”触发的Ｃｌｉｃｋ事件。事件的作用在于触发程序的执行，如项目一中的Ｃｌｉｃｋ事件改变了标签控件的Ｃａｐｔｉｏｎ属性。上一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用在ＶｉｓｕａｌＢａｓｉｃ６０操作界面中，代表ＴｅｘｔＢｏｘ（文本框）控件的图标如图２－７所示。ＴｅｘｔＢｏｘ控件主要用来显示文本或输入文本，如Ｗｉｎｄｏｗｓ登录时的“口令”窗口，或者记事本的整个编辑区域。双击工具箱中的文本框控件或者单击文本控件，然后用鼠标在ＶｉｓｕａｌＢａｓｉｃ的工作区域拖拉，就可以创建文本框了，如图２－８所示。文本框控件的默认名称为ＴｅｘｔＸ（Ｘ为１、２、３等），比如Ｔｅｘｔ１、Ｔｅｘｔ２、Ｔｅｘｔ３、…。当然，也可以将其改为自定义的名称，如Ｔｘｔ＿Ｘ（Ｘ为用户自定义的名字，如Ｔｘｔ＿Ｓｈｏｗ、Ｔｘｔ＿２、Ｔｘｔ＿ｕｓｅｒ３等）。下一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用一、文本框控件的主要属性本控件最重要的属性，即显示在文本框中的文本内容（Ｔｅｘｔ），可以在界面设置时指定，如图２－９所示。文本内容也可以在程序中动态修改，其程序代码如下：文本框名Text="欲显示的文本内容"如果要在一个名为ＴｘｔＦｏｎｔ的文本框控件中显示“隶书”字样，那么输入代码为：

TxtFont

Text="隶书“２ＳｅｌＴｅｘｔ（选中文本）属性本属性返回或设置当前所选文本的字符串。如果没有选中的字符，那么返回值为空字符串，即“”。请注意，本属性的结果是个返回值，或为空，或为选中的文本，其具体用法可参考项目七。上一页下一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用３ＳｅｌＳｔａｒｔ与ＳｅｌＬｅｎｇｔｈ属性ＳｅｌＳｔａｒｔ属性用于选中文本的起始位置，返回的是选中文本的第一个字符的位置；ＳｅｌＬ⁃ｅｎｇｔｈ属性用于选中文本的长度，返回的是选中文本的字符串个数。例如，文本框Ｔｅｘｔ２中有内容如下：跟我一起进入ＶＢ世界。假设选中“一起进入”四个字，那么，ＳｅｌＳｔａｒｔ为３，ＳｅｌＬｅｎｇｔｈ为４。４ＭａｘＬｅｎｇｔｈ（最大长度）属性本属性限制了文本框中可以输入的字符个数的最大限度，默认为０，表示在文本框所能容纳的字符数之内没有限制。文本框所能容纳的字符数是６４ＫＢ，如果超过这个范围，则应该用其他控件来代替文本框控件。上一页下一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用文本框控件ＭａｘＬｅｎｇｔｈ属性既可以在界面设置过程中加以指定，如图２－１１所示，也可以在设计时进行改变，代码如下：文本框控件名Maxlength=X（X为阿拉伯数字，如10、20、57等）５ＭｕｌｔｉＬｉｎｅ（多行）属性本属性决定文本框是否可以显示或输入多行文本。当属性值为Ｔｒｕｅ时，表示文本框可以容纳多行文本；当属性值为Ｆａｌｓｅ时，表示文本框则只能容纳单行文本。本属性只能在界面设置时指定，不能在程序运行时加以改变，如图２－１２所示。上一页下一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用６ＰａｓｓｗｏｒｄＣｈａｒ（密码）属性本属性主要作为口令功能进行使用。例如，若希望在密码框中显示星号时，则可在“属性”窗口中将ＰａｓｓｗｏｒｄＣｈａｒ属性指定为“∗”，这时，无论用户输入什么字符，文本框中都显示星号，如图２－１３所示。７ＳｃｒｏｌｌＢａｒｓ（滚动条）属性本属性可以设置文本框是否有滚动条，当属性值为０时，文本框无滚动条；属性值为１时，文本框只有横向滚动条；属性值为２时，文本框只有纵向滚动条；属性值为３时，文本框具有横、纵向滚动条，如图２－１４所示。上一页下一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用８Ｌｏｃｋｅｄ（锁定）属性当本属性的属性值为Ｆａｌｓｅ时，文本框中的内容可以编辑；当属性值为Ｔｒｕｅ时，文本框中的内容不能编辑，只能查看或进行滚动操作。二、文本框控件的事件除了Ｃｌｉｃｋ、ＤｂＣｌｉｃｋ这些不常用的事件外，与文本框相关的主要是Ｃｈａｎｇｅ、ＧｏｔＦｏｃｕｓ、ＬｏｓｔＦｏｃｕｓ事件。１Ｃｈａｎｇｅ事件当用户向文本框中输入新内容，或当程序把文本框控件的Ｔｅｘｔ属性设置为新值时，将触发Ｃｈａｎｇｅ事件。２ＧｏｔＦｏｃｕｓ事件上一页下一页返回任务二掌握ＴｅｘｔＢｏｘ控件的属性设置与使用ＧｏｔＦｏｃｕｓ事件又称“获得焦点事件”，所谓获得焦点，其实就是指处于活动状态。在电脑的日常操作中，我们常常用Ａｌｔ＋Ｔａｂ键在各个程序间进行切换，处于活动中的程序获得了焦点，非活动的程序则失去了焦点（ＬｏｓｔＦｏｃｕｓ）。３ＬｏｓｔＦｏｃｕｓ事件ＬｏｓｔＦｏｃｕｓ事件又称为“失去焦点”事件，其含义与ＧｏｔＦｏｃｕｓ事件相反。程序界面如图２－１５所示。上一页返回任务三计算长方形面积程序设计【开发思路】①至少需要一个程序界面和三个文本框，其中两个文本框用来输入边长，剩下一个用来输出面积数据；②每个文本框需要三个标签来标识，其中两个用来标识边长，剩下一个用来标识面积；③制作两个按钮，一个实现单击后的计算功能，另一个是用于退出程序。通过分析，我们要创建的应用程序用户界面如图２－１６所示。窗体（Ｆｏｒｍ）上含有三个标签（Ｌａｂｅｌ）、三个文本框（Ｔｅｘｔ）和两个命令按钮（Ｃｏｍ⁃ｍａｎｄ），三个标签（Ｌａｂｅｌ）分别用于显示文字“边长一”“边长二”和“面积”，三个文本框（Ｔｅｘｔ）用于输入数据和显示计算结果。下一页返回任务三计算长方形面积程序设计步骤一创建窗体，添加界面的控件①在默认窗体Ｆｏｒｍ１上添加两个标签（Ｌａｂｅｌ）、两个文本框（Ｔｅｘｔ）和两个命令按钮（Ｃｏｍｍａｎｄ），以构建用户界面。②设置控件的方法：在Ｆｏｒｍ１窗体上添加标签控件，其中，标签Ｌａｂｅｌ１用于显示文字“边长一”；标签Ｌａｂｅｌ２用于显示文字“边长二”；标签Ｌａｂｅｌ３用于显示文字“面积”。选择标签方法如图２－１７所示。③在Ｆｏｒｍ１窗体上添加文本框控件，其中，文本框Ｔｅｘｔ１用于输入边长一的数值，文本框Ｔｅｘｔ２用于输入边长二的数值，文本框Ｔｅｘｔ３用于显示计算结果（面积）。选择文本框的方法如图２－１８所示。上一页下一页返回任务三计算长方形面积程序设计选择按钮的方法如图２－１９所示。步骤二在“属性窗口”中设置对象的属性对于窗体Ｆｏｒｍ１的Ｃａｐｔｉｏｎ（标题名）属性，标签Ｌａｂｅｌ１、Ｌａｂｅｌ２、Ｌａｂｅｌ３的Ｃａｐｔｉｏｎ属性，文本框Ｔｅｘｔ１、Ｔｅｘｔ２、Ｔｅｘｔ３的Ｔｅｘｔ（文本内容）属性以及按钮Ｃｏｍｍａｎｄ１、Ｃｏｍｍａｎｄ２的Ｃａｐｔｉｏｎ属性，其设置见表２－１。步骤三建立事件过程，编写程序代码本项目中，只需要对“计算”按钮（Ｃｏｍｍａｎｄ１）和“退出”按钮（Ｃｏｍｍａｎｄ２）发生的单击（Ｃｌｉｃｋ）事件编写程序代码。上一页下一页返回任务三计算长方形面积程序设计计算长方形面积的程序设计代码如图２－２０所示。程序详细解析如下：第一行的ＰｒｉｖａｔｅＳｕｂ为私有过程，Ｃｏｍｍａｎｄ１＿Ｃｌｉｃｋ（）为Ｃｏｍｍａｎｄ１（按钮１）的Ｃｌｉｃｋ（单击）事件过程；第二行的Ｄｉｍ语句定义ｘ数据类型为Ｓｉｎｇｌｅ（单精度）；第三行的Ｄｉｍ语句定义ｙ数据类型为Ｓｉｎｇｌｅ（单精度）；第四行将Ｔｅｘｔ１的Ｔｅｘｔ值赋给ｘ；第五行将Ｔｅｘｔ２的Ｔｅｘｔ值赋给ｙ；上一页下一页返回任务三计算长方形面积程序设计步骤四保存和运行工程①保存窗体文件和工程文件，然后单击工具栏上的“启动”按钮，即可采用解释方式来运行程序。②运行后，在“边长”文本框中分别输入数值（如２，３），单击“计算”按钮时，系统会启动事件过程Ｃｏｍｍａｎｄ１＿Ｃｌｉｃｋ进行取数和运算，最后把计算结果显示在“面积”文本框（Ｔｅｘｔ３）中。③单击“结束”按钮，可以启动事件过程Ｃｏｍｍａｎｄ２＿Ｃｌｉｃｋ，执行Ｅｎｄ语句来结束程序的运行。运行效果如图２－２１所示。上一页下一页返回任务三计算长方形面积程序设计一、常用标准控件的基本属性ＶｉｓｕａｌＢａｓｉｃ中的每一个窗体和控件都有很多属性，但所有窗体和大多数标准控件都具有如下基本属性：１Ｎａｍｅ（名称）属性Ｎａｍｅ（名称）属性指所创建对象的名称，在程序设计过程中建议用汉字命名窗体，而控件名称一般使用系统默认名。２Ｃａｐｔｉｏｎ属性Ｃａｐｔｉｏｎ属性用于设置控件上显示的文字内容。３Ｈｅｉｇｈｔ、Ｗｉｄｔｈ、Ｔｏｐ、Ｌｅｆｔ属性上一页下一页返回任务三计算长方形面积程序设计这四个属性用于设置控件的高度、宽度、离屏幕顶部的距离、离屏幕左边的距离。４Ｅｎａｂｌｅｄ属性Ｅｎａｂｌｅｄ属性用于设置对象的可操作性（其值为Ｔｒｕｅ或Ｆａｌｓｅ）。５Ｖｉｓｉｂｌｅ属性Ｖｉｓｉｂｌｅ属性用于设置对象的可见性（其值为Ｔｒｕｅ或Ｆａｌｓｅ）。６Ｆｏｎｔ属性Ｆｏｎｔ属性用于设置对象的字体。７ＦｏｒｅＣｏｌｏｒ属性ＦｏｒｅＣｏｌｏｒ属性用于设置对象的前景颜色（字体颜色）。上一页下一页返回任务三计算长方形面积程序设计８ＢａｃｋＣｏｌｏｒ属性ＢａｃｋＣｏｌｏｒ属性用于设置对象的背景颜色。９ＢｏｒｄｅｒＳｔｙｌｅ属性ＢｏｒｄｅｒＳｔｙｌｅ属性用于设置对象的边框样式（０表示无，１表示单边）。１０Ａｌｉｇｎｍｅｎｔ属性Ａｌｉｇｎｍｅｎｔ属性用于设置对象的对齐方式（０表示左对齐，１表示右对齐，２表示居中）。上一页下一页返回任务三计算长方形面积程序设计１１ＡｕｔｏＳｉｚｅ属性当对象的ＡｕｔｏＳｉｚｅ属性为Ｔｒｕｅ时，自动调整大小；当ＡｕｔｏＳｉｚｅ属性为Ｆａｌｓｅ时，不可调，若正文太长，则自动裁掉。１２ＷｏｒｄＷａｒｐ属性当对象的ＷｏｒｄＷａｒｐ属性为Ｔｒｕｅ时，沿