2次元配列を再定義しているのですが
エラーになってしまいます。
なお、1度格納したデータを保持するために「Preserve」を
使用しています。
〜処理〜
DO WHILE RS.EOF
Redim Preserve HAIRETU(i_cnt ,20) −※
〜省略〜
i_cnt = i_cnt + 1
LOOP
ちなみに、※を1次元配列「HAIRETU(i_cnt)」で行うと
エラーが発生しません。
2次元配列では、Preserveオプションは使用出来ないのでしょうか?
また、上記処理を満たす回避策があれば教えて頂きたく思います。
※ヒント
とりあえずReDimステートメントについてMSDNで調べて、
後はユーザ定義型とかクラスについて調べると嬉しいかもしれない。
で、掲示板を渡り歩けば…結構こういう話題があったような…?
ところで、このループでは何をしているのでしょうか?
もしRSのレコードを配列にいれようとしているなら、GetRowsメソッドを
使えばループしなくていいかも。
違ったらごめんなさい。
配列の添え字の並び順を入れ替えましょう。
ツイート | ![]() |