Nasıl okumak ve Visual Basic 2005 veya Visual Basic kullanarak bir metin dosyasına yazma.NET

Makale çevirileri Makale çevirileri
Makale numarası: 315828 - Bu makalenin geçerli olduğu ürünleri görün.
Bu makalenin Microsoft Visual Basic 6.0 sürümü için bkz: 183638.
Hepsini aç | Hepsini kapa

Bu Sayfada

Özet

Okuma ve yazma gösterilmiştir bir Microsoft Visual Basic 2005 veya Microsoft Visual Basic kullanarak metin dosyası.NET.

Gereksinimleri

Aşağıdaki listede önerilen donanım, yazılım, ağ altyapısı ve gereken hizmet paketleri önerilmektedir:
  • Visual Basic 2005 veya Visual Basic.NET
Bu makalede, aşağıdaki konularda bilgi sahibi olduğunuz varsayılmaktadır:
  • Visual Basic 2005 veya Visual Basic.NET

Metin dosyalarına okuma ve yazma

"Bir metin dosyası okunamıyor" Bölüm StreamReader nesne bir metin dosyasını okumak için nasıl kullanılacağı gösterilmiştir. "Bir metin dosyası (örnek 1) yazma"bölümünde ve "Bir metin dosyası (örnek 2) yazma" Bölüm StreamWriter sınıf metin bir dosyaya yazmak için nasıl kullanılacağı gösterilmektedir.

Bir metin dosyası okunamıyor

