0

関数（arrayA）、関数（ストア）内に配列を作成したいと思います。関数ストアが配列 A を返すようにし、関数の戻り値をより大きな配列 ArrayB に格納します。その後、arrayA の各要素を arrayB 要素 (1) に格納して出力したいと思います。

助けてください、どうもありがとう、私のコードは以下です。

dim arrA() as variant
dim arrB() as variant

redim arrB(1)

arrb(1) = store(arrA)

for i = 1 to ubound(arrB(1)
debug.print arrB(1)(i)
next i

function store(A() as variant)

redim a(1 to 3, 1 to 3)

a(1,3) = "1"
a(1,2)="2"

store = A

end function
4

1 に答える 1

0

の内容を印刷するには、次のarrAように繰り返す必要があります。

For i = 1 to UBound(arrB(1))
   For j = LBound(arrB(1), 2) To UBound(arrB(1), 2)
      Debug.Print arrB(1)(i, j)
   Next
Next

LBound/UBound関数の 2 番目の引数は、必要な次元を選択するために使用されます。この場合、アウターForはすでに 1 番目を通過しているため、2 番目が必要です。

于 2013-08-26T11:28:39.270 に答える