Print, PrintLine (Funciones)
Actualización: noviembre 2007
Escribe datos con formato de presentación en un archivo secuencial.
Public Sub Print( _
ByVal FileNumber As Integer, _
ByVal ParamArray Output() As Object _
)
' -or-
Public Sub PrintLine( _
ByVal FileNumber As Integer, _
ByVal ParamArray Output() As Object _
)
Parámetros
FileNumber
Obligatorio. Cualquier número de archivo válido.Output
Opcional. Cero o más expresiones delimitadas por comas para escribir en un archivo.Los valores del argumento Output son:
Valor |
Descripción |
|---|---|
SPC(n) |
Se utiliza para insertar caracteres de espacio en la salida, donde n indica el número de caracteres de espacio que se van a insertar. |
TAB(n) |
Se utiliza para situar el punto de inserción en un número de columna absoluto, donde n es el número de columna. Utilice TAB sin ningún argumento para situar el punto de inserción al comienzo de la siguiente zona de impresión. |
expression |
Expresiones numéricas o de cadena que se deban imprimir. |
Excepciones
Tipo de excepción |
Número de error |
Condición |
|---|---|---|
El modo de archivo no es válido. |
||
FileNumber no existe. |
Consulte la columna "Número de error" si está actualizando aplicaciones de Visual Basic 6.0 que utilizan el control de errores no estructurado. (Se puede comparar el número de error con respecto a Number (Propiedad, objeto Err)). Sin embargo, siempre que sea posible, debe considerarse la posibilidad de sustituir dicho control de errores por Información general sobre el control estructurado de excepciones de Visual Basic.
Comentarios
Las funciones Print y PrintLine se suministran a efectos de compatibilidad con versiones anteriores y pueden afectar al rendimiento. En el caso de aplicaciones no heredadas, el objeto My.Computer.FileSystem proporciona un rendimiento superior. Para obtener más información, vea Acceso a archivos con Visual Basic.
Print no incluye un avance de línea al final de una línea; en cambio PrintLine sí lo incluye.
Los datos escritos con Print normalmente se leen desde un archivo con LineInput o Input.
Si omite Output en PrintLine, en el archivo se imprime una línea en blanco. En Print, sin embargo, no se producirá resultado alguno. En los límites de tabulación se alinearán varias expresiones separadas mediante comas, pero, si se mezclan comas y TAB, los resultados pueden ser incoherentes.
Con datos de tipo Boolean, se imprime True o False. Las palabras clave True y False no se traducen, independientemente de la configuración regional.
Los datos de fecha se escribirán en el archivo según el formato estándar de fecha corta reconocido por el sistema. Cuando alguno de los componentes de fecha u hora falte o sea igual a cero, tan sólo se escribirá en el archivo la parte proporcionada.
Si los datos de Output están vacíos, no se escribirá nada en el archivo. Sin embargo, si los datos de lista de Output son de tipo DBNull, en el archivo se escribe Null.
Con datos de tipo Error, el resultado aparece como Error errorcode. La palabra clave Error no se traduce, independientemente de la configuración regional.
Todos los datos que se escriban en el archivo utilizando Print serán compatibles internacionalmente, es decir, tendrán el formato correcto con el separador decimal adecuado. Si el usuario desea mostrar los datos de salida en varias configuraciones regionales, debe utilizar Write.
Para escribir en un archivo con las funciones Print o PrintLine, es necesario tener acceso de tipo Write desde la enumeración FileIOPermissionAccess. Para obtener más información, vea FileIOPermissionAccess (Enumeración).
Ejemplo
En este ejemplo se utilizan las funciones Print y PrintLine para escribir datos en un archivo.
FileOpen(1, "c:\trash.txt", OpenMode.Output) ' Open file for output.
Print(1, "This is a test.") ' Print text to file.
PrintLine(1) ' Print blank line to file.
PrintLine(1, "Zone 1", TAB(), "Zone 2") ' Print in two print zones.
PrintLine(1, "Hello", "World") ' Separate strings with a tab.
PrintLine(1, SPC(5), "5 leading spaces ") ' Print five leading spaces.
PrintLine(1, TAB(10), "Hello") ' Print word at column 10.
' Assign Boolean, Date, and Error values.
Dim aBool As Boolean
Dim aDate As DateTime
aBool = False
aDate = DateTime.Parse("February 12, 1969")
' Dates and booleans are translated using locale settings of your system.
PrintLine(1, aBool, " is a Boolean value")
PrintLine(1, aDate, " is a date")
FileClose(1) ' Close file.
Notas para desarrolladores de dispositivos inteligentes
Esta función no es compatible.
Requisitos
Espacio de nombres:Microsoft.VisualBasic
**Módulo:**FileSystem
**Ensamblado:**Visual Basic Runtime Library (en Microsoft.VisualBasic.dll)
Vea también
Tareas
Cómo: Escribir texto en archivos en Visual Basic
Cómo: Escribir texto en archivos con un objeto StreamWriter en Visual Basic