Bonjour,
La solution qui me parait la plus simple est de lire dans un premier temps ton fichier et de récupérer sont contenu.
Une fois ceci fait, tu peux récrire ton fichier en concaténant ce que tu as récupérer de ton fichier au ligne que tu veux insérer.
Voici un exemple
Dim sContenu As String
Dim sWriteText As String
Dim sNewLine As String = "Bonjour........" & ControlChars.CrLf & "Je m'apel toto"
'lecture du fichier
sContenu = IO.File.ReadAllText("c:\1.txt")
'ecriture du fichier
sWriteText = sNewLine & ControlChars.CrLf & sContenu
IO.File.WriteAllText("c:\1.txt", sWriteText)
En espérant t'avoir aidé...bonne prog à toi...