cargar textbox seleccion combobox

[guillebomtrasmiti]

hola amigos por aquí otra vez, me estoy volviendo loco con un histórica tontería....tengo un combo box...al seleccionar algo en el combo box necesito que en un textbox se cargue otro campo que está en la misma tabla...os mando el codigo que carga el combo a ver si alguién me ayuda rapido gracias

Public Sub cargaproductos()

Dim adaptador As New OleDb.OleDbDataAdapter("Select Plu,NomProducto From Productos", conexion)

Dim midataset As New DataSet

adaptador.Fill(midataset, "Productos")

Comboproducto.DataSource = midataset.Tables("Productos")
Comboproducto.DisplayMember = "NomProducto"
Comboproducto.ValueMember = "Plu"

End Sub

[guillebomtrasmiti]

asi consigo que aparezca el último dato de la columna que necesito mostrar en el textbox pero no me aparece el que estoy seleccionando en el textbox

Dim adaptador As New OleDb.OleDbDataAdapter("Select Plu,NomProducto From Productos", conexion)

Dim midataset As New DataSet

adaptador.Fill(midataset, "Productos")

Comboproducto.DataSource = midataset.Tables("Productos")
Comboproducto.DisplayMember = "NomProducto"
Comboproducto.ValueMember = "Plu"

For i As Integer = 0 To midataset.Tables("Productos").Rows.Count - 1
TextPlu.Text = CStr((midataset.Tables("Productos").Rows(i).Item(0 )))
Next

End Sub

[Ka0stj]

Ok, es obvio porque estas mostrando el Item(0) de cada Row, si bien la forma en que lo planteas de utilizar DisplayMember y ValueMember es correcto. Ahora bien si quieres mostrar lo que selecciones en un textbox ese ciclo no tiene sentido, tendrias que poner en el evento SelectedIndexChanged de tu combobox algo similar a lo siguiente:

TextPlu.Text = Comboproducto.Text

Puedes utilizar .Text ya que al final de cuentas al parecer el DisplayMember del ComboBox es lo que te interesa.

Saludos!

[guillebomtrasmiti]

bien...pero...bueno, yo no necesito mostrar en el textbox lo que selecciono en el textbox, necesito mostrar un campo llamado Plu...que está en la misma tabla y que es un número que pertenece al nombre seleccionado en el textbox...además haciendolo así, solo me muestra al cargar el formulario el que está en el combo, luego a seleccionar otro no me cambia

[Ka0stj]

ok vamos por partes, se supone que tu tienes un combobox que al seleccionar un Item te mostrará cierta información en tu textbox, estamos de acuerdo?

[guillebomtrasmiti]

si eso es amigo KaOstj, el combo box me muestra la columna NomProducto de la tabla productos, la cual tiene otra columna llamda Plu, y que necesito que al pulsar en el combo el producto en el textplu salga el número de plu que le corresponde

[guillebomtrasmiti]

Private Sub Comboproducto_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs) Handles Comboproducto.SelectedIndexChanged

Me.TextPlu.Text = CStr(undataset.Tables("Productos").Rows(Me.Combopr oducto.SelectedIndex)("Plu"))

End Sub

he probado esto, pero me da un error este;
Object reference not set to an instance of an object.

[guillebomtrasmiti]

listo, pongo la solución por si se puede mejorar, pero bueno ahí va..funcionaaaa

Public Sub cargaproductos()

Dim adaptador As New OleDb.OleDbDataAdapter("Select Plu,NomProducto From Productos", conexion)

Dim midataset As New DataSet

adaptador.Fill(midataset, "Productos")

Comboproducto.DataSource = midataset.Tables("Productos")
Comboproducto.DisplayMember = "NomProducto"
Comboproducto.ValueMember = "Plu"
'TextPlu.Enabled = False

End Sub
Private Sub Comboproducto_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs) Handles Comboproducto.SelectedIndexChanged
Dim adaptador As New OleDb.OleDbDataAdapter("Select Plu,NomProducto From Productos", conexion)

Dim midataset As New DataSet

adaptador.Fill(midataset, "Productos")

Me.TextPlu.Text = CStr(midataset.Tables("Productos").Rows(Me.Combopr oducto.SelectedIndex)("Plu"))

End Sub

[Ka0stj]

Excelente que bien que lo hayas solucionado, sorry por no responder tan rápido pero de la misma forma me encuentro trabajando y en escapaditas entro al foro.

Saludos!

[guillebomtrasmiti]

eh...sorry nada de nada siempre tu ayuda sea temprano o tarde es de agradecer...un abrazo amigo

[tiger015]

saludo , creo ke haces algunas cosas innecesarias
pues solo tienes ke hacer tu consulta con los dos campos ke necesitas
asignas a tu combo.DataSource = Tutabla
combo.DisplyMember = "Campo a mostrar"
combo.ValueMember = "valor ke necesitas"

y en el evento SelectedIndexChanged

textbox.Tex = combo.SelectedValue.ToString()

[guillebomtrasmiti]

voy a probarlo y te digo si me funciona...gracias amigo

[guillebomtrasmiti]

tenías toda la razón, muchas cosas sobraban, como tu comentas funciona a la perfección un abrazo

[Aquaventus]

Eso guille!

[Tefff]

Iniciado por tiger015

saludo , creo ke haces algunas cosas innecesarias
pues solo tienes ke hacer tu consulta con los dos campos ke necesitas
asignas a tu combo.DataSource = Tutabla
combo.DisplyMember = "Campo a mostrar"
combo.ValueMember = "valor ke necesitas"

y en el evento SelectedIndexChanged

textbox.Tex = combo.SelectedValue.ToString()

Hola, necesito ayuda, tengo el mismo inconveniente. necesito mostrar en un textbox (txtdescripcion) lo que se seleccionó en un combobox (cbonombres).

En la tabla PIDE, tendría que seleccionar con el combobox el numero de oficina que solicita algo, y mostrarme en el textbox la localidad de la oficina dentro de la tabla OFICINA.

Osea
select localidad where codigo = cbocodigo

pero tendría que ser en .NET