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.ColumnEnd Function

请参阅

AtEndOfLine 属性 | AtEndOfStream 属性 | Line 属性

应用于:TextStream 对象

返回首页