by Cierra Computers & Consulting (5 Submissions)
Category: OLE/COM/DCOM/Active-X
Compatability: Visual Basic 3.0
Difficulty: Beginner
Date Added: Wed 3rd February 2021
Rating: (9 Votes)
Easily Sort Any ListView Column Ascending and Descending.
Public Sub SortListView(ctlListView As ListView, intColulunHeaderIndex As Integer)
ctlListView.Sorted = True
ctlListView.SortKey = intColulunHeaderIndex - 1
If ctlListView.SortOrder = lvwAscending Then
ctlListView.SortOrder = lvwDescending
Else
ctlListView.SortOrder = lvwAscending
End If
End Sub