Column, propriété

---

Description

Propriété en lecture seule. Renvoie le numéro de colonne de la position de caractère courante dans un fichier TextStream.

Syntaxe

object.Column

L'espace réservé object correspond toujours au nom d'un objet TextStream.

Notes

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

---