Compartir a través de


Instrucción Print #

Escribe datos con formato de visualización en un archivo secuencial.

Sintaxis

Impresión#filenumber, [ outputlist ]

La sintaxis de la instrucción Print # consta de estas partes:

Parte Descripción
númeroArchivo Obligatorio. Cualquier número de archivo válido.
ListaResultados Opcional. Expresión o lista de expresiones que imprimir.

Configuración

La configuración del argumentooutputlist es:

[{ Spc(n) | Tab [(n)]}] [ expression ] [ charpos ]

Configuración Descripción
Spc(n) Se usa para insertar caracteres de espacio en el resultado, donde n es el número de caracteres de espacio que insertar.
Tab(n) Se usa para colocar el punto de inserción en un número de columna absoluta, donde n es el número de columna. Use Tab sin ningún argumento para colocar el punto de inserción al principio de la siguiente área de impresión.
expresión Expresiones numéricas o expresiones de cadena que imprimir.
PosCar Especifica el punto de inserción del carácter siguiente. Use un punto y coma para colocar el punto de inserción inmediatamente después del último carácter que se muestra. Use Tab(n) para colocar el punto de inserción en un número de columna absoluta. Use Tab sin ningún argumento para colocar el punto de inserción al principio de la siguiente zona de impresión. Si se omite PosCar, el carácter siguiente se imprime en la línea siguiente.

Observaciones

Los datos escritos con Print # se leen normalmente a partir de un archivo con Line Input # o Input #.

Si se omite outputlist y se incluye un separador de lista después de filenumber, se imprime una línea en blanco en el archivo.

Hay varias expresiones que se pueden separar con un espacio o un punto y coma. Un espacio tiene el mismo efecto que un punto y coma.

Para los datos Boolean, se imprime True o False. Las palabras clave True y False no se traducen, independientemente de la configuración regional.

Los datos Date se escriben en el archivo con el formato de fecha corta estándar reconocido por el sistema. Cuando el componente de fecha u hora no está o es cero, en el archivo solo se escribe la parte proporcionada.

No se escribe nada en el archivo si los datos outputlist tienen el valor Empty. Pero si los datos outputlist tienen el valor Null, en el archivo se escribe Null.

En Datos de error , la salida aparece como Errorcódigo de error. La palabra clave Error no se traduce, independientemente de la configuración regional.

Todos los datos que se escriben en el archivo con Print # tienen en cuenta las distintas convenciones, es decir, los datos tienen el formato adecuado con el separador decimal correspondiente.

Puesto que Print # escribe una imagen de los datos en el archivo, debe delimitar los datos para que se impriman correctamente. Si usa Tab sin argumentos para colocar la impresión en la siguiente zona de impresión, Print # también escribe los espacios entre los campos de impresión del archivo.

Nota:

Si, en el futuro, quiere leer los datos de un archivo mediante la instrucción Input #, use la instrucción Write # en lugar de la instrucciónPrint # para escribir los datos en el archivo. Usar Write # garantiza la integridad de cada campo de datos independiente al delimitarlos correctamente, por lo que se puede leer con Input #. Usar Write # también asegura que se pueda leer correctamente en cualquier configuración regional.

Ejemplo

En este ejemplo se usa la instrucción Print # para escribir datos en un archivo.

Open "TESTFILE" For Output As #1 ' Open file for output. 
Print #1, "This is a test" ' Print text to file. 
Print #1, ' Print blank line to file. 
Print #1, "Zone 1"; Tab ; "Zone 2" ' Print in two print zones. 
Print #1, "Hello" ; " " ; "World" ' Separate strings with space. 
Print #1, Spc(5) ; "5 leading spaces " ' Print five leading spaces. 
Print #1, Tab(10) ; "Hello" ' Print word at column 10. 
 
' Assign Boolean, Date, Null and Error values. 
Dim MyBool, MyDate, MyNull, MyError 
MyBool = False : MyDate = #February 12, 1969# : MyNull = Null 
MyError = CVErr(32767) 
' True, False, Null, and Error are translated using locale settings of 
' your system. Date literals are written using standard short date 
' format. 
Print #1, MyBool ; " is a Boolean value" 
Print #1, MyDate ; " is a date" 
Print #1, MyNull ; " is a null value" 
Print #1, MyError ; " is an error value" 
Close #1 ' Close file. 

Vea también

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.