2

既存の CSV テキスト ファイルに学生情報を追加できるプログラムを作成していますが、追加テキストを使用するたびに、新しい情報が最後の行の一部に追加され、次に新しい行に追加されます。

私はこれをしたい：

ジョン・ドウ、29歳、男性

ジョン・ドウ、29歳、男性

代わりにこれを行います：

ジョン・ドウ、29歳、マレジョー

hn Doe さん、29 歳、男性

注: 実際には、各情報セットの間に空の行はありません。ここに投稿したときに読みやすくしたかっただけです。

そのセクションのコードは次のとおりです。

Dim swVar As IO.StreamWriter = IO.File.AppendText(frmMain.fileName)

swVar.WriteLine(txtName.Text & "," & txtAge.Text & "," & gender)

swVar.Close()

どんな助けでも大歓迎です、ありがとう！

4

2 に答える 2

0

このようなものがうまくいくかどうかを確認してください：

IO.File.AppendText(frmMain.fileName, vbNewLine & txtName.Text & "," & txtAge.Text & "," & gender & vbNewLine)

AppendText は書き込みを開いてすべてを 1 回の操作で閉じるので、個別のストリームライターは必要ありません。改行も追加しないため、個別に追加する必要があります

もちろん、同じファイルに一連の書き込みを行っている場合を除き、次のようなものがおそらくより適切です。

Dim swVar As New IO.StreamWriter(frmMain.fileName, True)
'write your lines here
swVar.WriteLine(txtName.Text & "," & txtAge.Text & "," & gender)

swVar.Close()
于 2013-12-05T23:25:43.683 に答える