vb.net入门——ComboBox 控件的使用

　　前面我们了解了ListBox(列表框)控件的使用(参看：vb.net入门——ListBox控件的使用)，在vb.net中还有一个与ListBox控件十分相似的控件——ComboBox 控件，也叫组合框。组合框控件包括两个部分，一部分是上部可以输入列表项的文本框；另一部分是位于文本框下方的列表框，用于显示用户可以从中选择的项的列表，如图一所示

组合框控件在vb.net工具箱中如下图二所示：

　　ComboBox 控件和ListBox 控件在功能上很相似，很多情况下，这两个控件是可以互换使用的，但是还是有某种特定的环境下只适合使用一种控件的情况。

　　通常，ComboBox控件适合于建议用户选择控件所列举的选项、同时又可以让用户自行在文本框中输入列表中不存在的选项的情况；而ListBox 控件适合于限制用户只能选择列表中的选项的情况。

　　在用户界面上，因为ComboBox 控件默认情况下是存在下拉列表框的，所以比ListBox 控件占用的窗体空间少，更加适合于使用在存在大量列表项的情况下。如下图三所示的是QQ修改个人设置的界面，它大量地合理使用ComboBox 控件，使得用户界面简洁且能容纳下更多的选项信息。

　　由此可见，ComboBox 控件的比ListBox 控件更加能灵活多用。

　　一、ComboBox 控件的常用属性：

　　1、BackColor 属性：获取或设置ComboBox 控件的背景色。

　　2、DropDownStyle 属性：获取或设置指定组合框样式的值，确定用户能否在文本部分中输入新值以及列表部分是否总显示。它包含三个值，默认值为 DropDown，如下表所示：

　　3、DropDownWidth 属性：用于获取或设置组合框下拉部分的宽度（以像素为单位），有些列表项太长，则需要通过改变该属性来显示该类表项的全部文字，如果未设置 DropDownWidth 的值，该属性返回组合框的 Width。需要注意的是，下拉部分的宽度不能小于 ComboBox 的宽度，所以我们设置 DropDownWidth 的值如果小于ComboBox 的宽度时下拉列表框的宽度还是与文本框的宽度一样。

　　4、DroppedDown 属性：获取或设置一个值，该值指示组合框是否正在显示其下拉部分。如果显示下拉部分，则为 true；否则为 false。默认值为 false。

　　5、IntegralHeight 属性：指定是否自动调整编辑框或列表框控件的高度，这样可以正确显示控件中的最后一项。指定是否自动调整文本框控件的高度，以显示一行文本。设计时可用；运行时只读。默认为False。如果列表框控件的高度不合适，则控件中的最后一行文字会只显示一部分，将 IntergralHeight 设置为“True” ，可以自动调整控件的高度，这样可以正确显示控件中的最后一项。注意：当 integralheight 属性设置为“True” 时，Height 属性的值可能与控件的真实高度不符。

　　6、Items 属性：获取一个对象，该对象表示该 ComboBox 中所包含项的集合。详细用法我们在下文介绍。

　　7、MaxDropDownItems 属性：下拉部分中可显示的最大项数。该属性的最小值为 1，最大值为 100。

　　8、Text 属性：ComboBox 控件中文本输入框中显示的文本。

　　9、SelectedIndex 属性和 SelectedItem 属性：SelectedIndex 属性返回一个表示与当前选定列表项的索引的整数值，可以编程更改它，列表中相应项将出现在组合框的文本框内。如果未选定任何项，则SelectedIndex 为-1；如果选择了某个项，则SelectedIndex 是从0开始的整数值。SelectedItem 属性与 SelectedIndex 属性类似，但是SelectedItem 属性返回的是项。

　　10、SelectedText 属性：表示组合框中当前选定文本的字符串。如果 DropDownStyle 设置为 ComboBoxStyle.DropDownList，则返回值为空字符串 ("")。可以将文本分配给此属性，以更改组合框中当前选定的文本。如果组合框中当前没有选定的文本，则此属性返回一个零长度字符串。如下代码，我们可以在ComboBox 控件的鼠标事件中验证该属性：

　　Private Sub ComboBox1_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles ComboBox1.MouseUp

　　MessageBox.Show(ComboBox1.SelectedText)

　　End Sub

　　返回的值则是我们用鼠标选定了的文本。

　　与之对应的 SelectionLength 属性返回的则是该文本的字符数，SelectionStart 属性返回的则是组合框中选定文本的起始位置。

　　二、ComboBox 控件的重要方法：

　　1、BeginUpdate 方法和 EndUpdate 方法：当使用Add 方法一次添加一个项时，则可以使用 BeginUpdate 方法，以防止每次向列表添加项时控件都重新绘制 ComboBox。完成向列表添加项的任务后，调用 EndUpdate 方法来启用 ComboBox 进行重新绘制。当向列表添加大量的项时，使用这种方法添加项可以防止绘制 ComboBox 时闪烁。如下代码所示：

　　Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

　　Dim i As Integer = 0

　　ComboBox1.BeginUpdate()

　　For i = 0 To 999

　　ComboBox1.Items.Add("Item " &ComboBox1.Items.Count.ToString)

　　Next

　　ComboBox1.EndUpdate()

　　End Sub

　　2、Add 方法：items属性的方法之一，一般这样来使用：

　　ComboBox1.Items.Add("Item 0" )

　　还可以使用items属性的Clear方法来清除所有的列表项。

　　3、FindString 方法和FindStringExact 方法：

　　FindString 方法用于查找 ComboBox 中以指定字符串开始的第一个项，该方法是模糊查询，但是查找的字符串一定在匹配项的开始位置。

　　FindStringExact 方法用于查找与指定字符串完全匹配的项。

　　4、GetItemText 方法：返回指定项的文本表示形式。使用形式如下：

　　GetItemText(item)

　　三、示例:

　　我们这里以代码来了解ComboBox 控件的使用，在窗体中加入一个Combobox控件，四个Button控件，一个TextBox控件，一个GroupBox控件，布局如下图四所示：

1、在“添加1000项”的按钮Click事件中添加如下代码：

　　Dim i As Integer = 0

　　ComboBox1.BeginUpdate()

　　For i = 0 To 999

　　ComboBox1.Items.Add("Item " &(ComboBox1.Items.Count + 1).ToString)

　　Next

　　ComboBox1.EndUpdate()

　　2、在“添加一个项”按钮Click事件中添加如下代码：

　　ComboBox1.Items.Add(TextBox1.Text)

　　即以文本框中输入的文本作为项的文字。

　　3、在“查找模糊匹配项”按钮的Click事件中添加如下代码：

　　ComboBox1.SelectedIndex = ComboBox1.FindString(TextBox1.Text)

　　即返回以文本框中输入的文本开头的第一项作为ComboBox控件的选中项。

　　4、在“查找完全匹配项”按钮的Click事件中添加如下代码：

　　ComboBox1.SelectedIndex = ComboBox1.FindStringExact(TextBox1.Text)

　　即返回与文本框中输入的文本完全匹配的项作为ComboBox控件的选中项。

　　5、在ComboBox1的SelectedIndexChanged事件中添加如下代码：

　　Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

　　MessageBox.Show(ComboBox1.GetItemText(ComboBox1.SelectedItem))

　　End Sub

　　当ComboBox1的当前选中项改变时，通过GetItemText方法返回当前选中项的文本。　

　　现在可以运行测试。还有其它的一些方法，可以查看ListBox控件的文章：vb.net入门——ListBox控件的使用