ListView控件数据操作
三、取得列表中的某列某行的数据
在使用ListView完成数据显示时,还需要得到其中的部分数据,以便实现交互式操作,下面的函数,可以实现这一功能。
函数代码
取得指定的ListView控件的某一列某一行的数据,支持字段名和列号,支持多字段。
Public Function GetLvData(Lv As Object, Optional Fies, Optional RowNum As Integer = 0)
Dim sp() As String
Dim i As Integer
Dim j As Integer
Dim dic As Object
If Lv.ListItems.Count = 0 Then Exit Function
If RowNum = 0 Then RowNum = Lv.ListItems.Count '设置返回行
Set dic = CreateObject(