Propriété en lecture seule. Renvoie le numéro de colonne de la position de caractère courante dans un fichier TextStream.
object.Column
L'espace réservé object correspond toujours au nom d'un objet TextStream.
Après l'écriture d'un caractère de nouvelle ligne, mais avant l'écriture de tout autre caractère, la propriété Column a la valeur 1.
L'exemple ci-dessous illustre l'utilisation de la propriété Column :
Function GetColumn
Const ForReading = 1, ForWriting = 2
Dim fso, f, m
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
f.Write "Bonjour!"
f.Close
Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)
m = f.ReadLine
GetColumn = f.Column
End Function
AtEndOfLine, propriété | AtEndOfStream, propriété | Line, propriété
Application: TextStream, objet