Devuelve el número de columna de la posición del carácter actual en una secuencia de entrada.
objeto.Column
La propiedad Column contiene un valor entero de sólo lectura que indica el número de columna de la posición del carácter actual en una secuencia de entrada. El valor de la propiedad es igual a 1 después de escribir un carácter de nueva línea (incluso antes de escribir cualquier otro carácter). Las propiedades y métodos StdIn, StdOut y StdErr sólo funcionan cuando la secuencia de comandos se ejecuta con CScript.exe. Si se ejecuta con WScript.exe, se producirá un error.
El código siguiente demuestra el uso de la propiedad Column al leer la entrada del teclado y dividirla en líneas de 20 caracteres.
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 entrada = "";
while (!WScript.StdIn.AtEndOfLine)
{
input += WScript.StdIn.Read(1);
if ((WScript.StdIn.Column
- 1) % 20 == 0)
input += "\n";
}
WScript.Echo(input);
Ayuda de Javascript y Vbscript para Javascripts.astalaweb.com. |