配列の初期化(ReDim、Preserve、Array、Erase)

AccessVBA開発

可変長配列の場合

①はじめは、 

    Dim 配列名() As データ型名

②後から要素数や次元数を宣言

    ReDim 配列名(添字の上限値, ・・・)

配列を初期化する方法

①Eraseを使って初期化する

    Erase 配列名

※この場合、配列のデータ型によって初期値が異なる。
    
    ・数値配列:0(ゼロ)
・文字列配列:長さ0(ゼロ)の文字列
・オブジェクト配列:Nothing
・バリアント配列:Empty

②Arrayを使って初期化する

    Dim 配列名() As Variant
配列名 = Array(要素(0), 要素(1), ・・・)

配列を解放(再初期化)する方法

ReDim 配列名

配列の要素数を変更する方法

ReDim Preserve 配列名

1次元から2次元配列に変更する場合

Dim arr(3) As Integer
      ↓↓↓
    ReDim arr(3, 3)


タイトルとURLをコピーしました