返回輸入流中當(dāng)前字符位置的列數(shù)。
object.Column
Column 屬性中包含一個只讀整數(shù)值,它表示輸入流中當(dāng)前字符位置的列數(shù)。在寫入一個新的換行符后(即使還沒有寫入任何其他字符),Column 屬性等于 1。StdIn、StdOut 及 StdErr 屬性和方法僅在用 CScript.exe 運(yùn)行腳本時可用,如果是用 WScript.exe 運(yùn)行該腳本就會出錯。
下面的代碼通過從鍵盤讀取輸入并將其拆分為 20 個字符的行來演示 Column 屬性的用法:
Dim Input
Input = ""
Do While Not WScript.StdIn.AtEndOfLine
Input = Input & WScript.StdIn.Read(1)
If (WScript.StdIn.Column
- 1) Mod 20 = 0 Then
Input = Input & vbCrLf
End If
Loop
WScript.Echo Input
var input = "";
while (!WScript.StdIn.AtEndOfLine)
{
input += WScript.StdIn.Read(1);
if ((WScript.StdIn.Column
- 1) % 20 == 0)
input += "\n";
}
WScript.Echo(input);