またテキストファイルについて；

Textbox1.Textをテキストファイルの１行目に保存
Textbox2.Textをテキストファイルの２行目に保存
というように保存したいのですが、どうすればいいでしょうか？

上書き保存→追加保存みたいな感じでしょうか

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        '一行目は上書き保存  

        IO.File.WriteAllText("C:\てすと.txt", TextBox1.Text & vbCrLf, _

        System.Text.Encoding.GetEncoding("Shift-JIS"))

        '二行目は追加保存 

        System.IO.File.AppendAllText("C:\てすと.txt", TextBox2.Text & vbCrLf, _

        System.Text.Encoding.GetEncoding("Shift_Jis"))

    End Sub

改行をしない場合は & vbCrLf を除けば改行されません

前回の投稿（http://rucio.groupsite.jp/commu/ThreadDetail.aspx?ThreadId=9292）から「既存のファイルを読込→行単位で編集→保存」みたいな事がしたいんかなーと勝手に判断しました。

こんな感じかな
 

'FormにButton2つとTextBox2つを配置 

Public Class Form1



    Private fileData As String()



    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click



        'ファイルを読み込んで行ごとに配列に格納 

        fileData = System.IO.File.ReadAllLines("C:\Hoge.txt")



        '配列の1,2番目の内容をテキストボックスにセット 

        TextBox1.Text = fileData(0)

        TextBox2.Text = fileData(1)



    End Sub



    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click



        '配列の1,2番目の内容をテキストボックスの値に変更 

        fileData(0) = TextBox1.Text

        fileData(1) = TextBox2.Text



        '配列の中身を上書き書き込み 

        System.IO.File.WriteAllLines("C:\Hoge.txt", fileData)



    End Sub



End Class

やってみたかった事ができました。
ボチボチ覚えて行こうと思います。
ありがとうございます(´・ω・｀)ゞ