アプリ版:「スタンプのみでお礼する」機能のリリースについて

VB2008を使用しています。
stg_bitという配列に一文字ずつ「abc・・・」
のように入っているものを、テキストファイルに出力したいのですが・・・
stg_bitという配列の内容をファイルに書き込みたいのですが、
うまくいきません。
ご教授お願いします!!


Dim i As Integer
Dim stg_str As String


Dim Writer As New IO.StreamWriter("C:sample.txt")

Writer.WriteLine(stg_bit)
Writer.Close()

A 回答 (3件)

>「abc...」と改行せずに書き込む方法はどうすればよろしいでしょうか?


出力する前に改行を取り除く
strBuff = strBuff.Replace(vbCrLf, "")

また、配列の順番どおり出力するならFor Eachより、Forで指定した方がいいかもしれない。
For i As Integer = 0 To stg_bit.Length
 strBuff += stg_bit(i).Replace(vbCrLf, "")
Next i
Writer.WriteLine(strBuff)
    • good
    • 0
この回答へのお礼

なるほど!
置換を利用して改行を取り除くんですね!!
改行せずに書き込むことができました。
ありがとうございました!

お礼日時:2009/01/30 14:27

WriteLineの引数にString配列のオーバーロードはないはずです。


#1の方が書かれたソースのように、ループで回して
String型で一個ずつ取り出しながら書く必要があります。

この回答への補足

ありがとうございます。
string型で取り出しながら書いていかないといけないのですね!!
試してみます。

補足日時:2009/01/28 20:20
    • good
    • 0

For Each strBuff as String In stg_bit


 Writer.WriteLine(strBuff)
Next strBuff
Wiriter.Close()

この回答への補足

ありがとうございます。

Dim Writer As New IO.StreamWriter("C:\sample.txt")

For Each strBuff As String In stg_bit
Writer.WriteLine(strBuff)
Next strBuff
Writer.Close()

としたら、テキストファイルに書き込むことができました!!
でも、改行が入っているので、テキストファイルの中身が

a
b
c

となってしまうのですが
「abc...」と改行せずに書き込む方法はどうすればよろしいでしょうか?

補足日時:2009/01/28 20:17
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!