Ayuda con un ComboBox

[fezaca]

Hola a todos, tengo un formulario donde he puesto un ComboBox, me salen los datos de un campo de mi tabla, y quisiera que al hacer click con el raton pudiera ver el resto de datos que existen en los campos de mi tabla en varios TextBox que tengo en mi formulario
(8 TextBox en total).

Alguien me puede ayudar? Gracias

[wolf_kof]

En vb.net los controles de usuarios (Combobox) tienen una propiedad llamada Tag, esta propiedad te puede servir para guardar el Id o la clave principal del registro y en el evento change item del Combobox metes una consulta y una carga a los textbox para cargar los textbox no esta de mas decir que en el mismo change item antes de la consulta y la carga tienes que limpiar los textbox.

[seba123neo]

en realidad la propiedad se llamaba ItemData en VB6, ahora en .NET no esta mas, pero se puede implementar a traves de una clase y ahi guardar el ID.

saludos.

[softmania]

Hola colega fezaca 

Agrega dos textbox y un combobox (TextBox1,TextBox2,ComboBox1)

Código: (VB) [Seleccionar]

Public Class Form1

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

    Private Sub Agregar_Combo()
        ComboBox1.DisplayMember = "nombre"
        ComboBox1.ValueMember = "id"
        ComboBox1.DataSource = Obtener_Datos()
    End Sub


    Private Function Obtener_Datos() As DataTable
        Dim Dt As New DataTable
        Dim Dr As DataRow

        'aca pongo esto como para tener unos datos en el datatable
        'podrían ser los datos directos de tu BDD

        Dt.Columns.Add(New DataColumn("id", GetType(Integer)))
        Dt.Columns.Add(New DataColumn("nombre", GetType(String)))

        Dr = Dt.NewRow()
        Dr("id") = 10
        Dr("nombre") = "pepe"
        Dt.Rows.Add(Dr)

        Dr = Dt.NewRow()
        Dr("id") = 20
        Dr("nombre") = "juan"
        Dt.Rows.Add(Dr)

       
        Dt.AcceptChanges()

        Return Dt
    End Function

    Private Sub ComboBox1_SelectedValueChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedValueChanged
        TextBox1.Text = ComboBox1.Text
        TextBox2.Text = ComboBox1.SelectedValue
    End Sub
End Class

Espero te sirva ... salu2