Écrit un nombre spécifié de caractères de nouvelle ligne dans un fichier TextStream.
object.WriteBlankLines(lines)
object
Correspond toujours au nom d'un objet TextStream.
lines
Nombre de caractères de saut de ligne à écrire dans le fichier.
L'exemple ci-dessous illustre l'utilisation de la méthode WriteBlankLines :
Function WriteBlankLinesToFile
Const ForReading = 1, ForWriting = 2
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
f.WriteBlankLines 2
f.WriteLine "Bonjour!"
Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)
WriteBlankLinesToFile = f.ReadAll
End Function
Close, méthode | Read, méthode | ReadAll, méthode | ReadLine, méthode | Skip, méthode | SkipLine, méthode | Write, méthode | WriteLine, méthode
Application: TextStream, objet