Visual Basic - Bloc de notas

No sé cómo hace lo siguiente:

Necesito introducir el texto que se encuentra en un Text1 a un archivo *.Txt..... su ayuda es muy valiosa!!!!

Muchas gracias!!!

f=freefile
open "archivo.txt" for output as #f
print #f, text1.text
close #f

eso es todo, y para leer usas input en lugar de output y tambien en lugar de print.