Combo box con base de datos

Como coloco en un combo box datos de una base de datos en Access, me funciona bien pero solo me muestra un registro y lo puedo recorrer desde el control. Quisiera que al desplegar el control me muestre un listado de localiadades por ejemplo que los tengo en una tabla en Access. Estoy usando el componente Microsoft Ado data control 6.0.
Gracias
1

1 respuesta

1
Respuesta de
Puedes hacer lo que necesitas utilizando un ciclo que recorra la tabla en el campo que indiques y vaya agregándolos al ComboBox:
Private Sub Form_Load()
    With Adodc1
        'consultar de una tabla
        .CommandType = adCmdTable
        'indicar la tabla a consultar
        .RecordSource = "Localidades"
        'actualizar los datos del la instrucción _
        Que acabamos de enviar [consultar de Tabla : Localidades]
        .Refresh
        'moverse al primer registro de la tabla
        .Recordset.MoveFirst
        'recorrer cada uno de los registros
        For i = 0 To .Recordset.RecordCount - 1
            'agregar cada elemento encontrado al ComboBox
            Combo1.Additem .Recordset("Nombre_Localidad").Value
            'moverse al siguiente registro
            .Recordset.MoveNext
        Next i
    End With
End Sub
NOTA: Para esto no es necesario enlazar el ComboBox al ADODC.
Si tienes alguna otra duda consúltame y la resolvemos.
Saludos desde México. Juan Pablo E.P.
Gracias Juan Pablo, anduvo bárbaro, costó un poco pero cuando saque el enlace con el control funcionó de 10. Ahora me queda guardar el código de esa localidad (clave en la misma tabla) en otra tabla Clientes...(¿complicado no?)
Añade un comentario a esta respuesta
Añade tu respuesta
Haz clic para o
Escribe tu mensaje
¿No es la respuesta que estabas buscando? Puedes explorar otras preguntas del tema Visual Basic o hacer tu propia pregunta: