Visual Basic - combo listar unos campos de una tabla

Hola
Necesito en un combo listar unos campos de una tabla
Que propiedades debo activar para que este aliste los registros de un campo y como saco el dos campos y el valor a evaluar es el segundo de la lista ejemplo
Listar campo nombre y campo código que se vea amparo 101

Hola Agustín, espero poder ayudarte con el código que te paso

Dim RsTabla As New ADODB.Recordset
Dim sCadena As String
Dim iIndice As Integer
' On Error Resume Next
Set BD = AbrirBaseDatos(App.Path & "\Ellos.mdb")
Set RsTabla = AbrirTabla("tblProyectos")
Combo.Clear
With RsTabla
Do While Not .EOF And Not .BOF
sCadena = .Fields(0) & " " & .Fields(1)
iIndice = Combo.NewIndex + 1
Combo.AddItem sCadena, iIndice
sCadena = ""
.MoveNext
Loop
End With
Combo.ListIndex = 0
' On Error GoTo 0

BD contiene la base de datos
RsTabla es la tabla o consulta de la que obtendras los datos
.Fields(0) y .Fields(1) son los campos que deseas obtener de RsTabla, también sino recuerdo mal puedes poner el nombre de los campos encerrados entre comillas y los igualamos a una variable que luego añadiremos en el combo.

Creo que esto soluciona tu problema.

Suerte