none
Uso del Comobox RRS feed

  • Pregunta

  • Buen dia,

    tengo un formulario en visual basic 6 y en el un combobox que me trae informacion de una columna de una tabla, la base de datos esta en access, sin embargo lo que necesito es que el combobox cargue la columna producto y que en la base de datos guarde el id_producto correspondiente.

    agradezco la colaboracion.

    jueves, 10 de marzo de 2016 1:41

Respuestas

  • Si id_producto es de tipo entero puedes usar la propiedad ItemData del Combo:

    Set rs = New ADODB.Recordset
    qry = "Select producto, id_producto from miTabla"
    rs.Open qry, Cn, adOpenDynamic, adLockReadOnly
    If rs.EOF = False Then
        Do Until rs.EOF
            miCombo.AddItem rs!producto
            miCombo.ItemData(miCombo.NewIndex) = Val(rs!id_producto)
            rs.MoveNext
        Loop
    End If

    El Valor del ItemData tiene que ser entero, En caso de que no lo fuese tendrías que usar un array en el que grabes los valores y en Itemdata almacenarías el índice que corresponda en el array.


    Saludos, Javier J

    • Marcado como respuesta Jeff M Quintero viernes, 11 de marzo de 2016 17:31
    jueves, 10 de marzo de 2016 7:56