Visual Basic - ayuda con los combos

Life is soft - evento anual de software empresarial
   
Vista:

ayuda con los combos

Publicado por sebastian (6 intervenciones) el 09/02/2010 16:15:03
tengo dos combobox ,en el cual existe un combo padre, en donde se hace click en los datos de la lista y despliega sus datos asociados en el 2do combo;

-El problema es el sgte :

al presionar un dato de la lista del 1er combo me salen sus datos asociados al 2do cbo. pero si pincho otro elemento en el 1er cbo. salen sus datos asociados pero con los que tenia anteriormente,lo que quiero hacer es que al pichar otro dato los datos que estaban anteriormente se borren en el 2do cbo y sean reemplazado por los datos que corresponden osea..
eliminar la repetitividad .

este es el codigoo:

Private Sub cbo_pro_click()
sql = "SELECT * from funciones where cod_pro=" & cbo_pro.ListIndex & " "

rs.Open sql, cnn, 1, 2, adCmdText
If Not rs.EOF Then
Do While Not rs.EOF
cbo_fun.AddItem rs(1)
rs.MoveNext

Loop
End If
rs.Close
End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:ayuda con los combos

Publicado por ChidUn (44 intervenciones) el 09/02/2010 21:54:14
Hola has esto:

Private Sub cbo_pro_click()
sql = "SELECT * from funciones where cod_pro=" & cbo_pro.ListIndex & " "
rs.Open sql, cnn, 1, 2, adCmdText
If Not rs.EOF Then

CBO_FUN.clear '>>>>>--------->esto elimina la lista del Combo

Do While Not rs.EOF
cbo_fun.AddItem rs(1)
rs.MoveNext

Loop
End If
rs.Close
End Sub

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:ayuda con los combos

Publicado por sebastian (6 intervenciones) el 10/02/2010 13:19:28
gracias masterr!!!!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar