Bu İki Kod Arasındaki Fark Nedir (Vb.Net)
-
Dim dosya_ac As New StreamReader("D:\stokkayit.txt", True)
Do While dosya_ac.Peek() <> -1
yazi_satir = yazi_satir & dosya_ac.ReadLine() & vbNewLine
Loop
yazi_satir = TextBox3.Text
--------------------------------------------------------------------------------------------
Dim FILE_NAME As String = "C:\Users\Owner\Documents\test.txt"
Dim TextLine As String
If System.IO.File.Exists(FILE_NAME) = True Then
Dim objReader As New System.IO.StreamReader(FILE_NAME)
Do While objReader.Peek() <> -1
TextLine = TextLine & objReader.ReadLine() & vbNewLine
LoopTextbox1.Text = TextLine
Else
MsgBox("File Does Not Exist")
End If
evet arkadaşlar bu kodlar arasındaki fark nedir?
-
hiç bir fark yok hacım?
amaç txt dosyasını okuyup textboxa yazdırmak.
not: tek küçük fark 2.kodda dosya gerçekten var mı yok mu diye if yazılmış.Yoksa bir hata veriyor (dosya yok diye)
-
SharpShooter bunu yazdı:
-----------------------------
hiç bir fark yok hacım?
amaç txt dosyasını okuyup textboxa yazdırmak.
not: tek küçük fark 2.kodda dosya gerçekten var mı yok mu diye if yazılmış.Yoksa bir hata veriyor (dosya yok diye)
-----------------------------hocam birinci kod bana ait ikinci kodda http://www.homeandlearn.co.uk/net/nets8p3.html bu web sitesine ait bu adamların ki çalışıyor benim ki çalışmıyor kafayı yiğicem
-
system.io sınıfını import ettin mi ?
-
FCN bunu yazdı:
-----------------------------
system.io sınıfını import ettin mi ?
-----------------------------en üste import.system.io yazdım kütüpane açı8k yani problem yok
-
beyler konuyu biraz yukarı almak istiyorum acil ihtiyacım var çözüme
-
Dim dosya_ac As New StreamReader("D:\stokkayit.txt")
şöyle bir denesene alakası yok ama bir dene.
birde d altında öyle bir txt var mı? uzantısı text olmasın ve hata veriyor mu ?
-
SharpShooter bunu yazdı:
-----------------------------
Dim dosya_ac As New StreamReader("D:\stokkayit.txt")
şöyle bir denesene alakası yok ama bir dene.
birde d altında öyle bir txt var mı? uzantısı text olmasın ve hata veriyor mu ?
-----------------------------hocam olmadı D de böyle bir txt var hata yok ama hala olmuyor hala olmuyor çıldıracam
-
True kısmını kaldır.
-
sandman bunu yazdı:
-----------------------------
True kısmını kaldır.
-----------------------------kaldırdım ama bi işe yaramadı yardım sandman yardım FCN yardım tüm tahribat .Netcileri
-
yazi_satir = TextBox3.Text
kısmını
TextBox3.Text = yazi_satir
olarak degiştir.
