VB.Net - 组合框控件

简述

ComboBox 控件用于显示各种项目的下拉列表。它是用户在其中输入项目的文本框和用户从中选择项目的下拉列表的组合。

让我们通过从工具箱中拖动一个 ComboBox 控件并将其放在窗体上来创建一个组合框。

您可以从属性窗口或在运行时填充列表框项。要将项目添加到 ComboBox，请选择 ComboBox 控件并转到该控件属性的属性窗口。单击 Items 属性旁边的省略号 (...) 按钮。这将打开字符串集合编辑器对话框，您可以在其中一行输入一个值。

ComboBox 控件的属性

以下是 ComboBox 控件的一些常用属性 -

序号	属性和描述
1	AllowSelection 获取一个值，该值指示列表是否启用选择列表项。
2	AutoCompleteCustomSource 获取或设置要在 AutoCompleteSource 属性设置为 CustomSource 时使用的自定义 System.Collections .Specialized.StringCollection。
3	AutoCompleteMode 获取或设置一个选项，该选项控制 ComboBox 的自动完成方式。
4	AutoCompleteSource 获取或设置一个值，该值指定用于自动完成的完整字符串的来源。
5	DataBindings 获取控件的数据绑定。
6	DataManager 获取与此控件关联的 CurrencyManager。
7	DataSource 获取或设置此 ComboBox 的数据源。
8	DropDownHeight 获取或设置 ComboBox 下拉部分的高度（以像素为单位）。
9	DropDownStyle 获取或设置指定组合框样式的值。
10	DropDownWidth 获取或设置组合框下拉部分的宽度。
11	DroppedDown 获取或设置一个值，该值指示组合框是否显示其下拉部分。
12	FlatStyle 获取或设置 ComboBox 的外观。
13	ItemHeight 获取或设置组合框中项目的高度。
14	Items 获取一个对象，该对象表示此 ComboBox 中包含的项目的集合。
15	MaxDropDownItems 获取或设置要在组合框的下拉部分中显示的最大项目数。
16	MaxLength 获取或设置用户可以在组合框的可编辑区域中输入的最大字符数。
17	SelectedIndex 获取或设置指定当前选定项的索引。
18	SelectedItem 获取或设置 ComboBox 中当前选定的项目。
19	SelectedText 获取或设置在 ComboBox 的可编辑部分中选择的文本。
20	SelectedValue 获取或设置由 ValueMember 属性指定的成员属性的值。
21	SelectionLength 获取或设置在组合框的可编辑部分中选择的字符数。
22	SelectionStart 获取或设置组合框中选定文本的起始索引。
23	Sorted 获取或设置一个值，该值指示组合框中的项目是否已排序。
24	Text 获取或设置与此控件关联的文本。

ComboBox 控件的方法

以下是 ComboBox 控件的一些常用方法 -

序号	方法名称和描述
1	BeginUpdate 在调用 EndUpdate 方法之前阻止控件绘制，同时将一项添加到组合框中。
2	EndUpdate 在 BeginUpdate 方法关闭组合框后，继续绘制组合框。
3	FindString 查找组合框中以指定为参数的字符串开头的第一项。
4	FindStringExact 查找组合框中与指定字符串完全匹配的第一项。
5	SelectAll 选择组合框可编辑区域中的所有文本。

ComboBox 控件的事件

以下是 ComboBox 控件的一些常用事件 -

序号	事件和描述
1	DropDown 在显示组合框的下拉部分时发生。
2	DropDownClosed 当组合框的下拉部分不再可见时发生。
3	DropDownStyleChanged 当 ComboBox 的 DropDownStyle 属性更改时发生。
4	SelectedIndexChanged 当 ComboBox 控件的 SelectedIndex 属性更改时发生。
5	SelectionChangeCommitted 当所选项目已更改且更改出现在组合框中时发生。

例子

在这个例子中，让我们用各种项目填充一个组合框，在组合框中获取所选项目并将它们显示在列表框中并对项目进行排序。

拖放一个组合框来存储项目，一个列表框来显示所选项目，四个按钮控件用于将所选项目添加到列表框、填充组合框、对项目进行排序和清除组合框列表，分别。

添加将显示所选项目的标签控件。

在代码编辑器窗口中添加以下代码 -


Public Class Form1
   Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
      ' Set the caption bar text of the form.  
      Me.Text = "tutorialspont.com"
   End Sub
   
   'sends the selected items to the list box
   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
      If ComboBox1.SelectedIndex > -1 Then
          Dim sindex As Integer
          sindex = ComboBox1.SelectedIndex
          Dim sitem As Object
          sitem = ComboBox1.SelectedItem
          ListBox1.Items.Add(sitem)
      End If
   End Sub
   
   'populates the list
   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
      ComboBox1.Items.Clear()
      ComboBox1.Items.Add("Safety")
      ComboBox1.Items.Add("Security")
      ComboBox1.Items.Add("Governance")
      ComboBox1.Items.Add("Good Music")
      ComboBox1.Items.Add("Good Movies")
      ComboBox1.Items.Add("Good Books")
      ComboBox1.Items.Add("Education")
      ComboBox1.Items.Add("Roads")
      ComboBox1.Items.Add("Health")
      ComboBox1.Items.Add("Food for all")
      ComboBox1.Items.Add("Shelter for all")
      ComboBox1.Items.Add("Industrialisation")
      ComboBox1.Items.Add("Peace")
      ComboBox1.Items.Add("Liberty")
      ComboBox1.Items.Add("Freedom of Speech")
      ComboBox1.Text = "Select from..."
   End Sub
   'sorting the list
   
   Private Sub Button3_Click(sender As Object, e As EventArgs)
      ComboBox1.Sorted = True
   End Sub
   'clears the list
   
   Private Sub Button4_Click(sender As Object, e As EventArgs)
      ComboBox1.Items.Clear()
   End Sub
   'displaying the selected item on the label
   
   Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) _
     Handles ListBox1.SelectedIndexChanged
      Label1.Text = ComboBox1.SelectedItem.ToString()
   End Sub
End Class

当上面的代码被执行并运行时使用 Start Microsoft Visual Studio 工具栏上可用的按钮，它将显示以下窗口 -

单击各种按钮以检查每个按钮执行的操作 -

VB.Net - 组合框控件

简述

ComboBox 控件的属性

ComboBox 控件的方法

ComboBox 控件的事件

例子