Como enviar datos de una tabla a un combobox???

[ensaltalobas]

queridos amigos del foro Una vez mas acudo a ustedes , para pedir ayuda

necesito enviar todos los datos de una tabla a un combobox

creo que es con un dountil/loop pero no he podido solucionarlo
trabajo con vb6 access 2000 y conexion DAO

Cualquier ayuda sera bien recibida GRACIAS¡¡¡¡¡

[lucasiramos]

Hola. A ver si te sirve...

Código:

Private Sub CargarCbo()
cboArea.Clear
cboAreaFiltro.Clear
 
With TAREAS
	 If .EOF = False Or .BOF = False Then
		 .MoveFirst
		 Do While .EOF <> True
			 cboArea.AddItem Trim(.Fields!DescArea.Value)
			 cboArea.ItemData(cboArea.NewIndex) = CInt(.Fields!CodArea.Value)
 
			 .MoveNext
		 Loop
 
	 End If
End With
End Sub

TAREAS es el Recordset que estoy cargando en el combobox, DescArea es lo que quiero mostrar y CodArea es el código de área (como te habras dado cuenta...)

Si no funciona veremos como lo solucionamos... Saludos. Lucas

[rodfergi]

Para que sirve el .value que anades despues de .DescArea y de .CodArea?

[vbx3m]

Sirve para que el valor de ese campo (value) aparezca en el combobox... Eso es todo... el valor, en este caso del campo...