Visual Basic 2008 express a .txt o acces

[agus0]

Código:

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        FileOpen(1, "C:\texto.txt", OpenMode.Append)
        PrintLine(1, TextBox1.Text)
        FileClose(1)
    End Sub
End Class

ese seria el codigo...

cuando haces click en el button1
se abre el archivo "c:\texto.txt" (si no esta se crea)
se le imprime el contenido del textbox1
se cierra
y listo

;) suerte