Dbgrid Ordenar Columna
Estoy haciendo practicas en una empresa con Vb6 y necesito a traves de un DbGrid ordenar los datos por cualquier columna que se seleccione
Gracias
Gracias
Private Sub DBGrid2_HeadClick(ByVal ColIndex As Integer)
Data1.RecordSource = "Select * From TRABAJADORES Order By " & _
DBGrid2.columns(ColIndex).DataField
On Error Resume Next
Data1.Refresh
End Sub
Esto ordena el dbgrid segun la columna que pulsemos con el raton, si hay algo que no entiendes me escribes,
salu2
Data1.RecordSource = "Select * From TRABAJADORES Order By " & _
DBGrid2.columns(ColIndex).DataField
On Error Resume Next
Data1.Refresh
End Sub
Esto ordena el dbgrid segun la columna que pulsemos con el raton, si hay algo que no entiendes me escribes,
salu2
