配列の要素の最大値を指定するには？ (ID:118827)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 >２．皆様，かぶるくらい常識なことなのですが，どうしてUBoundに１を足すのでしょうか？ Private Sub Form_Load() Dim a() As String ReDim a(5) 'aの要素数は5 ReDim Preserve a(UBound(a)) 'aの要素数を、aの要素数に拡張 End Sub もともと有るa()の要素数は5なのに、Redimする意味はあるのでしょうか？