使用ListView控件使用数据报表功能

1.将ListView的View属性设置为lvwReport报表外观
2.使用ColumnHeaders集合的Add方法将ColumnHeader对象添加到ColumnHeaders中作为报表的列首元素，即列标题。
3.新创建对象的引用并返回给ListItem对象变量
4.使用循环上界为ListView.ColumnHeaders.Count - 1的次数添加给对象变量的其他子项目(使用索引值即循环值)

示例代码如下：

Private Sub Form_Load()
    Dim lCol As Long, lRow As Long, LI As ListItem
   
    ListView1.View = lvwReport
    ListView1.ColumnHeaders.Add 5, "ak", "Cehn"
    For lRow = 1 To 50
        Set LI = ListView1.ListItems.Add(, , "Row " & lRow & ", First Column")
        For lCol = 1 To ListView1.ColumnHeaders.Count - 1
            LI.SubItems(lCol) = "Row " & CStr(lRow) & ", Col " & CStr(lCol + 1)
        Next
    Next
End Sub

排序使用Sorted ,Sortkey, SortOrder属性，若想单击某列时进行排序&