|
Vb. net’te Text Dosyaya Yazma, Okuma Ve Düzenleme Islemleri
Arkadaslar merhabalar bu makalemizde Vb.Net ‘i kullanarak Bir text dosya nasil olusturulur ve olusturmus oldugumuz text dosyasina nasil kayit eklenir bunlar üzerinde duracagiz.
Ilk olarak kullanacagimiz kütüphaneyi ve bu kütüphanenin class’larini taniyalim.
Herhangi bir text dosyasini açmak ve yazmaya yada okumaya hazirlamak için filestream class’i kullanilir.
Tabiî ki bu class’lari kullanabilmek için sayfamizin en üst bölümüne
Imports System.IO
Kütüphanesini çagirmak gerekecektir. Bizim text dosyasina yazi yazmada kullanacagimiz class’larin yer aldigi kütüphane’dir.
Biz bu kütüphanenin 3 tane class’ini kullanacagiz, FileStream, StreamWriter ve StreamReader
1-FileStream
Filestream class’ inin genel kullanimi asagidaki gibidir. Bu class’ta dosyalari yazmak için mi? Okumak için mi açicagimiz’ i belirtmemiz gerekir. Aksi takdir’ de hataya neden olacaktir.
Örnegin bir text dosyasina yazi eklemek istiyorsak bunu Append Modunda açmak gerekir.
Eger o text dosyasindan sadece yazi okuyacaksak bu dosyayi Open Modunda açmamiz yeterli olacaktir. Dosya Olusturmak içinse;
Dim fs as filestream = new filestream(“dosyaadi ve yolu”,Filemode.OpenOrcreate)
Kullanimi :
Dim Degisken adi as Filestream = new Filestream(“dosya yolu ”, dosya açma mod’ u)
Dosya’dan okumak için;
Dim fs as filestream = new filestream(“dosya_adi.txt”, Filemode.open)
Dosya’ ya yazmak için;
Dim fs as filestream = new filestream(“dosya_adi.txt”, Filemode.Append)
2-StreamWriter
StreamWriter class’ inin genel kullanimi asagidaki gibidir. Bu class’i kullanabilmek için ilk olarak bir filestream tanimlamak gerekir ve tanimladiginiz streamwriter’a bu filestream atanir.
Kullanimi :
Dim Degisken Adi as streamWriter = new streamwriter(fs)
Örnek:
Dim fs as filestream = new filestream(“dosya.txt”,filemode.append)
Dim sw as streamwriter = new streamwriter(fs)
Sw.writeline(“Yazilacak deger”)
Streamwriter class’inin writeline metodu text dosyasinda bir satira yazar, eger birden çok satira veri girmek istenirse, birden çok writeline kullanilmalidir.
Asagidaki gibi:
Sw.writeline(“Yazilacak deger”)
Sw. writeline(“Yazilacak deger”)
3-StreamReader
StreamReader class’i text dosyasindan veriyi satir satir okumaya yarar.
Kullanimi:
Dim Degisken Adi as StreamReader = new StreamReader(fs)
Örnek:
Dim satir1
Dim fs as filestream = new filestream(“dosya.txt”,filemode.open)
Dim sr as streamreadet = new streamreader(fs)
Satir1=sr.ReadLine()
StreamReader class’inin Readline metodu text dosyasindaki sadece bir satiri okur ve okunan satirin bir degisken’e yada bir nesneye atanmasi gerekir. Birden fazla satir okumak için bir döngü kurmak ve okuma islemini çogaltmak gerekmektedir.
Asagidaki Gibi:
Sr.readline
Sr.readline
Ögrendiklerimizi Anlamamiz Açisindan birde Örnek Verelim:
Bunun için bos bir proje açalim. Ve Asagidaki gibi tasarlayalim.
Ama Tabiî ki tasarim size kalmis siz kafaniza göre tasarim yapabilirsiniz.
Evet form tasarimini tamamladiktan sonra oku butonunun click event’ine geliyoruz.
Ve kodumuz su sekilde olacak
Oku Butonu Click Event’i
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim file As String
Dim tmp As String
file = "deneme.txt"
Dim fs As FileStream = New FileStream(file, FileMode.Open)
Dim r As StreamReader = New StreamReader(fs)
TextBox1.Text = ""
Do
tmp = r.ReadLine
TextBox1.Text = TextBox1.Text & tmp & Microsoft.VisualBasic.ControlChars.CrLf
Loop Until tmp Is Nothing
r.Close()
fs.Close()
End Sub
Yaz Butonu Click Event’i
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim file As String
file = "deneme.txt"
Dim fs As FileStream = New FileStream(file, FileMode.Append)
Dim w As StreamWriter = New StreamWriter(fs)
w.WriteLine(TextBox1.Text)
w.Close()
fs.Close()
End Sub
Olustur Butonu Click Event’ine
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim fs As FileStream = New FileStream("dosya.txt", FileMode.CreateNew)
fs.Close()
End Sub
Evet en son olarak projemizi build edip çalistiriyoruz.
Bu makaleninde sonuna geldik. Bir sonraki makalemizde görüsmek üzere esen kalin.
Olusan hatalar ve sorulariniz için
|