Visual Basic User's Clubコミュのデータ書き出しについて

大学での研究で数値解析を行っていてVB6を使っています。
たぶんものすごい簡単なことだと思うんですが、質問させてください。

データの書き出しで困っております。

書き出したいデータは配列変数でX(i)です。
「i」は1以上140以下ののintegerです。

算出したX(i)をtxt形式で横に書き出そうとしています。
つまり１行に書こうとしています。

例えばiが１以上３以下だったら

dim i as integer
FileName = "D:\ **** \ X(i).txt"
Open FileName For Append As #1
Print #1, X(1), X(2), X(3)
Close #1

とすればいいのですよね？

しかしこの形で i = 1 to 140 となると
Print #1, X(1), X(2), X(3), X(4), X(5), X(6), ・・・・
と気が遠くなります。

なにかFor文等を使って簡単に書いてデータを書き出す方法はないでしょうか？

みなさん教えてください！お願いします。

コメント(3)

最初
全て
最新の40件

[1] mixiユーザー 03月14日 21:40

> 算出したX(i)をtxt形式で横に書き出そうとしています。
Join関数を使うとか。

> Print #1, X(1), X(2), X(3)
Print #1, X(1),
Print #1, X(2),
Print #1, X(3)

のように書けますよ。

Print メソッドは、セミコロン、Tab関数、Spc関数などを
指定できる、特殊なステートメントになっているので、
ヘルプの解説を見ても、分かりにくいかも知れませんね…。

[2] mixiユーザー 03月14日 21:59

For i = 1 to 140
print #1,X(i) & vbtab ;
next i
print #1,""
じゃだめかな？

というか　動かしてないから記憶と感で書いてます。
だめだったら、一度文字列に結合して出力かな？

[3] mixiユーザー 03月14日 22:22

>>弁士さん、雫亜希さん

　書き込み本当に有難うございました！
　Join関数・・・
　VB初心者の僕にはわかりませんでした・・・
　みなさんすごいですね！
　
　ちなみに今雫亜希さんの書き込みを参考に動かしてみたら
　やりたかった事が出来ました！
　本当にありがとうございます。

　また皆さんにご質問するかもしれませんが、
　その時はよろしくお願いします！

ログインすると、みんなのコメントがもっと見れるよ