Column 屬性
只讀屬性,返回 TextStream 文件中當前字符位置的列號。
object.Column
object 通常是 TextStream 對象的名稱。
說明
在寫入新行字符后,但在寫其他字符前,Column 等于 1。
下面例子舉例說明如何使用 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 "
世界你好!"
f.Close
Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)
m = f.ReadLine
GetColumn = f.Column
End Function