В настоящее время вы работаете в автономном режиме; ожидается повторное подключение к Интернету

Как чтение и запись в текстовый файл с помощью Visual Basic 2005 или Visual Basic .NET

ВНИМАНИЕ! Перевод данной статьи был выполнен не человеком, а с помощью программы машинного перевода, разработанной корпорацией Майкрософт. Корпорация Майкрософт предлагает вам статьи, переведенные как людьми, так и средствами машинного перевода, чтобы у вас была возможность ознакомиться со статьями базы знаний KB на родном языке. Однако машинный перевод не всегда идеален. Он может содержать смысловые, синтаксические и грамматические ошибки, подобно тому как иностранец делает ошибки, пытаясь говорить на вашем языке. Корпорация Майкрософт не несет ответственности за неточности, ошибки и возможный ущерб, причиненный в результате неправильного перевода или его использования. Корпорация Майкрософт также часто обновляет средства машинного перевода.

Эта статья на английском языке: 315828
Версии Microsoft Visual Basic 6.0 в данной статье см. 183638.
Аннотация
В данной статье показано, как для чтения и записи текстовый файл с помощью Microsoft Visual Basic 2005 или Microsoft Visual Basic .NET.

Требования

В следующем списке представлены рекомендуемое оборудование, программное обеспечение, сетевая инфраструктура и пакеты обновления, которые будут необходимы.
  • Visual Basic 2005 или Visual Basic .NET
Предполагается, что вы знакомы со следующими темами:
  • Visual Basic 2005 или Visual Basic .NET

Чтение и запись текстовых файлов

"Чтение текстового файла" разделе показано, как с помощью объекта StreamReader для чтения текстового файла. "Запись в текстовый файл (пример 1)"раздела и "Запись в текстовый файл (пример 2)" разделе демонстрируют, как использовать класс StreamWriter для записи текста в файл.

Чтение текстового файла

В следующем коде используется класс StreamReader для открытия, чтения и закрытия текстового файла. Можно передать путь StreamReader конструктор автоматически открыть его в текстовый файл. Метод ReadLine считывает каждую строку текста и увеличивает указатель файла Считывает следующую строку как его. Когда метод ReadLine достигает конца файла, возвращается Nothing.
  1. Запустите Microsoft Visual Studio 2005 или Microsoft Visual Studio .NET.
  2. Создайте новое консольное приложение в Visual Basic 2005 или Visual Basic .NET.
  3. Добавьте следующий код в начало файла Module1.vb:
    Imports System.IO					
  4. Добавьте следующий код в процедуру Sub Main .
    Dim objStreamReader As StreamReader    Dim strLine As String    'Pass the file path and the file name to the StreamReader constructor.    objStreamReader = New StreamReader("C:\Boot.ini")    'Read the first line of text.    strLine = objStreamReader.ReadLine    'Continue to read until you reach the end of the file.    Do While Not strLine Is Nothing      'Write the line to the Console window.      Console.WriteLine(strLine)      'Read the next line.      strLine = objStreamReader.ReadLine    Loop    'Close the file.    objStreamReader.Close()    Console.ReadLine()					
  5. В меню Отладка нажмите кнопку Пуск для компиляции и запуска приложения. Нажмите клавишу ВВОД, чтобы закрыть Окно консоли.

    В окне консоли отображается в файле Boot.ini. Примечание что содержимое файла Boot.ini может отличаться от конфигурации Конфигурация. Ниже приведен пример файла Boot.ini:
    [boot loader]timeout=5default=multi(0)disk(0)rdisk(0)partition(1)\WINNT[operating systems]multi(0)disk(0)rdisk(0)partition(1)\WINNT="Windows 2000 Professional" /fastdetectC:\ = "Windows 98"						

Запись в текстовый файл (пример 1)

В следующем коде используется класс StreamWriter открывать, записи и закройте текстовый файл. Подобно Чтобы StreamReaderможно передать путь в текстовом файле конструктор StreamWriter , чтобы автоматически открыть файл. Метод WriteLine записывает полные строки текста в текстовый файл.
  1. Запустите Visual Studio 2005 или Visual Studio .NET.
  2. Создайте новое консольное приложение в Visual Basic 2005 или Visual Basic .NET.
  3. Добавьте следующий код в верхнюю часть Module1.vb:
    Imports System.IO					
  4. Добавьте следующий код в процедуру Sub Main .
    Dim objStreamWriter As StreamWriter       'Pass the file path and the file name to the StreamWriter constructor.   objStreamWriter = New StreamWriter("C:\Testfile.txt")   'Write a line of text.   objStreamWriter.WriteLine("Hello World")   'Write a second line of text.   objStreamWriter.WriteLine("From the StreamWriter class")   'Close the file.   objStreamWriter.Close()					
  5. В меню Отладка нажмите кнопку Пуск для компиляции и запуска приложения.

    Этот код Создает файл с именем Test.txt на диске C. Test.txt открыть в текстовом редакторе таких как «Блокнот». Test.txt содержит две строки текста:
    Hello WorldFrom the StreamWriter class						

