Visual Basic - Ayuda Guardas en .txt

Me gustaria que me dijeran o el codigo o me pasaran un proyecto de como hacer apra:
1-Que el texto que contiene un text1 o textbox se guarde en c:/informacion.txt, y que pueda eleguirlo de guardar donde quiera como html.
2-tb que en un textbox seleccionara un texto y aprentado un boton al texto selecionado se le añadiera delante i detras otro texto como podria er <1> <2>.
EL PRIMERO ES MAS IMPORTANTE GRACIAS.

open "c:\fichero.txt" for output #1
print #1, text1.text
close #1
para elegir donde guardarlo leete la ayuda del componente "Microsoft common dialog control"
2.
text1.text=left(text1.text,text1.selstart) & "<1>" & text1.seltext & "<2>" & mid(text1.text,text1.selstart+text1.sellength)
o más elegante:
text1.seltext="<1>" & text1.seltext & "<2>"