配列のサイズ変更をおこないます。
ReDim $array[subscript 1]...[subscript n]
パラメータ
| $array | サイズ変更をおこなう配列の名前 |
| subscript | 配列の各次元での作成する要素数。0からn-1でインデックスされます。 |
注意
ReDimは配列のサイズ変更時に配列内の値を消去せずに保持するという点以外はDimと同じです。次元の数が同じでない場合はReDimによって以前の配列の情報は失われます。配列はサイズ変更前のスコープ(Global、Local) を保持します。
関連
Dim, UBound
Example
; 配列のサイズ変更例
Dim $I, $K, $T, $MSG
Dim $X[4][6], $Y[4][6]
For $I = 0 To 3
For $K = 0 To 5
$T = Int(Random(20) + 1) ;1から20の間の乱数を代入
$X[$I][$K] = $T
$Y[$I][$K] = $T
Next
Next
ReDim $X[3][8]
Dim $Y[3][8]
$MSG = ""
For $I = 0 To UBound($X, 1) - 1
For $K = 0 To UBound($X, 2) - 1
If $K > 0 Then $MSG = $MSG & ", "
$MSG = $MSG & $X[$I][$K]
Next
$MSG = $MSG & @CR
Next
MsgBox(0, "ReDim Demo", $MSG)
$MSG = ""
For $I = 0 To UBound($Y, 1) - 1
For $K = 0 To UBound($Y, 2) - 1
If $K > 0 Then $MSG = $MSG & ", "
$MSG = $MSG & $Y[$I][$K]
Next
$MSG = $MSG & @CR
Next
MsgBox(0, "ReDim Demo", $MSG)