独学でＶＢ６の勉強を始めたばかりの初心者です。
テキストファイルに保存されているデータを読込、
読み込んだ値を行単位で２次元配列に格納したいのですが、
どうしたら良いのでしょうか？
テキストファイル内のデータは
１行目："1","100","10","1000"
・
・
・
n行目："1000","1","10","100"
で保存してあります。
ちなみに色々と考えてみて、現在入力した内容は
Dim Data() as string
#ff = FreeFile
Open "c:\text.txt" for input As #ff
While Not EOF(ff)
input #ff, Data(i,0), Data(i,1), Data(i,2), Data(i,3)
i=i+1
Redim Preserve Data(i,3)
Wend
close #ff
を記述してみましたが、ダメでした。
どうか、ご教授の程よろしくお願い致します。
ダメでした。ではどうしようもありません。
エラーメッセージに書いてある内容を解決してください。
ぱっと見て分かる問題点は
・Data 以外の宣言が無い(ff, i)
・#ff = FreeFile が文法的に間違っている
・Data が初回、初期化されていない(Redim は2回目以降の初期化)
・キーワード Preserve を指定した場合、変更できるのは、動的配列の最後の次元のサイズに限られます。
つまり Data(i, 3) はできません。Data(3, i)ならできます。