第4章窗体及常用控件

第4章窗体及常用控件内容摘要：

★ Alignment属性 : 设定标签中文本的对齐方式。 有三个可选项： 0 — 表示左对齐，为系统默认值； 1 — 表示右对齐； 2 — 表示居中。 ★ Autosize属性 : 用于设定标签的大小是否自动调整。 共有两个选项： True — 表示自动调整大小 False — 表示不自动调整大小，默认为 False。 2 标签控件（ Label） 标签主要用来显示（输出）文本信息，但是不能作为输入信息的界面，也就是说，标签控件的内容只能用 Caption属性来设置或修改，而不能直接编辑。 计算机软件技术基础 Visual Basic 程序设计 ★ BackStyle属性 : 用于设定标签的背景模式。 共有两个选项： 0 — 标签重叠显示在背景上，不覆盖原来的背景； l — 显示标签时将背景覆盖掉，此为系统默认值。 ★ BorderStyle属性： 用于设定标签的边框形式。 共有两个设置值： 0 — 无边框，默认状态 l — 单线框，具体的边框显示样式，还要看 Appearance的设置。 当 Appearance为平面时，边框为单直线形的；当 Appearance为三维时，边框为凹陷形的。 ★ Caption属性： 用于设定标签上显示的文本内容。 ★ Index属性 : 若当前标签控件属性为控件数组，用 Index属性设定它在这一数组中的下标。 计算机软件技术基础 Visual Basic 程序设计 ★ WordWrap属性 : 用来设定标签中的文本在显示时是否自动换行。 共有 2个选项： True — 有自动折行功能 False — 没有折行功能，这时若标签内容太多，一行显示不下，就会被截断。 默认值为 False。 （ 2）标签的方法 标签的常用方法只有 Move，格式如下： Move left, top, width, height 其中 left、 top、 width、 height分别表示移动目的位置的坐标和大小。 left为必要参数 ， 其他三个为可选参数。 计算机软件技术基础 Visual Basic 程序设计 （ 3）标签的事件 一般很少使用标签事件 ， 但有时为了特殊需要 ， 也会用到以下几种标签事件： ★ Change事件 : 当标签的内容被修改时产生该事件。 标签内容的修改是由更改caption属性引起的。 基本语法为： Sub Label_Change([Index As Integer]) ★ Click事件 : 鼠标单击产生 Click事件。 其事件处理过程的基本语法是： Sub Label_Click([Index As Integer]) ★ DblClick事件 : 鼠标双击产生 DblClick事件。 基本语法为： Sub Label_DblClick([Index As Integer]) 其中 ， 参数 Index是一个整数值。 若当前标签是一个控件数组 ， 则Index表示该标签在数组中的下标 ， 否则就不需要这一参数。 计算机软件技术基础 Visual Basic 程序设计 ◆ 开发一个加法计算器应用程序。 其中， “ 被加数 ” 、 “ 加数 ” 以及 “ 和数 ” 称为标签（ Label），相应的三个输入输出数据框称为文本框（ TextBox），此外还有三个命令按钮（ CommandButton）。 用户可以在被加数和加数相应的文本框内输入数据，再单击 “ 加法 ” 按钮，便能在 “ 和数 ” 对应的框中看到相加的结果。 当用户单击 “ 清除 ” 按钮时，就会清除各文本框中的数据。 当用户单击 “ 关闭 ” 按钮时就会关闭该窗口并退出应用程序。 在文本框中输入数据时，用户可以进行一般的插入、修改和删除操作。 （ 4）标签举例 ◆ 例 44点击此处进入 计算机软件技术基础 Visual Basic 程序设计 对象 属性名 属性值 窗体 （名称） frmAdder Caption 加法计算器 标签 1 Caption 被加数 标签 2 Caption 加数 标签 3 Caption 和数 文本框 1 （名称） txt1 Caption （空） 文本框 2 (名称 ) txt2 Caption （空） 文本框 3 （名称） txt3 Caption （空） 按钮 1 (名称 ) cmdAdd Caption 加法 按钮 2 （名称） cmdClear Caption 清除 按钮 3 （名称） cmdClose Caption 关闭 本例中各个对象、有关的属性名以及需要设置的属性值设计如右表 计算机软件技术基础 Visual Basic 程序设计 Private Sub cmdAdd_Click() =Str$(Val()+Val()) End Sub Private Sub cmdClear_Click() = = = End Sub Private Sub cmdClose_Click() End End Sub 注：由于文本框中的 Text属性的值是字符串类型的，所以不能将两个文本框中的字符串直接进行加法运算，需要先用 Val函数将代表数值的字符串转换成双精度实数，才能进行数值运算。 数值变量的运算结果还是数值型的，需要用 Str$函数将其转换成字符串后，才能赋给文本框的text属性。 计算机软件技术基础 Visual Basic 程序设计 文本框又称编辑框 ， 是最常用的文本输入输出控件 ， 该区域可以输入 、 编辑 、 修改和显示正文内容。 （ 1）文本框的属性 文本框没有 Caption属性。 下面主要介绍它的一些特殊的属性。 ★ Text属性： 用于设置或取得文本框中显示的文本，是文本框的默认属性。 在程序中使用这一属性取得当前文本框中的文本，即在程序执行时，用户通过键盘输入的正文内容， VB会自动将其保存在 Text属性中。 ★ MaxLength属性： 用于设定文本框中能够容纳的最多字符数。 0—表示可容纳任意多个输入字符，默认值。 正整数 —表示该数值为可容纳的最多字符数。 3 文本框（ TextBox) 计算机软件技术基础 Visual Basic 程序设计 ★ MultiLine多行属性： 用于设定文本框中是否允许显示和输入多行文本。 True — 表示允许显示和输入多行文本。 False — 表示不允许显示和输入多行文本。 ★ ScrollBars属性： 用于设置文本框中是否带有滚动条。 当 MultiLine属性为 True时，ScrollBars属性才有效，因此这一属性一般要和 Multiline属性协调使用。 0—None:无滚动条 1—Horizontal:加水平滚动条 2— Vertical:加垂直滚动条 3—Both:同时加水平和垂直滚动条 ★ HideSelection隐藏选定属性： 用于设定焦点不在该文本框中时，所选定的文本是否仍反白显示。 它是逻辑值， True表示要隐藏选定文本，即当焦点不在当前编辑框中时，所选定的文本不再反白显示； False则相反。 计算机软件技术基础 Visual Basic 程序设计 ★ PasswordChar口令字符属性： 用于设定文本框是否用于输入口令类文本。 当把这一属性设定为一个非空字符串时（如常用 “ *” ），运行程序时用户输入的文本就会只显示这一非空字符，但系统接收的却是用户输入的文本。 系统默认为空字符，这时，用户在程序运行中输入的可显示文本将直接显示在文本框中。 ★ ReadOnly只读属性： 用于设定程序运行是能否对文本框中的文本进行编辑。 这是一个逻辑型的属性，默认值为 False，表示运行程序时可以编辑其中的文本；当选择 True时，表示运行程序时不能编辑其中的文本。 计算机软件技术基础 Visual Basic 程序设计 ★ TabStop属性： 用于设定运行时用户能否用 Tab键跳入该文本框。 当选择 True时，表示可以跳入；当选择 False时表示不能跳入，如果这时要进入这一编辑框，可用鼠标单击这一编辑框。 ★ Locked属性： 指定文本控件是否可被编辑。 默认值为 False，表示可编辑，当设置为 True时，文本控件相当于标签的作用。 ★ SelStart、 SelLength和 SelText属性： 在程序运行中，对文本内容进行选择操作时，这三个属性用来表示用户选定的正文： SelStart — 选定的正文的开始位置，第一个字符的位置是 0 SelLength — 选定的正文长度。 SelText — 选定的正文内容。 计算机软件技术基础 Visual Basic 程序设计 （ 2）文本框的方法 文本框最有用的方法是 SetFocus， 该方法是把光标移到指定的文本框中。 当在窗体上建立了多个文本框后 ， 可以用该方法把光标置于所需要的文本框上。 它的格式是： ［ 对象 ． ］ SetFocus 激活文本框的方法有： ★ 按 Tab键或用鼠标单击文本框 ★ SetFocus方法：把光标移到指定的文本框中。 （ 3）文本框的事件 ★ Change事件： 当用户输入新内容或当程序将 Text属性设置为新值 ， 从而改变文本框的 Text属性时会引发该事件。 当用户键入一个字符时 ， 就会引发一次 Change事件。 例如用户键入 Visual Basic一词时 ， 会引发 12次 Change事件。 计算机软件技术基础 Visual Basic 程序设计 ★ KeyPress事件 当用户按下并且释放键盘上的一个键时 ， 就会引发焦点所在控件的 KeyPress事件 ， 此事件会返回一个 KeyASCII参数到该事件过程中。 例如 ， 当用户键入字符 “ a”时 ， 返回 KeyASCII的值为 97， 通过 Chr（ KeyAscII） 可以将 ASCII码转换为字符 “ a”。 ★ GotFocus事件： 当光标转到文本框中时发生 ， 最常用的处理是对文本内容的选定。 通常情况下 ， 能引发 GotFocus事件的情况是： l） 用户按 Tab键 ， 跳转到该文本框中； 2） 用户用鼠标单击文本框； 3） 用户在程序代码中用 SetFocus方法激活了该文本框。 GotFocus事件过程的基本语法是： Sub Text_GotFocus（［ Index As Integer］） 计算机软件技术基础 Visual Basic 程序设计 ★ LostFocus事件： 当光标离开文本框中时发生，主要用来对数据更新进。