搬家第五天-105.Wincc V7.3 ListView 控件初步使用7-鼠标点击列标题进行升/降序排序

我们使用ListView控件显示一张表的数据后，用户可能希望点击列标题的时候，能够实现升/降排序功能，这个功能也很好实现。

     假设画面上有一个ListView控件，名字叫做LV，已经装入了一张数据表。在ListView控件的ColumnClick事件中添加以下vbs代码。

Sub ColumnClick(ByVal Item,  ByRef ColumnHeader)      
Dim LV
Set LV=ScreenItems("LV")
LV.Sorted = True
LV.SortKey = ColumnHeader.Index - 1

If LV.SortOrder = 0 Then
    LV.SortOrder = 1
Else
    LV.SortOrder = 0
End If
End Sub