Fixed issue #117 again

This commit is contained in:
MikeMaximus
2018-01-18 09:17:14 -06:00
parent 85588686cd
commit 6b9ebaab36
+2 -2
View File
@@ -158,10 +158,10 @@ Public Class frmSessions
Select Case iCol Select Case iCol
Case iStartDisplayCol Case iStartDisplayCol
bStartSortAsc = Not bStartSortAsc bStartSortAsc = Not bStartSortAsc
dgSessions.Sort(dgSessions.Columns(iCol), GetSortOrder(bStartSortAsc, iCol)) dgSessions.Sort(dgSessions.Columns(iStartDataCol), GetSortOrder(bStartSortAsc, iCol))
Case iEndDisplayCol Case iEndDisplayCol
bEndSortAsc = Not bEndSortAsc bEndSortAsc = Not bEndSortAsc
dgSessions.Sort(dgSessions.Columns(iCol), GetSortOrder(bEndSortAsc, iCol)) dgSessions.Sort(dgSessions.Columns(iEndDataCol), GetSortOrder(bEndSortAsc, iCol))
End Select End Select
End Sub End Sub