Rst.GetRows的数组转置.

ningyong58

list是列表框和组合列表框中的赋值数据的一条语句.
list 接受的数据是数组Array
常用的办法是通过Rst循环,建立数组.
list = Arr.
另一种方法是
object.list = Rst.GetRows
直接用好像有点问题,需要数组转置成一维数组.
问:getrows如何处理.

[ 本帖最后由 ningyong58 于 2010-3-31 08:30 编辑 ]

ningyong58

找到答案了.
http://club.excelhome.net/thread-441848-1-1.html
ADO的Recordset对象的GetRows 方法使用中的差别

array=recordset.GetRows(Rows, Start, Fields)
返回值：
返回二维数组。
说明：
使用 GetRows 方法可将记录从 Recordset 复制到二维数组中。
第一个下标标识字段，第二个则标识记录号。
当 GetRows 方法返回数据时数组变量将自动调整到正确大小。

array 二维数组下标从0开始，当只有一条记录时也是一样的返回二维数组。

当使用转置函数后，即：
array=Application.WorksheetFunction.Transpose(Recordset.GetRows(Rows, Start, Fields))
array 数组下标从1开始，当只有一条记录时返回一个一维数组。