配列変数を初期化

 

Sub test()
    ' 配列変数を初期化

    Dim Yasai(3) As String
    Dim i As Integer
    Yasai(0) = "きゅうり"
    Yasai(1) = "とうもろこし"
    Yasai(2) = "さつまいも"
    Yasai(3) = "とまと"
    
    For i = 0 To 3
        Debug.Print i & " :  " & Yasai(i)
    Next
    
    Debug.Print "***以下は初期化後の配列***"
    Erase Yasai   ' 静的配列を初期化
    
    For i = 0 To 3
        Debug.Print i & " :  " & Yasai(i)
    Next

 


End Sub

 

 

 

実行結果

 

 

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

 

参考記事