配列の定義と値の代入をVBAでどのように行うか

VBAでは、配列を定義するにはDimステートメントを使用して、配列の要素に値を代入するには代入ステートメントを使用します。以下に例を示します。

Dim arr(1 To 5) As Integer '定义一个包含5个元素的整数数组
arr(1) = 10 '给第一个元素赋值为10
arr(2) = 20 '给第二个元素赋值为20
arr(3) = 30 '给第三个元素赋值为30
arr(4) = 40 '给第四个元素赋值为40
arr(5) = 50 '给第五个元素赋值为50

インデックスが 0 オリジンの配列の場合、以下の文を使用できます:

Dim arr(0 To 4) As Integer '定义一个包含5个元素的整数数组
arr(0) = 10 '给第一个元素赋值为10
arr(1) = 20 '给第二个元素赋值为20
arr(2) = 30 '给第三个元素赋值为30
arr(3) = 40 '给第四个元素赋值为40
arr(4) = 50 '给第五个元素赋值为50

配列の定義と値の代入には、配列の定数を使用することもできます。

Dim arr() As Integer '定义一个整数数组
arr = Array(10, 20, 30, 40, 50) '给数组赋值

この例では、配列のサイズは、指定された要素の数に基づいて自動的に決定されます。