Ako detekovať koniec súboru v jazyku Visual Basic .

NET Framework v jazyku Visual Basic obsahuje niekoľko spôsobov , ako otvoriť a čítať súbor na disku . Väčšina z nich používa nejakú formu StreamReader triedy previesť súbor do sekvenčné prúd znakov alebo línie . Každý znak alebo línia je potom načítaný do pamäte a program spracováva dáta od začiatku do konca . Keď sa posledný znak sa načíta do programu , indikátor EndOfStream je nastavená na hodnotu true . Môžete si vytvoriť krátky program , ktorý kopíruje zdrojový súbor do konzoly , zatiaľ čo sledujete na konci indikátora súboru . Pokyny dovolená 1

Vytvorenie novej aplikácie Visual Basic konzoly . Otvorte aplikáciu Visual Basic Express ( alebo Visual Studio ) . Kliknite na " Súbor " , " New Project " . Z stromovom zobrazení kliknite na položku Windows aplikácie pod Visual Basic , vyberte ikonu aplikácie konzoly kliknite na tlačidlo " OK " . Po krátkej chvíli sa zobrazí nové okno kód
2

Pridajte nasledujúci riadok na začiatok súboru pred deklarácia modulu : . ClipArt

Dovoz System.IO

Module Module1

hovorí jazyka , ktorý chcete používať triedy v odbore názvov System.IO .
3

deklarovať niekoľko pamäťových premenných na začiatku roka hlavný podsystém takto :

Sub Main ( )

Dim filename As String = " .. \\ .. \\ Module1.vb "

Dim rdr Ako StreamReader

Dim txt As String

premenná názov súboru obsahuje meno súboru , ktorý chcete čítať . Dva dvojlôžkové obdobie ( .. \\ ) označuje , že súbor je dve zložky až z aktuálneho adresára . Vzhľadom k tomu , program sa spustí v priečinku \\ vydanie bin \\ debug alebo bin , musíme sa pohybovať dve zložky a nájsť zdrojový súbor .

Premenná RDR bude mať inštanciu triedy StreamReader v System.IO balíček . StreamReader obsahuje všetky metódy používané na čítanie súboru .

Premenné txt bude použitá držať každý riadok súboru ako je skopírovaný .
4

Otvorte texte súbor pomocou nasledujúci kód :

Skúste klipart

RDR = File.OpenText ( súboru )

Chytiť ex ako výnimka

Console.WriteLine ( " Nemožno otvoriť súbor " a ex.Message )

Späť

End Try

metódy File.OpenText vytvorí inštanciu StreamReader ukázal na súbor . Ak súbor neexistuje , je vyvolaná výnimka a zobrazí chybové hlásenie dostane písomné
5

Prečítajte si súbor a skopírujte ho do konzoly pomocou nasledujúci kód : .

Kým RDR . EndOfStream = False

txt = rdr.ReadLine

Console.WriteLine ( txt )

End While

slučky je pomerne jednoduché . Predtým, než začne slučka , EndOfStream je false ( ak súbor je prázdny ) . Na každom výskyte slučky , riadok textu je načítaný do premennej txt potom zapísaná do konzoly . Po posledný riadok je čítať , indikátor EndOfStream dostane nastavená na hodnotu true a slučka končí .
6

Zatvorte súbor pri dokončení slučky .

Rdr.Close ( )

End Sub End Module

StreamReader Close metóda uvoľňuje súbor , potom sa program ukončí .

• Predchádzajúca strana: Ako vytvoriť projekt vo Visual Basic 2008 
• Ďalšia strana: Kroky , ako vytvoriť aplikácie Visual Basic