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

Ordenar MsFlexGrid

Estas en el tema de Ordenar MsFlexGrid en el foro de Visual Basic clásico en Foros del Web. Hola a todos, mi inquietud es la siguiente, necesito ordenar los datos en un MsFlexGrid en tiempo de ejecuion (tiempo Real) o sea, que el ...
  #1 (permalink)  
Antiguo 23/03/2010, 06:40
 
Fecha de Ingreso: mayo-2008
Mensajes: 14
Antigüedad: 15 años, 10 meses
Puntos: 0
Ordenar MsFlexGrid

Hola a todos, mi inquietud es la siguiente, necesito ordenar los datos en un MsFlexGrid en tiempo de ejecuion (tiempo Real) o sea, que el usuario cargue los datos que necesite y que luego pueda darle el orden que necesite, que seleccione la fila y la arrastre con el mouse a la posicion que desee, por ejemplo, si en la fila 10 dice "Progaramador de Visua Basic" que pueda arrastrarla a la fila 1 o a la 5 o a la que necesite, desde ya muchas gracias por sus comentarios
  #2 (permalink)  
Antiguo 31/03/2010, 04:14
 
Fecha de Ingreso: marzo-2010
Mensajes: 15
Antigüedad: 14 años
Puntos: 0
Respuesta: Ordenar MsFlexGrid

Buenos días, para ordenar las columnas alfabéticamente, prueba este código:
suponemos que el nombre del msFlexgrid es grid2:

Private Sub grid2_Click()
Static tipo As Boolean
If (grid2.MouseRow = 0) Then

' Ordena en forma ascendente
If tipo Then
grid2.Col = grid2.MouseCol
grid2.Sort = 2
tipo = False
' Ordena en forma descendente
Else
grid2.Col = grid2.MouseCol
grid2.Sort = 1
tipo = True
End If
End If
End Sub

con esto, al pulsar sobre cualquiera de los encabezamientos, te ordena los campos del flexgrid asociados a la columna sobre la que seleccionaste, de manera ascendente o descendente....

Ya nos contarás.

Etiquetas: Ninguno
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 05:49.