最近写的程序需要点击LISTVIEW控件的列首排序,搜索了一下网上的文章代码,很少,而且是C#的代码,看了下MSDN,终于搞清楚了VB的写法,MSDN上只有按照字母顺序排序的,于是我加工了一下,可以选择按照数字、时间排序。
LISTVIEW控件名是LV1
Private Sub LV1_ColumnClick(ByVal sender As Object, ByVal e As System.Windows.Forms.ColumnClickEventArgs) Handles LV1.ColumnClick
Select Case LV1.Columns.Item(e.Column).Text
Case "状态"
LV1.ListViewItemSorter = New ListViewItemComparerByInt(e.Column)
Case "编号"
LV1.ListViewItemSorter = New ListViewItemComparerByInt(e.Column)
Case "最后更新时间"
LV1.ListViewItemSorter = New ListViewItemComparerByTime(e.Column)
Case Else
LV1.ListViewItemSorter = New ListViewItemComparerByString(e.Column)
End Select