0

aspで2次元配列を1次元配列に変換したいと思います。これは可能ですか?もしそうなら、これに関する一例を教えてください。

4

1 に答える 1

1

これがあなたのためにそれをする関数です:

Function TransformToSingleArray(TwoDimArray)

 TotalValues = (uBound(TwoDimArray,1) +1) * (uBound(TwoDimArray,2) +1)
 ReDim OneDimArray(TotalValues)
 ArrCnt = 0

 For x = lBound(TwoDimArray,1) to uBound(TwoDimArray,1)
   For y = lBound(TwoDimArray,2) to uBound(TwoDimArray,2)
      EachValue = TwoDimArray(x,y)
      OneDimArray(ArrCnt) = EachValue
      ArrCnt = ArrCnt + 1
   Next     
 Next

 TransformToSingleArray = OneDimArray

End Function
于 2012-07-06T16:57:25.703 に答える