Aşağıdaki kod, açmak için okumak ve metin dosyasını kapatan StreamReader sınıfı kullanır. İletebilirsiniz dosyayı otomatik olarak açmak için StreamReader kurucusuna bir metin dosyasının yol adı. ReadLine yöntemini metnin her satırının okur ve dosya işaretçisi artırır sonraki satırı olarak okur. ReadLine yöntemini dosyasının sonuna ulaştığında, hiçbir şeydöndürür.
  1. Microsoft Visual Studio 2005 veya Microsoft Visual Studio başlatın.NET.
  2. Visual Basic 2005 veya Visual Basic içinde yeni bir konsol uygulaması oluşturun. .NET.
  3. Aşağıdaki kodu Module1.vb dosyanın en üstüne ekleyin:
    Imports System.IO
    					
  4. Sub Main yordamı aşağıdaki kodu ekleyin.
    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 menüsünde Start derlemek ve uygulamayı çalıştırmak için tıklatın. Kapatmak için enter tuşuna basın Konsol penceresi.

    Konsol penceresinde, Boot.ini dosyasını görüntüler. Not Boot.ini dosyasının içeriğini yapılandırması değişebilir yapılandırma. Örnek Boot.ini dosyası aşağıdaki çıktıdır:
    [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"
    						

Bir metin dosyası (örnek 1) yazma

Aşağıdaki kod, açmak için yazma ve metin dosyasını kapatan StreamWriter sınıfı kullanır. Benzer StreamReaderiçin metin dosyasının yol adı otomatik olarak açmak için StreamWriter yapıcısına iletebilirsiniz. WriteLine yöntemi, tam metin satırının metin dosyasına yazar.
  1. Visual Studio 2005 veya Visual Studio başlatın.NET.
  2. Visual Basic 2005 veya Visual Basic içinde yeni bir konsol uygulaması oluşturun. .NET.
  3. Aşağıdaki kodu Module1.vb üstüne ekleyin:
    Imports System.IO
    					
  4. Sub Main yordamı aşağıdaki kodu ekleyin:
    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 menüsünde Start derlemek ve uygulamayı çalıştırmak için tıklatın.

    Bu kodu Açık sınama.txt c sürücüsündeki gibi bir metin düzenleyicisinde sınama.txt adlı bir dosya oluşturur. Not Defteri. Sınama.txt iki satırlık metin içerir:
    Hello World
    From the StreamWriter class
    						

Bir metin dosyası (örnek 2) yazma

Aşağıdaki kod, açmak için yazma ve metin dosyasını kapatan StreamWriter sınıfı kullanır. Aksine Önceki örnekte, bu kod için iki ek parametreleri iletir. Oluşturucu.

İlk dosya yolunu ve dosya adını parametresidir dosya. İkinci parametre, doğrudosya açılması belirtir ekleme modu. Belirttiğiniz False ikinci parametre için dosyanın içeriğini olan kodu her çalıştırdığınızda üzerine. Üçüncü parametre, böylece dosya Unicode StreamWriter kodlar Unicode belirtir. Ayrıca aşağıdaki belirtebilirsiniz Üçüncü parametre için kodlama yöntemleri:
  • ASCII
  • BigEndianUnicode
  • UTF7
  • UTF8
Yazma otomatik olarak bir satır başı / (cr/lf) satır besleme katıştırmaz yazma yöntemini WriteLine yöntemine benzer karakter bileşimi. Birer karakter yazmak istediğinizde bu yararlı bir saat.
  1. Visual Studio 2005 veya Visual Studio başlatın.NET.
  2. Visual Basic 2005 veya Visual Basic içinde yeni bir konsol uygulaması oluşturun. .NET.
  3. Aşağıdaki kodu Module1.vb üstüne ekleyin:
    Imports System.IO
    Imports System.Text
    					
  4. Varolan kodunuzu altında Sub Main yordamı aşağıdaki kodu ekleyin:
    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 menüsünde Start derlemek ve uygulamayı çalıştırmak için tıklatın.

    Bu kodu Açık Test2.txt c sürücüsündeki gibi bir metin düzenleyicisinde Test2.txt adlı bir dosya oluşturur Not Defteri. Test2.txt tek bir metin satırı içerir:
    12345678910
    							
    Not Kod birkaç kez çalıştırırsanız, "123456789" metindir aynı satırda yinelenen.

Tam kod listesi

'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
				

Sorun giderme

Giriş veya çıkış dosya her iyi programlama bir hata oluşması durumunda kodu Try End Try bloğu içine kaydırmak için yöntem. Bazı olası hatalar arasında bir yok dosya veya dosya zaten kullanımda.

Referanslar

Daha fazla bilgi için aşağıdaki Microsoft Web ziyaret edin siteler:
Nasıl yaparım...Bir metin dosyası okumak istiyorsunuz?
http://msdn.microsoft.com/en-us/library/db5x7c0d.aspx


Nasıl yaparım...Okuma ve yazma büyük dosyalar?
http://msdn.microsoft.com/en-us/library/6ka1wd3w (v=vs.80) .aspx

StreamReader s?n?f?
http://msdn.microsoft.com/en-us/library/System.io.StreamReader (v=vs.71) .aspx

StreamWriter sınıfı
http://msdn.microsoft.com/en-us/library/System.io.StreamWriter (v=vs.71) .aspx

Özellikler

Makale numarası: 315828 - Last Review: 7 Haziran 2012 Perşembe - Gözden geçirme: 2.0
Bu makaledeki bilginin uygulandığı durum:
  • Microsoft Visual Basic 2005
  • Microsoft Visual Basic .NET 2003 Standard Edition
  • Microsoft Visual Basic .NET 2002 Standard Edition
Anahtar Kelimeler: 
kbvs2005swept kbvs2005applies kbhowtomaster kbmt KB315828 KbMttr
Machine-translated Article
ÖNEMLİ: Bu makale, bir kişi tarafından çevrilmek yerine, Microsoft makine-çevirisi yazılımı ile çevrilmiştir. Microsoft size hem kişiler tarafından çevrilmiş, hem de makine-çevrisi ile çevrilmiş makaleler sunar. Böylelikle, bilgi bankamızdaki tüm makalelere, kendi dilinizde ulaşmış olursunuz. Bununla birlikte, makine tarafından çevrilmiş makaleler mükemmel değildir. Bir yabancının sizin dilinizde konuşurken yapabileceği hatalar gibi, makale; kelime dağarcığı, söz dizim kuralları veya dil bilgisi açısından yanlışlar içerebilir. Microsoft, içeriğin yanlış çevrimi veya onun müşteri tarafından kullanımından doğan; kusur, hata veya zarardan sorumlu değildir. Microsoft ayrıca makine çevirisi yazılımını sıkça güncellemektedir.
Makalenin İngilizcesi aşağıdaki gibidir: 315828

Geri Bildirim Ver

 

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