Функции Print, PrintLine
Обновлен: Ноябрь 2007
Записывают в последовательный файл данные, отформатированные для отображения на экране.
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 _
)
Параметры
FileNumber
Обязательный параметр. Любой допустимый номер файла.Output
Необязательно. Несколько разделенных запятыми выражений для записи в файл.Для аргумента Output установлены следующие настройки:
Параметр |
Описание |
|---|---|
SPC(n) |
Используется для вставки пробелов при выводе, где n — число пробелов для вставки. |
TAB(n) |
Используется для установки положения курсора, равного абсолютному номеру столбца, где n — номер столбца. Следует использовать TAB без аргументов для установки положения курсора в начало следующей зоны печати. |
expression |
Числовые или строковые выражения для печати. |
Исключения
Тип исключения |
Номер ошибки |
Условие |
|---|---|---|
Недопустимый режим файла. |
||
FileNumber не существует. |
См. столбец "Номер ошибки", если выполняется обновление приложений Visual Basic 6.0, в которых используется неструктурированная обработка ошибок. (Можно сравнить номер ошибки с Свойство Number (объект Err).) Однако по возможности следует заменять такую систему управления ошибками на Обзор структурной обработки исключений в Visual Basic.
Заметки
Функции Print и PrintLine предназначены для обеспечения обратной совместимости и могут повлиять на производительность. Для неустаревших версий приложений объект My.Computer.FileSystem обеспечивает более высокую производительность. Дополнительные сведения см. в разделе Доступ к файлам с помощью Visual Basic.
Print не включает символ перевода в конце строки; PrintLine, однако содержит символ перевода строки.
Данные, записанные с помощью процедуры Print, обычно читаются из файла с помощью процедуры LineInput или Input.
Если параметр Output функции PrintLine опущен, в файл будет записана пустая строка; если опустить этот параметр в функции Print, ничего не будет записано. Несколько выражений, разделенных запятыми, выравниваются по границам табуляции, но смешивание запятых и знаков TAB может привести к непредсказуемым результатам.
Для данных Boolean печатаются значения True или False. Ключевые слова True и False не переводятся, независимо от региональных параметров системы.
Информация о дате записывается в файл в стандартном сокращенном формате, распознаваемом операционной системой. Когда дата или время отсутствуют или соответствующее значение равно нулю, в файл записывается только существующая часть.
Если строка Output пуста, данные в файл не записываются. Однако, если списком данных Output является DBNull, в файл записывается Null.
Для данных Error запись в файл выглядит как Error errorcode. Ключевое слово Error при локализации не переводится.
Все данные, записанные в файл с помощью функции Print, соответствуют региональным международным стандартам; т. е. данные правильно отформатированы с использованием соответствующего десятичного разделителя. Если пользователь хочет вывести данные для использования в разных регионах, рекомендуется использовать функцию Write.
Запись в файл с помощью функций Print или PrintLine требует доступа Write из перечисления FileIOPermissionAccess. Дополнительные сведения содержатся в разделе FileIOPermissionAccess Enumeration.
Пример
Этот пример использует функции Print и PrintLine для записи данных в файл.
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.
Примечания для разработчиков приложений для интеллектуальных устройств
Данная функция не поддерживается.
Требования
Пространство имен: Microsoft.VisualBasic
**Модуль:**FileSystem
**Сборка:**Visual Basic (библиотека времени выполнения, в Microsoft.VisualBasic.dll)
См. также
Задачи
Практическое руководство. Запись текста в файлы в Visual Basic
Практическое руководство. Запись текста в файлы с помощью StreamWriter в Visual Basic