Pues partimos de que tienes un TextBox y un Boton,en el TextBox(TxtAñadir) introducimos el texto que le vas a añadir al fichero y el Boton(BtnAñadir) hará que se añada.
Y es tan sencillo como:
Cita: Dim fichero As New StreamWriter("c:\TuFichero.txt", True)
'El TRUE es para que añada al final del fichero,por defecto es False
fichero.Write(TxtAñadir.Text)
fichero.Close()
Saludosss