Private Sub MSFlexGrid1_Click()
With MSFlexGrid1
If .Row = 1 And .RowSel = .Rows - 1 Then
.Sort = flexSortGenericAscending
End If
End With
End Sub
Private Sub MSFlexGrid1_Click()
With MSFlexGrid1
If .Row = 1 And .RowSel = .Rows - 1 Then
.Sort = flexSortGenericAscending
End If
End With
End Sub