Combobox-

Como puedo llenar un combobox desde una base de datos en Access97. Tengo un recorset abierto y mediante un for-next intento llenar un combo que variará en cada registro. No lo consigo. Creo que machaco la información.
With Recs
Y = 0
For Y = 1 To 20
CODIG(Y) = Trim(Recs("CODIG" & (Y)))
If IsNull(CODIG(Y)) Then Exit For
form1.Combo1.AddItem CODIG(Y)
Next Y
End With
Me podéis decir como hacerlo o que tema de la ayuda debo mirar. Gracias.

1 respuesta

Respuesta
1
El código sería:
While Not Recs.EOF
Combo1. AddItem Recs("codig")
Recs. MoveNext
Wend
Deberá funcionar.
Suerte !
Rogers R.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas