Mi sa che mancano delle virgolette nel codice ... comunque era quello che ti avevo indicato ... piu' semplicemente potevi scrivere

codice:
Open ...
Print #FileNumber, "[prova]"
Print #FileNumber, Text1.Text
Close #FileNumber