codice:
Open (file) For Output As #1
      Print #1, stringa
Close #1