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

        Dim writer As New IO.StreamWriter("c:\test123.txt")
        writer.WriteLine(Me.TextBox1.Text)
        writer.WriteLine(Me.TextBox2.Text)
        writer.WriteLine(Me.TextBox3.Text)
        writer.Close()

    End Sub