Як читати і писати на текстовий файл за допомогою Visual Basic 2005 або Visual Basic.NET

Переклади статей Переклади статей
Номер статті: 315828 - Показ продуктів, яких стосується ця стаття.
Microsoft Visual Basic 6.0 версія цієї статті див. 183638.
Розгорнути все | Згорнути все

На цій сторінці

ПІДСУМКИ

Ця стаття демонструє, як читати і писати з текстовий файл за допомогою Microsoft Visual Basic 2005 або Microsoft Visual Basic.МЕРЕЖІ.

Вимоги

У цьому списку описано рекомендованих устаткування, Підтримка програмного забезпечення, мережі інфраструктури та пакети оновлень, які потрібно:
  • 2005 Року Visual Basic або Visual Basic.NET
У цій статті припускає, що ви знайомі з наступні теми:
  • 2005 Року Visual Basic або Visual Basic.NET

Читати та записувати текстові файли

"Читати текстового файлу" розділ демонструє, як використовувати StreamReader об'єкт для читання текстового файлу. "Створити текстовий файл (Приклад 1)"розділ і на "Створити текстовий файл (зразок 2)" розділ продемонструвати, як використовувати клас StreamWriter написати текст до файлу.

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

Наступний код використовує StreamReader клас відкрити, читати і закрийте його. Ви можете передати шлях ім'я текстового файлу в StreamReader Конструктор, щоб відкрити файл автоматично. Метод ReadLine читає кожен рядок тексту та збільшує файла курсор до наступний рядок, як вона читає. Коли метод ReadLine досягає кінця файлу, він нічого неповертає.
  1. Запустіть Microsoft Visual Studio 2005 або Microsoft Visual Studio.МЕРЕЖІ.
  2. Створення нової консолі застосування в 2005 року Visual Basic або Visual Basic .МЕРЕЖІ.
  3. Додати наступний код у верхній частині Module1.vb файл:
    Imports System.IO
    					
  4. Додати наступний код Південь основні процедури.
    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. Debug меню натисніть кнопку почати скомпілювати і запустити програму. Натисніть клавішу ENTER, щоб закрити на Вікно консолі.

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

Створити текстовий файл (Приклад 1)

Наступний код використовує StreamWriter клас, відкрити, написати і закрийте його. Подібні для StreamReaderви можете передати шлях ім'я текстового файлу в StreamWriter Конструктор, щоб відкрити файл автоматично. Метод WriteLine пише: завершення рядка тексту до текстового файлу.
  1. Почати Visual Studio 2005 або Visual Studio.МЕРЕЖІ.
  2. Створення нової консолі застосування в 2005 року Visual Basic або Visual Basic .МЕРЕЖІ.
  3. Додати наступний код у верхній частині Module1.vb:
    Imports System.IO
    					
  4. Додати наступний код до Sub основні процедури:
    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. Debug меню натисніть кнопку почати скомпілювати і запустити програму.

    Цей код створює файл з ім'ям Test. txt на диску c. відкриті Test. txt у текстовому редакторі таких як Блокнот. Test. txt містить два рядки тексту:
    Hello World
    From the StreamWriter class
    						

Створити текстовий файл (зразок 2)

Наступний код використовує StreamWriter клас, відкрити, написати і закрийте його. На відміну від Наприклад, цей код проходить два додаткові параметри, на Конструктор.

Перший параметр є шлях до файлу та ім'я файлу файл. Другий параметр, правда, визначає, що відкрити файл в режим запит на додавання. Якщо ви вкажете ХИБНІСТЬ для другого параметра, є вміст файлу перезаписані під Вільний час кожного виконання коду. Третій параметр визначає двопрохідне кодування Юнікод , і StreamWriter зберігає файл у кодуванні Юнікод. Можна також указати такі методи двопрохідне кодування для третій параметр:
  • ASCII
  • BigEndianUnicode
  • UTF7
  • UTF8
Написати метод схожий на метод WriteLine Крім того, що писати не автоматично вставляти перевезення повернення/рядки (CR/LF) комбінації символів. Це корисно, коли ви хочете написати лише один символ в Вільний час.
  1. Почати Visual Studio 2005 або Visual Studio.МЕРЕЖІ.
  2. Створення нової консолі застосування в 2005 року Visual Basic або Visual Basic .МЕРЕЖІ.
  3. Додати наступний код у верхній частині Module1.vb:
    Imports System.IO
    Imports System.Text
    					
  4. Додати наступний код під існуючого коду процедуру Sub Головна :
    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. Debug меню натисніть кнопку почати скомпілювати і запустити програму.

    Цей код буде створено файл, що називається Test2.txt на диску c. відкрито Test2.txt у текстовому редакторі таких як Блокнот. Test2.txt містить один рядок тексту:
    12345678910
    							
    Примітка Якщо код кілька разів, є "123456789" тексту повторюються в тому ж рядку.

Повний код лістингу

'Read a Text File
Imports System.IO
Module 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 Sub
End Module

'Write a Text File: Version 1
Imports System.IO
Module 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 Sub
End Module

'Write a Text File: Version 2
Imports System.IO
Imports System.Text
Module 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 Sub

End Module
				

Виправлення неполадок

Кожного разу, коли ви вводу або виводу файлу, це добре, програмування практика для обгортання код всередині блоку Спробувати кінця спробувати , у разі виникнення помилки. Деякі можливі помилки відносяться до файл, що не існує, або файл, який уже використовується.

ПОСИЛАННЯ

Для отримання додаткової інформації відвідайте наступні веб Microsoft сайти:
Як Я можу...Читати текстовий файл?
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)

Властивості

Номер статті: 315828 - Востаннє переглянуто: 7 червня 2012 р. - Редакція: 1.0
ЗАСТОСОВУЄТЬСЯ ДО:
  • Microsoft Visual Basic 2005
  • Microsoft Visual Basic .NET 2003 Standard Edition
  • Microsoft Visual Basic .NET 2002 Standard Edition
Ключові слова: 
kbvs2005swept kbvs2005applies kbhowtomaster kbmt KB315828 KbMtuk
Машинний переклад
УВАГА! Цю статтю переклала програма машинного перекладу Microsoft, а не людина. Корпорація Microsoft пропонує вам як машинні переклади, так і переклади фахівців, щоб Ви мали доступ до всіх статей бази знань рідною мовою. Проте стаття, яку переклав комп’ютер, не завжди бездоганна. Вона може містити лексичні, синтаксичні або граматичні помилки. Так само помиляється іноземець, спілкуючись вашою рідною мовою. Корпорація Microsoft не несе відповідальність за жодні неточності, помилки або шкоду, завдану неправильним перекладом змісту або його використанням з боку користувачів. Крім того, корпорація Microsoft часто оновлює програму машинного перекладу.
Клацніть тут, щоб переглянути цю статтю англійською мовою: 315828

Надіслати відгук

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com