只读属性,返回 TextStream 文件中当前字符位置的列号。
object.Column
object 通常是 TextStream 对象的名称。
在写入新行字符后,但在写其他字符前,Column 等于 1。
下面例子举例说明如何使用 Column属性:
Function GetColumnConst ForReading = 1, ForWriting = 2Dim fso, f, mSet fso = CreateObject("Scripting.FileSystemObject")Set f = fso.OpenTextFile("c: estfile.txt", ForWriting, True)f.Write "
世界你好!"
f.Close
Set f = fso.OpenTextFile("c: estfile.txt", ForReading)
m =f.ReadLine
GetColumn = f.Column
End Function