Kaip skaityti tekstin? fail? naudodami System.IO 2005 m. Visual Basic ar Visual Basic .NET

Straipsni? vertimai Straipsni? vertimai
Straipsnio ID: 302309 - Per?i?r?ti ?iame straipsnyje minimus produktus.
?io straipsnio versija Microsoft Visual C# .NET, ie?kokite 306777.
Microsoft Visual Basic 6.0 versijos ?is straipsnis, ?r. 183638.
I?pl?sti visus | Sutraukti visus

?iame puslapyje

Santrauka

?is straipsnis parodo, kaip nuskaityti informacij? i? tekstin? fail? ir naudoti ArrayList, skirto klas?s nerodyti ?ios informacijos vartotojui.

Skaityti tekstinius failus 2005 m. Visual Basic ar Visual Basic .NET

Atidaryti ir skaityti failus skaityti yra svarbi ?vesties/i?vesties (IO) funkcionalumo, net jei jums nereikia ?ra?yti ? fail? ? klausim?. ?iame pavyzdyje atidaromas svarstym?, kuris yra naudinga teksto fail? failus bet netinka u? dvejetainius failus. ?is pavyzdys naudoja vien? i? daugelio metodai, kuriuos galima atidaryti fail?. Nors daugelis duomen? strukt?ros b?t? galima saugoti informacij?, kuri yra gauta i? failo, ArrayList, skirto klas?s tai lengviausias konstrukcija naudoti. Atidaryti ir skaityti i? to fail?, ?iame pavyzdyje objektus i? System.IO vard?, specialiai System.IO.StreamReader klas?s.

Pastaba ?is m?ginys reikalauja tam tikros formos teksto (.txt) failo i? kuri? skaityti.

Jei norite ?kelti ir skaityti tekstin? fail? i? Microsoft Visual Basic 2005 arba Microsoft Visual Basic .NET, atlikite ?iuos veiksmus:
  1. Paleisti Microsoft Visual Studio 2005 arba Microsoft Visual Studio .NET. Kurti nauj? konsol? program? Visual Basic. Visual Studio sukuria modulis jums, kartu su tu??ia Main() proced?r?.
  2. ?sitikinkite, kad projekto nuorodos bent sistemos vard?. Naudoti parei?kimo importosistema, System.IOir System.Collections vard?, jums nereikia gauti deklaracijomis ?i? vard? v?liau savo kode. Turite naudoti ?iuos teiginius prie? bet kitas deklaracijas.
    Imports System
    Imports System.IO
    Imports System.Collections
    					
  3. Atidaryti fail?, skaityti, kurti nauj? egzempliori? StreamReader objekto ir perduoti failo kelias ? konstruktorius taip:
    Dim objReader As New StreamReader("c:\test.txt")
    					
  4. Jums reik?s Styga kintamojo, kuriame norite saugoti kiekvien? eilut? kaip jums procesas failo. Nes jums bus prid?ti ?ias eilutes, ArrayList, skirto, paskelbti ir sukurti objekto tipo taip pat.
    Dim sLine As String = ""
    Dim arrText As New ArrayList()
    					
  5. Yra keletas b?d?, kaip skaityti fail?, ?skaitant ReadToEnd metodas, kuris nuskaito vis? fail? vienu metu. Vis d?lto u? tai pavyzd?iui, galite naudoti ReadLine metodas, kad fail? vienoje linijoje vienu metu. Kai pabaigoje failas pasiekiamas, ?is metodas gr??ina "Nieko", kuri leid?ia b?du baigti savo linijos. Kaip j?s skaitote kiekvien? eilut? i? failo, galite prid?ti metodas ArrayList, skirto ?terpti eilutes ? j?s? ArrayList, skirto klas?s.
    Do
        sLine = objReader.ReadLine()
        If Not sLine Is Nothing Then
            arrText.Add(sLine)
        End If
    Loop Until sLine Is Nothing
    objReader.Close()
    					
  6. Naudoti "Kiekvienam" kilpa ra?yti turin? savo naujai u?pildyti ArrayList, skirto ? konsol? taip:
    For Each sLine In arrText
        Console.WriteLine(sLine)
    Next
    Console.ReadLine()
    					
  7. ?ra?yti ir paleisti savo kod?, kuris sukuria s?ra?? savo failo ? konsol?.

U?baigti kod? s?ra??

Imports System
Imports System.IO
Imports System.Collections

Module Module1

    Sub Main()
        Dim objReader As New StreamReader("c:\test.txt")
        Dim sLine As String = ""
        Dim arrText As New ArrayList()

        Do
            sLine = objReader.ReadLine()
            If Not sLine Is Nothing Then
                arrText.Add(sLine)
            End If
        Loop Until sLine Is Nothing
        objReader.Close()

        For Each sLine In arrText
            Console.WriteLine(sLine)
        Next
        Console.ReadLine()
    End Sub

End Module
				

Sp?stus

Yra keletas dalyk?, kuriuos reikia ?inoti, kai dirbate su failu I/o, ?skaitant ?iuos elementus:
  • Bet kada galite prieiti prie failo, yra galimyb?, kad failas, kur? bandote skaityti ar ra?yti negali b?ti sistemos ar gegu??s b?ti naudojamas.
  • ?iame pavyzdyje skaito vis? fail? ? atminties prie? j? proces? fail?. Galite susidurti su situacija, kurioje failas yra per didelis vyks atmintyje, arba galb?t neturite prieigos teisi? ? fail?.
Vis? ?i? situacij? sukelti i?imtis pakilti. Tai visada geros praktikos teikti pabandyti... sugavimo blok? tvarkyti ?i? bendr? klausim?.

Savyb?s

Straipsnio ID: 302309 - Paskutin? per?i?ra: 2013 m. bir?elio 20 d. - Per?i?ra: 1.0
Taikoma:
  • Microsoft Visual Basic 2005
  • Microsoft Visual Basic .NET 2003 Standard Edition
  • Microsoft Visual Basic .NET 2002 Standard Edition
Rakta?od?iai: 
kbvs2005applies kbvs2005swept kbhowtomaster kbmt KB302309 KbMtlt
Atliktas automatinis vertimas
SVARBU: ?is straipsnis i?verstas naudojant ?Microsoft? ma?ininio vertimo programin? ?rang? ir gali b?ti pataisytas naudojant ?Community Translation Framework? (CTF) technologij?. ?Microsoft? si?lo ma?inos i?verstus ir po to bendruomen?s suredaguotus straipsnius, taip pat ?mogaus i?verstus straipsnius siekdama suteikti prieig? prie vis? savo ?ini? baz?s straipsni? daugeliu kalb?. Ma?inos i?verstuose ir v?liau paredaguotuose straipsniuose gali b?ti ?odyno, sintaks?s ir / arba gramatikos klaid?. ?Microsoft? neatsako u? jokius netikslumus, klaidas arba ?al?, patirt? d?l neteisingo turinio vertimo arba m?s? klient? naudojimosi juo. Daugiau apie CTF ?r. http://support.microsoft.com/gp/machine-translation-corrections.
Spustel?kite ?ia, nor?dami pamatyti ?io straipsnio versij? angl? kalba: 302309

Pateikti atsiliepim?

 

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