ComboBox Control

VB.Net controls are located in the Toolbox of the development environment, and you use them to create objects on a form with a simple series of mouse clicks and dragging motions. The ComboBox control , which lets the user choose one of several choices.

The user can type a value in the text field or click the button to display a drop down list. In addition to display and selection functionality, the ComboBox also provides features that enable you to efficiently add items to the ComboBox.

  ComboBox1.Items.Add("Sunday")

You can set which item should shown while it displaying in the form for first time.

  ComboBox1.SelectedItem = ComboBox1.Items(3)

When you run the above code it will show the forth item in the combobox. The item index is starting from 0.

If you want to retrieve the displayed item to a string variable , you can code like this

  Dim var As String
  var = ComboBox1.Text

You can remove items from a combobox in two ways. You can remove item at a the specified index or giving a specified item by name.

  ComboBox1.Items.RemoveAt(1)

The above code will remove the second item from the combobox.

  ComboBox1.Items.Remove("Friday")

The above code will remove the item "Friday" from the combobox.

The DropDownStyle property specifies whether the list is always displayed or whether the list is displayed in a drop down. The DropDownStyle property also specifies whether the text portion can be edited.

  ComboBox1.DropDownStyle = ComboBoxStyle.DropDown

The following VB.Net source code add seven days in a week to a combo box while load event of a Windows Form and display the fourth item in the combobox.

Public Class Form1
	Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
		ComboBox1.Items.Add("Sunday")
		ComboBox1.Items.Add("Monday")
		ComboBox1.Items.Add("Tuesday")
		ComboBox1.Items.Add("wednesday")
		ComboBox1.Items.Add("Thursday")
		ComboBox1.Items.Add("Friday")
		ComboBox1.Items.Add("Saturday")

		ComboBox1.SelectedItem = ComboBox1.Items(3)
	End Sub

	Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
		Dim var As String
		var = ComboBox1.Text
		MsgBox(var)
	End Sub
End Class