在Listview控件中排序

在使用Listview控件显示报表型的数据时，可能通过单击Listview控件的列标题对列表数据进行排序，代码如下：

PrivateSub

ListView1_ColumnClick(ByValColumnHeaderAsMSComctlLib.ColumnHeader)

With

ListView1.Sorted=True.SortOrder=(.SortOrder+1)Mod 2.SortKey=

ColumnHeader.Index- 1

End

With End Sub

代码解析：

Listview控件的ColumnClick事件过程，单击列标题时触发，对列表数据进行升序或降序排序。

第3行代码将Listview控件的Sorted属性设置为True。Sorted属性返回或设置确定ListView控件中的ListItem对象是否排序，设置为False则不进行排序。

第4行代码设置Listview控件的排序方式。SortOrder属性返回或设置一个值，决定ListView控件中的ListItem对象以升序或降序排序，设置为0以升序排序，设置为1则以降序排序。在设置SortOrder属性值时使用Mod运算符以达到第一次排序以降序排序，再次排序时以升序排序，交替进行的效

第5行代码设置Listview控件排序关键字的整数，即指定Listview控件以当前选定的列数据进排序。SortKey属性返回或设置一个值，此值决定ListView控件中的ListItem对象如何排序，语法如下：

object.SortKey

[=integer]

参数object是必需的，对象表达式，其值为ListView控件。参数integer是必需的，指定排序关键字的整数，设置为0使用ListItem对象的Text属性排序，即第一列的数据进行排序。设置为大于0的整数则使用子项目的集合索引排序。

运行窗体，Listview控件显示工作表中的内容，单击列标题对列表数据进行升序或降序排序，如图131‑5所示。

Listview控件中排序图 131‑5