Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Agregar dos campos a un combo

Estas en el tema de Agregar dos campos a un combo en el foro de Visual Basic clásico en Foros del Web. 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 ...
  #1 (permalink)  
Antiguo 11/10/2008, 09:39
 
Fecha de Ingreso: abril-2008
Mensajes: 281
Antigüedad: 16 años, 1 mes
Puntos: 1
Sonrisa Agregar dos campos a un combo

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
  #2 (permalink)  
Antiguo 11/10/2008, 10:17
Colaborador
 
Fecha de Ingreso: enero-2008
Ubicación: Unas veces aquí, otras veces allí
Mensajes: 1.482
Antigüedad: 16 años, 3 meses
Puntos: 37
Respuesta: Agregar dos campos a un combo

Cita:
Iniciado por spiderman78 Ver Mensaje
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
A la primera pregunta:
Sólo tienes que concatenar (con un espacio o cualquier otro carácter) el campo nombre. p.e. Garcia, Antonio

Combo1.AddItem .Fields(3) & ", " & .Fields(2)

A la segunda: Pones la propiedad Sorted del Combo a True, y eso es todo.

  #3 (permalink)  
Antiguo 11/10/2008, 13:06
 
Fecha de Ingreso: abril-2008
Mensajes: 281
Antigüedad: 16 años, 1 mes
Puntos: 1
De acuerdo Respuesta: Agregar dos campos a un combo

Cita:
Iniciado por Avellaneda Ver Mensaje
A la primera pregunta:
Sólo tienes que concatenar (con un espacio o cualquier otro carácter) el campo nombre. p.e. Garcia, Antonio

Combo1.AddItem .Fields(3) & ", " & .Fields(2)

A la segunda: Pones la propiedad Sorted del Combo a True, y eso es todo.

Muchas gracias por las respuestas funcionaron perfectamente bien

saludos
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 07:22.