2013-04-21 131 views
0

我已經使用GetRows()方法將記錄集放入二維數組中。我可以訪問單個陣列的項目是這樣的:有沒有辦法使用GetRows()方法訪問整個行?

x = rows(colNumber, rowNumber) 

現在我想從這個數組需要一整排/尺寸並把它傳遞到另一個函數。

有沒有這樣做的方法?我一直無法找到一個。尋找這樣的事情:

entireSingleRow = rows(*, rowNumber) 
+1

沒有這樣的事情在VBScript中,據我所知,假設這是所有vbscript。相對容易循環,並創建你正在尋找的一維集合 – 2013-04-21 16:39:35

+0

認爲可能是這種情況...感謝指針 – 2013-04-21 18:09:56

+0

@G.Stoynev更好地發佈這個作爲一些代碼的答案。 ) – 2013-04-22 07:38:57

回答

0

沒有在語言這樣的概念,但是下面的「助手」會做」

REM 'Returns 1-D array of all "columns" in a "row" with index "rowNumber"' 
REM 'from the 2-D "from2DArray" array (column, row)' 
Function GetCols(ByRef from2DArray, ByVal rowNumber) 
    Dim cols : cols = UBound(from2DArray, 1) 
    Dim i 
    Dim result() 
    For i = 0 To cols 
     Redim Preserve result(i) 
     result(i) = from2DArray(i, rowNumber) 
    Next 

    GetCols = result 
End Function 

entireSingleRow = GetCols(rows, rowNumber) 
相關問題