Property: Column for TextStream

Download PDF

Updated2024-09-12
1 minute(s) read

DIAdem 2021 Education
DIAdem 2021 Professional
DIAdem 2021 Advanced
+ 3

Specifies the current column number of the file pointer in a text stream file. After the file is open, the property has the value 1.

Object.Column

Object	TextStream Object with this property
Object.Column	LongInteger with read access

The following example specifies the length of the first line of a file:

Copy script

Function GetFileColumn(sFile)
  Const ForReading = 1
  Dim fso, oMyFile, sOutput
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set oMyFile = fso.OpenTextFile(sFile, ForReading, False)
  Do While oMyFile.AtEndOfLine <> True
    sOutput = oMyFile.Read(1)
  Loop
  GetFileColumn = oMyFile.Column
  oMyFile.Close
End Function

DIAdem Help

Table of Contents

Property: Column for TextStream

See Also

Log in to get a better experience