第 十一 讲

基本课题：VB常用控件介绍（三）

教 学 目 的 与 要 求：

通过实例掌握列表框、组合框、单选钮的常用属性、方法和事件

教 学 的 重 点、难 点：

重点、难点：列表框、组合框、单选钮的常用属性

对 教 材 的 处 理 和 意 见：

以教材为主，联系实际情况及时做补充

五. 列表框（ListBox）

ListBox（列表框）控件用于显示项目列表。用户可以从列表框中的一系列选项中选择一个或多个选项。项目较多不能一次全部显示时，VB会自动加上垂直滚动条。

1.列表框的属性

List属性设置列表框中包含的项。List1.List(0)开始

ListCount属性列表中全部元素的个数。

ListIndex属性当前所选择元素的下标。

问题：假设现在选中的是第三项，但我们事先不知道用户要选择这一项，那么又如何访问这第三项呢？

List1.list(list1.listindex)

Selected属性在程序运行中使用代码来选中列表中的选项，如List1.selected(2)=True表示选中List1的第3项。

Sorted 属性设置按字母顺序排列项目。

Text 属性返回列表中当前选项的文本内容

Columns属性设置是水平滚动还是垂直滚动。（ 0 垂直/1水平）

MultiSelect属性设置是否能够做多个选择。

Style属性设置列表框风格。

2. 列表框的方法

列表框中的选择项可以用List 属性设置，也可在程序中用方法来添加或删除

1. 添加项目：列表框.AddItem item[, index]

例如：List1.AddItem “数学”

2.清除项目：清除列表框中所有内容

对象.Clear

如： list1.Clear

3.删除项目：列表框.RemoveItem index

例如：List1. RemoveItem0

列表框经常用到的操作还有：

4.获得列表项目内容 ：列表框.List(index)

例如：Text1.Text = List1.List(2)

5.用 ListIndex 属性判断项目位置 。

例如： List1.List(List1.ListIndex) = Text1.Text

6.用 ListCount 属性返回项目数 。

例7（6-9）

例8（6-12）

六.组合框（ComboBox）

ComboBox（组合框）控件将文本框和列表框的功能结合在一起。有了这个控件，用户可通过在组合框中输入文本来选定项目，也可用鼠标从列表中选定项目。

在使用方式上，组合框具有和列表框相似的特征。

1.属性：

组合框的特点是可由Style属性设置三种组合样式。

1）Style属性

Style属性为0：下拉组合框，仅显示文本编辑框和下拉箭头。单击下拉箭头打开列表框，可选择可输入。可识别 Dropdown 、Click、Change 事件。

Style属性为1 ：简单组合框。显示列表框内容和文本框，文本框右侧没有下拉箭头。可以输入列表框中没有的项。可识别 Change 、DblClick 事件。

Style属性为2 ：下拉列表框，不能输入列表框中没有的项，文本编辑框右有下拉箭头。它不能识别 DblClick 及 Change 事件，但可识别 Dropdown 、Click 事件。

2)Text属性：用户所选择的项目的文本内容或直接从编辑区输入的文本

但要显示多个选项，不能简单地用 Text 属性指定，因为后一选项会覆盖前面的选项，这时，常常要用到窗体的载入事件（Form_Load）。

2.方法：

跟列表框一样，组合框也适用 AddItem 、Clear 、RemoveItem 方法。

例9组合框

七.选项按钮（OptionButton）

作用：显示一个可打开/关闭的选项（同一组只可选中一个选项）。

1.常用属性：

（1）.value= true ‘选中了控件代表的项

.value= false ‘没有选中控件代表的项

例：option1.value=true

要使某个按钮成为单选按钮组中的缺省按钮，只要在设计时将其Value属性设置为True。这样，它将保持被选中状态，直到用户选择另一个不同的单选按钮或用代码改变它。

（2）Alignment：

0：单选钮在左边，标题显示在右边，缺省设置。

1：单选钮载右边，标题显示在左边。

（3）Style：

0-Standard：标准方式。

1-Graphical：图形方式。

（4）Enabled：要禁用单选按钮，将其Enabled属性设置为False。程序运行时，若此单选按钮显示模糊，表示无法选取改单选按钮。

2.选择单选按钮的方法

（1）在运行期间用鼠标单击单选按钮。

（2）用Tab键定位到单选按钮组，然后在组内使用方向键定位单选按钮。

（3）用代码将它的Value属性设置为真：option1.value=true

（4）使用在Label标题中指定的快捷键。

这只要在作为访问键的字母前添加一个连字符(＆)。例如，要为选项按钮标题‘Dos”创建访问键，应在字母“D“前添加连字符:“&Dos”。运行时，字母“D”将带下划线，同时按A1t+D组合键就可选定此选项按钮。

注意：要使标题包含连字符但不创建访问键，就应使标题包含两个连字符(&&)。这样，标题中将显示一个连字符，而且没有字符带下划线。

3.常用事件--Click事件

选定选项按钮时将触发其Click事件。是否有必要响应此事件．这将取决于应用程序的功能。例如，当希望通过更新比Label控件的标题向用户提供有关选定项目的信息时，对此事件作出响应是很有益的。

例 身高体重

例10：乘法、除法、加法、减法运算

4.使用单选钮组

注意：在窗体上画单选按钮。否则不同组的单选按钮不能同时选中。

例11（5-17）

5.使用图形选项按钮