Aggiungere una riga di caratteri alla fine di un file di testo

Da Gambas-it.org - Wikipedia.

Per aggiungere una riga di caratteri in un file di testo, è possibile adottare almeno due modalità.

1) aprendo in Scrittura il file di testo con l'istruzione Open e usando la parola-chiave Append :

Public Sub Main()
    
 Dim fl As File
 Dim riga As String = "Questa è la riga da aggiungere alla fine del file di testo."
    
 fl = Open "/percorso/del/file/di/testo" For Write Append
     
 Write #fl, riga
     
 fl.Close
    
End


2) usando i Metodi ".Load()" e ".Save()" dela Classe statica File:

Public Sub Main()
    
 Dim riga As String = "Questa è la riga da aggiungere alla fine del file di testo."

 File.Save("/percorso/del/file/di/testo", File.Load("/percorso/del/file/di/testo") & riga)

End


In entrambi i casi l'aggiunta del valore (&h0A) di "nuova riga a capo" dopo l'ultima riga del file di testo, avviene automaticamente.