Datacombo con dos campos

juanolas
21 de Mayo del 2004
Hola a todos-as.
Quisiera saber como mostrar dos o mas campos en un datacombo,ya sea la fuente de informacion un recordset o variables.
Gracias de antemano.

Julio
21 de Mayo del 2004
Private Sub Form_Load()
Dim SQL$

Call Cadenaconexion
SQL = "Select Id_obrero,Nombre+' '+Apellidos as Name From Obrero"

Call valores(SQL)
End Sub

Sub valores(SQL$)

Call inicializarecordset(SQL)

\'Codigo para rellenear el DataCombo
With Datacombo1
Set .RowSource = rs \'Control Ado
\'.BoundColumn = Idcampo \'El campo relacionado
.ListField = rs.Fields(1).Name \'Campo que aparece en el datacombo
.DataField = rs.Fields(0).Name

\'Establecer el origen de datos para el que _
el datacombo muestre el primer registro
Set .DataSource = rs
End With
Set rs = Nothing
End Sub