Agregar dos campos a un combo

[spiderman78]

Que tal, tengo una consulta, tengo un combo al cual ya le agrego un campo de esta manera

Código:

Private Sub AgregarComboAgenda()
Call VisualizarPacientes
    With recbd
       Combo1.Clear
      Do Until .EOF
            Combo1.AddItem .Fields(3)
            Combo1.ItemData(Combo1.NewIndex) = .AbsolutePosition
            .MoveNext
        Loop
    End With
End Sub

pero quisiera saber como puedo agregar dos campos al mismo combo es de cir ahorita agrego el 3 q es apellido pero tambien quiera agregar el 2 q es el nombre, y la otra cuestion seria como puedo agregarlos en forma ascendente es decir de la a a la z...... bueno de antemano gracias por las respuestas


saludos