VB教程：组合框（ComboBox）

7.组合框

功能:ComboBox控件实际上结合了TextBox控件和ListBox控件的功能。它不仅可以像文本框控件一样允许用户输入新内容，还可以像列表框控件一样允许用户选择列表中的项目。

ComboBox控件的属性、方法和事件与ListBox控件大致相同。这里只提出不同的部分进行对比。

(1)款式配件

组合框控件的样式属性不同于列表框控件的样式属性。请参见下表中的描述。

常量说明
vbComboDropDown 0下拉组合框(默认值)。包括文本框和下拉列表，可以从列表中选择或在文本框中输入。

vbComboSimple 1简单组合框。包括一个文本框和一个不能下拉的列表。您可以从列表中选择，也可以在文本框中输入。简单组合框的大小包括编辑和列表部分。默认情况下，简单组合框在不显示列表的状态下调整大小。增加Height属性的值以显示列表的更多部分。
vbComboDropDownList 2下拉列表。只能从下拉列表中选择该样式。

示例:在窗体上添加三个ComboBox控件，样式属性分别设置为0、1、2。

添加代码:

私有子窗体_Load()

组合1。AddItem“北京”[br/]combo 1。AddItem“上海”

组合2。AddItem“北京”[br/]combo 2。AddItem“上海”

Combo3。AddItem“北京”[br/]combo 3。AddItem“上海”

末端接头

显示如下:

(2)点击事件

通常，单击事件是通过单击鼠标来激活的，但有时也可以通过更改控件的状态来激活。

示例:向窗体添加一个ComboBox控件。属性值见教材P134的表5-12。

添加如下代码:

私有子窗体_Load()

组合1。AddItem "Shanghai " '添加项目
Combo1。AddItem“北京”[br/]combo 1。AddItem“杭州”[br/]combo 1。AddItem“Xi安”

末端接头

-

私有子组合1_Click()

选择案例组合1。Text '根据所选项目判断
案例"北京"
MsgBox "北京-中国的首都"
案例"上海"
MsgBox "上海-不夜城"[ms box "杭州-西湖"[ms box "
案例" Xi安"
Msbox "Xi安-兵马俑"[br/]End Select

结束Sub