第3章窗体和控件.doc

第3章 窗体和控件 内容概要 基本的Windows窗体控件 焦点和Tab顺序 Visual Basic是一种可视化的高级程序设计语言，它不但具有所见即所得的优点，而且还为我们提供了大量的Windows窗体控件，只要我们熟练掌握了这些控件的使用，就可以轻松编写出具有Windows风格的图形化界面的应用程序。 本章将介绍Visual Basic中最基本的几个标准控件，更多的控件将在后面介绍。 3.1 文本控件 与文本有关的标准控件有两个，即标签（Label）和文本框（TextBox）。区别在于标签只能用来显示文本，用户不可以直接进行编辑；而文本框既可以显示文本，又可以提供编辑功能，从而实现人机的交互。 3.1.1 标签（Label） 使用标签的目一般是为了对其它控件进行功能说明，或者用来显示运行结果。如图3-1所示，标签Label1的功能是表明文本框Text1是用来输入姓名的；标签Label2的功能是表明文本框Text2用来输入年龄。 标签除具有前面讲过的常用属性Name，Top，Left，Height，Width，Visible，Font外，还具有以下属性。 Caption 该属性用于设置标签中显示什么文本。该文本信息既可以在设计模式下通过属性窗口设置，也可以在运行模式下通过修改Caption属性来设置。例如： Label1.Caption=消炎药品 注意：标签没有Text属性，这一点与下面讲到的文本框不同。 Alignment 该属性用于设置标签中文本的对齐方式，有三种取值情况： 0 - Left Justify(缺省) 标签中的文本左对齐 1 - Right Justify 标签中的文本右对齐 2 - Center 标签中的文本居中对齐 BackStyle 该属性用于设置标签的背景风格，有两种取值情况： 0 - Transparent 标签的背景为透明的，就像是在一块透明玻璃上书写文本一样，无论BackColor设置为什么颜色都不会显示。 1 – Opaque(缺省) 标签的背景为非透明的，会遮挡标签后面的内容 BorderStyle 该属性用于设置标签的边框风格，有两种取值情况： 0 - None（缺省） 标签无边框 1 - Fixed Single 标签有边框 Appearance 该属性用于设置标签外观是否具有立体的效果，有两种取值情况： 0 - Flat 标签为平面效果 1 - 3D（缺省） 标签为立体效果（前提是将BorderStyle设置为1） AutoSize 该属性用于设置标签的大小是否随标题文本大小的改变而改变，有两种取值情况： True 标签的大小随标题文本大小的改变而改变， False（缺省） 当标题太长时，只能显示其中的一部分内容。 WordWrap 该属性用于设置标签标题文本的显示方式（前提是将Autosize属性设置为True）。有两种取值情况： True 标签在垂直方向上随标题文本的改变而变化，水平方向上大小不变， False（缺省） 标签在水平方向上扩展到标题中最长的一行，在垂直方向上显示标题的所有各行。 例3-1 标签属性的练习 如图3-2所示，在窗体Form1上添加一个命令按钮Command1和三个标签Label1、Label2、Label3，按照下表设置相应控件的属性。 caption Font Height Width BorderStyle AutoSize WordWrap Command1 测试 Label1 感冒药品 宋体四号 400 1300 1 False False Label2 感冒药品 宋体四号 1 True False Label3 感冒药品 宋体四号 1 True True 在代码窗口中输入下面的代码： Private Sub Command1_Click() Label1.Caption = 常见抗感冒药品： vbCrLf 康泰克 vbCrLf 苦甘冲剂 Label2.Caption = 常见抗感冒药品： vbCrLf 康泰克 vbCrLf 苦甘冲剂 Label3.Caption = 常见抗感冒药品： vbCrLf 康泰克 vbCrLf 苦甘冲剂 End Sub 说明：以上代码中vbCrLf意思是回车换行， 表示将前后的字符串进行连接(前后均有一个空格)结果为一个字符串。 单击工具栏中的“启动”按钮(或按下F5)启动程序，单击“测试”按钮，观察三个标签中显示的结果。如图3-3所示。 3.1.2 文本框（TextBox） 文本框与标签的最大区别在于文本框不但可以用来显示文本信息，而且还允许用户在文本框中输入、编辑文本信息。从而实现交互式应用程序的功能