Momentálne ste offline a čaká sa, kým sa znova pripojíte na internet

Ako čítať a zapisovať do textového súboru pomocou programu Visual Basic 2005 alebo Visual Basic.NET

DÔLEŽITÉ: Tento článok bol preložený pomocou softvéru na strojový preklad od spoločnosti Microsoft, nie prekladateľom. Spoločnosť Microsoft ponúka články preložené prekladateľmi aj strojovo preložené články, vďaka čomu máte možnosť prístupu ku všetkým článkom databázy Knowledge Base vo svojom jazyku. Strojovo preložený článok však nie je vždy perfektný. Môže obsahovať chyby týkajúce sa slovnej zásoby, syntaxe alebo gramatiky, podobne ako cudzinec môže robiť chyby, keď rozpráva vašim jazykom. Spoločnosť Microsoft nenesie zodpovednosť za akékoľvek nepresnosti, chyby alebo škody spôsobené akýmkoľvek nepresným prekladom obsahu alebo jeho použitím zo strany zákazníkov. Spoločnosť Microsoft softvér na strojový preklad pravidelne aktualizuje.

315828
Microsoft Visual Basic 6.0 verziu tohto článku nájdete v časti 183638.
SUHRN
Tento článok ukazuje ako na čítanie a zápis textový súbor v programe Microsoft Visual Basic 2005 alebo Microsoft Visual Basic.NET.

Požiadavky

Nasledujúci zoznam popisuje odporúčané hardvér, softvér, sieťovú infraštruktúru a balíky service pack, ktoré budete potrebovať:
  • 2005 Programu Visual Basic alebo Visual Basic.NET
Tento článok predpokladá, že ste oboznámení s nasledujúce témy:
  • 2005 Programu Visual Basic alebo Visual Basic.NET

Čítať a zapisovať textové súbory

Prečítajte si textový súbor" oddiel demonštruje, ako použiť StreamReader objektu na čítanie textový súbor. „Písať do textového súboru (príklad č. 1)"časti a "Písať do textového súboru (príklad č. 2)" oddiel demonštrujú použiť triedu StreamWriter na písanie textu do súboru.

Prečítajte si textový súbor

Nasledujúci kód používa trieda StreamReader otvoriť, čítať a zatvorte textový súbor. Môžete prejsť názov cesty textový súbor StreamReader štrku na otvorenie súboru automaticky. Metódu ReadLine číta každý riadok textu a inkrementuje ukazovateľa súboru ďalší riadok ako to znie. Pri metóde ReadLine dosiahne koniec súboru, vráti nič.
  1. Spustenie nástroja Microsoft Visual Studio 2005 alebo nástroja vývojové prostredie Microsoft Visual Studio .NET.
  2. Vytvorte novú konzolovú aplikáciu Visual Basic 2005 alebo Visual Basic .NET.
  3. Vrchol Module1.vb súboru pridajte nasledujúci kód:
    Imports System.IO					
  4. Pridať nasledujúci kód do Hlavnej Sub procedúry.
    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. V ponuke ladiť kliknite na tlačidlo Štart na zostavenie a spustenie aplikácie. Stlačením klávesu ENTER zavrite Okno konzoly.

    Okna konzoly sa zobrazí súbor Boot.ini. Poznámka že obsah súboru Boot.ini môže líšiť od konfigurácia konfigurácia. Následujúci výstup je Ukážkový súbor 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"						

Písať do textového súboru (príklad č. 1)

Nasledujúci kód používa trieda StreamWriter otvoriť, napíšte a zatvorte textový súbor. Podobné na StreamReadermôžete prechádzať názov cesty pre textový súbor StreamWriter štrku na otvorenie súboru automaticky. Metóda WriteLine píše celý riadok textu do textového súboru.
  1. Spustite program Visual Studio 2005 alebo Visual Studio.NET.
  2. Vytvorte novú konzolovú aplikáciu Visual Basic 2005 alebo Visual Basic .NET.
  3. Vrchol Module1.vb, pridajte nasledujúci kód:
    Imports System.IO					
  4. Pridať nasledujúci kód do Hlavnej Sub procedúry:
    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. V ponuke ladiť kliknite na tlačidlo Štart na zostavenie a spustenie aplikácie.

    Tento kód vytvorí súbor s názvom Test.txt na jednotke C. Open Test.txt v textovom editore takéto ako program Poznámkový blok. Test.txt obsahuje dva riadky textu:
    Hello WorldFrom the StreamWriter class						

Písať do textového súboru (príklad č. 2)

Nasledujúci kód používa trieda StreamWriter otvoriť, napíšte a zatvorte textový súbor. Na rozdiel od predchádzajúci príklad tohto kódexu prechádza dve ďalšie parametre konštruktér.

Prvý parameter je cesta k súboru a názov súboru súbor. Druhý parameter pravda, určuje, že súbor je možné otvoriť v pripojiť režime. Ak zadáte Falošné druhého parametra, obsah súboru sú prepíše zakaždým, keď spúšťate kód. Tretí parameter určuje kódovanie Unicode tak, že StreamWriter zakóduje súbor v Unicode. Môžete tiež zadať nasledujúce kódovanie metódy pre tretí parameter:
  • ASCII
  • BigEndianUnicode
  • UTF7
  • UTF8
Napísať spôsob je podobný metódy WriteLine okrem toho, že písať automaticky vložiť znakom konca riadka krmivo (CR/LF) kombináciu znakov. Je to užitočné, ak chcete na napísanie jedného znaku na čas.
  1. Spustite program Visual Studio 2005 alebo Visual Studio.NET.
  2. Vytvorte novú konzolovú aplikáciu Visual Basic 2005 alebo Visual Basic .NET.
  3. Vrchol Module1.vb, pridajte nasledujúci kód:
    Imports System.IOImports System.Text					
  4. Pridať nasledujúci kód do Hlavnej Sub procedúry pod existujúci kód:
    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. V ponuke ladiť kliknite na tlačidlo Štart na zostavenie a spustenie aplikácie.

    Tento kód vytvorí súbor s názvom Test2.txt na jednotke C. Open Test2.txt v textovom editore takéto ako program Poznámkový blok. Test2.txt obsahuje jeden riadok textu:
    12345678910							
    Poznámka Ak spúšťate kód niekoľkokrát, je "123456789" text opakovať v tom istom riadku.

Kompletný kód výpis

'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				

Riešenie problémov

Vždy vstupný alebo výstupný súbor je dobré programovanie prax zabalit kód vo vnútri bloku Skúsiť-End-skúste v prípade, ak sa vyskytne chyba. Niektoré možné chyby patrí súbor, ktorý neexistuje, alebo súbor, ktorý sa už používa.
ODKAZY
Pre viac informácií navštívte Microsoft Web stránky:
Skúste... koniec... skúste

Upozornenie: Tento článok bol preložený automaticky

Vlastnosti

ID článku: 315828 – Posledná kontrola: 06/07/2012 12:51:00 – Revízia: 3.0

  • Microsoft Visual Basic 2005
  • Microsoft Visual Basic .NET 2003 Standard Edition
  • Microsoft Visual Basic .NET 2002 Standard Edition
  • kbvs2005swept kbvs2005applies kbhowtomaster kbmt KB315828 KbMtsk
Pripomienky
ex="0" id="language-">