１．テキストボックスの内容をファイルに上書きで保存する

Private Sub Button3_Click(ByVal sender As System.Object, _
                          ByVal e As System.EventArgs) Handles Button3.Click
'テキストファイルを上書きで保存する
    Dim sw As New System.IO.StreamWriter("..\..\test01.txt", False, _
                                                System.Text.Encoding.Default)
    '書込み
    sw.Write(TextBox1.Text)
    sw.Close()


    'こちらは下記の結果確認用です
    Dim sw1 As New System.IO.StreamWriter("..\..\test02.txt", False, _
                                                System.Text.Encoding.Default)
    '書込み
    sw1.Write("123ABCあいうえお")
    sw1.Close()
End Sub