时间：2020-10-25 14:32:25 | 栏目：VBS | 点击：次
只读属性，返回 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.CloseSet f = fso.OpenTextFile("c:\testfile.txt", ForReading)m = f.ReadLineGetColumn = f.ColumnEnd Function