只读属性,返回 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.CloseSet f = fso.OpenTextFile("c: estfile.txt", ForReading)m =f.ReadLineGetColumn = f.ColumnEnd Function