Ti do' un cavolo di risposta ...

Open "C:\File.txt" For Append As #1
Print #1, "Riga 1"
Print #1, "Riga 2"
Close 1