CSV書き込み への返答

投稿で使用できる特殊コードの説明。(別タブで開きます。)
本名は入力しないようにしましょう。
投稿した後で削除するときに使うパスワードです。返答があった後は削除できません。
返答する人が目安にします。相手が小学生か社会人かで返答の仕方も変わります。
最初の投稿が質問の場合、質問者が解決時にチェックしてください。(以降も追加書き込み・返信は可能です。)
※「過去ログ」について書くときはその過去ログのURLも書いてください。

以下の返答は逆順(新しい順)に並んでいます。

投稿者 鳶沢X  (高校生) 投稿日時 2016/2/17 16:41:33
遅くなってすみません...
ありがとうございました！shuさんの言った通りに実行したらうまくいきました...
0
投稿者 shu  (社会人) 投稿日時 2016/2/16 16:53:31
WriteではなくWriteLineを使用すれば改行されます。
その場合『,』は不要ではないですか？
0
投稿者 鳶沢X  (高校生) 投稿日時 2016/2/16 15:47:36
VBでゲームを作っている高校生です。
今、CSVファイルに書き込むことは成功したのですが、下記のコードでは横に保存されてしまいます...。
これを縦に保存していく方法がわかりません...。どなたか教えていただけると幸いです...。

↓自分のコード
 Private Sub Button6_Click(sender As Object, e As EventArgs) Handles Button6.Click
        Try

            Dim csvPath As String = "予定.csv" '保存先のCSVファイルのパス
            Dim enc As System.Text.Encoding = System.Text.Encoding.GetEncoding("Shift_JIS")
            Dim sr As New System.IO.StreamWriter(csvPath, False, enc) '開く
            sr.Write(TextBox1.Text)
            sr.Write(","c)
            sr.Write(TextBox2.Text)
            sr.Write(","c)
            sr.Write(TextBox3.Text)
            sr.Write(","c)
            sr.Write(TextBox4.Text)
            sr.Write(","c)
            sr.Write(TextBox5.Text)
            sr.Write(","c)

            '閉じる
            sr.Close()
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try


    End Sub
0