Inicio > Desarrollo Escritorio > Cargando Datos de una BD con ValueMember y DisplayMember en .NET

Cargando Datos de una BD con ValueMember y DisplayMember en .NET

Creamos nuestro metodo llenarcombo


Sub llenarcombo()
Dim cmd As New SqlCommand
Dim cn As New SqlConnection
Dim dr As SqlDataReader
Dim dt As New DataTable("persona")

cn.ConnectionString = "Data Source=ALCALDE\SQLEXPRESS;Database=SISclinica;Integrated Security=True"
cn.Open()
If cn.State = ConnectionState.Open Then

cmd.Connection = cn
cmd.CommandType = CommandType.Text
cmd.CommandText = "select cpercodigo,cperapellido from persona"
dr = cmd.ExecuteReader()
dt.Load(dr)
With ComboBox1
.DataSource = dt
.DisplayMember = "cperapellido"
.ValueMember = "cpercodigo"

End With

cn.Close()
End If

End Sub

Cargamos nuestro metodo en el evento load del formulario

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

End Sub

Para verificar que se estan enviando los codigo tras los combos usaremos


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

Dim code As String
code = ComboBox1.SelectedValue.ToString
MsgBox(code)

End Sub

Categorías:Desarrollo Escritorio
  1. Aún no hay comentarios.
  1. No trackbacks yet.

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s

A %d blogueros les gusta esto: