動的配列の下限の設定の仕方 (ID:118916)

名前

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

本文 すいません。 ２度も誤送信してしまいました（−−。 ↓見直し後、訂正してもう一度載せます。 とすると 配列のインデックスが２からデータが入ることになり 使用上好ましくありません。 かといって、別に変数を作り Dim i as integer Dim Data() as String Redim Data(3,1) i = 0 Do Until Flag = True then i = i +1 Redim Preserve Data(3,i) Data(1,Ubound(Data,2)) = a Data(2,Ubound(Data,2)) = b Data(3,Ubound(Data,2)) = c Loop Option Base 1 を 使わずに動的配列を使っても同じ事になるとおもうので すが、皆様はどのように回避しているのでしょうか？ 配列の上限に格納したあとに 動的変数の上限を1上げたり その前に条件を満たしたら Exit Doすればよい話ですが 仕様としてそれは使いたくありません。 なにかよい案ありませんか？