通过判断rst,Arr,Range建立listview

ningyong58

控件ListView
这是listView赋值的通用程序
           ListView1.ListItems.Clear
           For i = 1 To rs.RecordCount
              ListView1.ListItems.Add , , 数据1
              ListView1.ListItems(i).SubItems(1) =数据2
          Next  
数据1和数据2,有人用Array,有人用Range,有人用Rst

在此和各位大侠讨论的问题.编制个小程序,判断oData输入的数据是Rst,Range还是Arr
Function oView(oData)
   oData是数组:数组的通用性比较强,但是定义Arr(ii,jj)中的jj不好判断,只能用Ubound(Arr)来判断ii
   Rst可以判断其rst.RecondCount,和rst.Feilds.fields.count
   Range也可以判断行数rows.count和列数columns.cout
End function
  问数据1,数据2,是采用数组好,还是rst好,还是Range好.谢谢.

lb_bn

个人认为range方便,数组快,rst专业

ningyong58

原帖由 lb_bn 于 2010-3-25 21:56 发表
个人认为range方便,数组快,rst专业

此结论是一个概念性总结.
发此帖的目标是
从function 入口数据oData,可能是Array,也可能是Range,也可能是Rst
这三种方式肯定要转换为统一格式.
也就是数据1和数据2的dim定义
想了一下,还是定义为Arr
Range,Rst转为数组比较方便.
因此,redim 数据(rst.recordcount-1,rst.fields.count-1)

              ListView1.ListItems.Add , , 数据(ii,0)
              ListView1.ListItems(i).SubItems(1) =数据(ii,jj)
目标实现.