mostrar dos campos en listfield de un datacombo

[Salvadri]

Digamos el ejemplo, selecciono todos los datos de los socios en un RecordSet, pero adiciono un campo NOM compuesta de la suma de apesoc mas nomsoc (Apellidos y Nombres)

Dim rsSocios As ADODB.Recordset

Set rsSocios = New ADODB.Recordset

rsSocios.Open "Select *,(apesoc + ', ' + nomsoc) as NOM From maesoc", DBconexion, adOpenStatic, adLockOptimistic

Set DataCombo.RowSource = rsSocios

En las propiedades del DataCombo pones, por ej.
ListField: NOM
BoundColumn: idsocio

Espero te ayude....y no haya sido muy tarde, de todos modos para alguien ayudara