elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.


 


Tema destacado: ¿Eres nuevo? ¿Tienes dudas acerca del funcionamiento de la comunidad? Lee las Reglas Generales


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  Combobox dependientes
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Combobox dependientes  (Leído 803 veces)
SilverLycan68

Desconectado Desconectado

Mensajes: 10


Ver Perfil
Combobox dependientes
« en: 5 Mayo 2018, 02:09 »

Buenas tardes.
Estoy haciendo 2 combobox uno dependiente del anterior desde una base de datos. El combobox1 se llena correctamente, pero el combobox2 añade los elementos cada vez que cambio la selección del combobox1.
¿Cuál es mi error si quiero que sólo muestre las opciones de lo que estoy seleccionando?
Código
  1. 'Cargar el combobox1'
  2. Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  3.        Dim con As New MySqlConnection
  4.        con.ConnectionString =  ("Server=localhost;DataBase=autos;uid=root;pwd=root").ToString
  5.        con.Open()
  6.        Dim query As String = "select distinct MARCA from autos"
  7.        Dim cmd As New MySqlCommand(query, con)
  8.        Dim reader As MySqlDataReader = cmd.ExecuteReader
  9.        While reader.Read
  10.            ComboBox1.Items.Add(reader.GetString("MARCA"))
  11.        End While
  12.  
  13.        End Sub
  14. 'Cargar combobox2 dependiendo selección de combobox1'
  15. Private Sub ComboBox1_SelectionChangeCommitted(sender As Object, e As EventArgs) Handles ComboBox1.SelectionChangeCommitted
  16.        Dim con As New MySqlConnection
  17.        con.ConnectionString = ("Server=localhost;DataBase=autos;uid=root;pwd=root").ToString
  18.        con.Open()
  19.        Dim query As String = "select MODELO from autos where MARCA='" + ComboBox1.SelectedItem + "'"
  20.        Dim cmd As New MySqlCommand(query, con)
  21.        Dim reader As MySqlDataReader = cmd.ExecuteReader
  22.        While reader.Read
  23.            ComboBox2.Items.Add(reader.GetString("MODELO"))
  24.  
  25.        End While
  26.  
  27.    End Sub
  28.  


En línea

Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.709



Ver Perfil
Re: Combobox dependientes
« Respuesta #1 en: 5 Mayo 2018, 06:37 »

el combobox2 añade los elementos cada vez que cambio la selección del combobox1

Código
  1. ...
  2. While reader.Read
  3.    ComboBox2.Items.Add(reader.GetString("MODELO"))
  4. End While
  5. ...

Tú mismo estás diciendo lo que hace el código, ahora pregúntate lo que no hace o faltaría por hacer: eliminar los elementos previamente agregados a la colección de elementos del ComboBox...


O bien puedes optar por establecer un origen de datos y así simplificar la adición y eliminación de dichos elementos...


Saludos.


« Última modificación: 5 Mayo 2018, 06:43 por Eleкtro » En línea


Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Licencia de dependientes [Consulta]
Programación Visual Basic
Deeo Raiser 0 812 Último mensaje 17 Septiembre 2012, 03:57
por Deeo Raiser
Problema con menus dependientes
PHP
carlosuc99 1 1,140 Último mensaje 23 Diciembre 2012, 22:44
por carlosuc99
cargar valor de combobox dependientes
Desarrollo Web
OssoH 2 2,057 Último mensaje 16 Octubre 2013, 15:10
por OssoH
ayuda con combobox dependientes
Desarrollo Web
landerzx 2 1,283 Último mensaje 17 Abril 2015, 12:27
por anosh
Select dependientes
Desarrollo Web
Ethgar 2 858 Último mensaje 9 Octubre 2014, 04:50
por JorgeEMX
Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines