ATENCIÓN AL CLIENTE: +34 923 199 148

Rellenar un ComboBox

Para rellenar un ComboBox, tenemos que realizar lo siguiente:

Dim sql As String
Dim cn as MySqlConnection
Dim cm As MySqlCommand
Dim da As MySqlDataAdapter
Dim ds as DataSet
cn = new MySqlConnection(“Data Source=servidor;Database=base_de_datos;User ID=usuario; Password=clave; Allow Zero Datetime=True; CHARSET=latin1”)
cn.open()

sql = “SELECT valor1,valor2 FROM tabla_que_corresponda”

cm = New MySqlCommand()
cm.CommandText = sql
cm.CommandType = CommandType.Text
cm.Connection = cn

da = New MySqlDataAdapter(cm)
ds= New DataSet()
da.Fill(ds)

cmbSeccion.DataSource = ds.Tables(0)
cmbSeccion.DisplayMember = “valor1”
cmbSeccion.ValueMember = “valor2”

El campo valor1 se mostrará en el combo, mientras que el campo valor2 se almacenará en la propiedad Value de dicho combo.

Quizá te interese...
Rutina para rellenar un dataset con una consulta SQL procedente de una base de datos MySQL con ADO.NET. Se incluye una caja de texto que permite filtrar información de los datos del datagridview, en función al contenido de dicha caja (Versión 2)