Запись в текстовый файл (пример 2)

В следующем коде используется класс StreamWriter открывать, записи и закройте текстовый файл. В отличие от Предыдущий пример, данный код передает два дополнительных параметров конструктор.

Первый параметр — путь к файлу и имя файла файл. Второй параметр True указывает на то, что файл будет открыт в режиме добавления. Если указать Значение false для второго параметра, содержимое файла перезаписывается каждый раз при выполнении кода. Третий параметр указывает Юникода , так что StreamWriter кодирует файл в кодировке Юникод. Кроме того, можно задать следующие методы кодирования для третьего параметра:
  • ASCII
  • BigEndianUnicode
  • UTF7
  • UTF8
Метод Write аналогичен методу WriteLine , за исключением того, что запись не внедрять автоматически каретки/и перевода строки (CR/LF) сочетание знаков. Это полезно, когда требуется написать одному знаку время.
  1. Запустите Visual Studio 2005 или Visual Studio .NET.
  2. Создайте новое консольное приложение в Visual Basic 2005 или Visual Basic .NET.
  3. Добавьте следующий код в верхнюю часть Module1.vb:
    Imports System.IOImports System.Text					
  4. Добавьте следующий код в процедуру Sub Main в существующий код:
    Dim objStreamWriter As StreamWriter   Dim x As Long       'Open the file.   objStreamWriter = New StreamWriter("C:\Test2.txt", True, _      Encoding.Unicode)   'Write out the numbers 1 through 10 on the same line.   For x = 1 To 10     objStreamWriter.Write(x)   Next x       'Close the file.   objStreamWriter.Close()					
  5. В меню Отладка нажмите кнопку Пуск для компиляции и запуска приложения.

    Этот код Создает файл с именем Test2.txt на диске C. Test2.txt открыть в текстовом редакторе таких как «Блокнот». Test2.txt содержит одну строку текста:
    12345678910							
    Примечание Если код выполняется несколько раз, является «123456789» текст повторяется на той же строке.

Полный пример кода

'Read a Text FileImports System.IOModule Module1    Sub Main()        Dim objStreamReader As StreamReader        Dim strLine As String        'Pass the file path and the file name to the StreamReader constructor.        objStreamReader = New StreamReader("C:\Boot.ini")        'Read the first line of text.        strLine = objStreamReader.ReadLine        'Continue to read until you reach the end of the file.        Do While Not strLine Is Nothing            'Write the line to the Console window.            Console.WriteLine(strLine)            'Read the next line.            strLine = objStreamReader.ReadLine        Loop        'Close the file.        objStreamReader.Close()        Console.ReadLine()    End SubEnd Module'Write a Text File: Version 1Imports System.IOModule Module1    Sub Main()        Dim objStreamWriter As StreamWriter        'Pass the file path and the file name to the StreamWriter constructor.        objStreamWriter = New StreamWriter("C:\Text.txt")        'Write a line of text.        objStreamWriter.WriteLine("Hello World")        'Write a second line of text.        objStreamWriter.WriteLine("From the StreamWriter class")        'Close the file.        objStreamWriter.Close()    End SubEnd Module'Write a Text File: Version 2Imports System.IOImports System.TextModule Module1    Sub Main()        Dim objStreamWriter As StreamWriter        Dim x As Long        'Open the file.        objStreamWriter = New StreamWriter("C:\Test2.txt", True, _           Encoding.Unicode)        'Write out the numbers 1 through 10 on the same line.        For x = 1 To 10            objStreamWriter.Write(x)        Next x        'Close the file.        objStreamWriter.Close()    End SubEnd Module				

Устранение неполадок

Всякий раз, когда входного или выходного файла рекомендуется программирования практика перенос кода в блоке Try оператор End Try в случае, если возникает ошибка. Некоторые возможные ошибки файл, который не существует, или файл, который уже используется.
Ссылки
Для получения дополнительных сведений посетите следующий веб-узла корпорации Майкрософт сайты:
Как мне...Прочитать текстовый файл?
http://MSDN.Microsoft.com/en-us/library/db5x7c0d.aspx


Как мне...Чтение и запись файлов большого размера?
.aspx http://MSDN.Microsoft.com/en-us/library/6ka1wd3w (v=vs.80)

Класс StreamReader
.aspx http://MSDN.Microsoft.com/en-us/library/System.IO.StreamReader (v=vs.71)

Класс StreamWriter
.aspx http://MSDN.Microsoft.com/en-us/library/System.IO.StreamWriter (v=vs.71)
Try... end try...

Внимание! Эта статья переведена автоматически

Свойства

Номер статьи: 315828 — последний просмотр: 01/31/2013 17:54:00 — редакция: 6.0

Microsoft Visual Basic 2005, Microsoft Visual Basic .NET 2003 Standard Edition, Microsoft Visual Basic .NET 2002 Standard Edition

  • kbvs2005swept kbvs2005applies kbhowtomaster kbmt KB315828 KbMtru
Отзывы и предложения
dy>ody>