請教，vb.net寫入文件問題，為什么我用兩種辦法寫文件只能寫入最后一行

寫入模式為覆蓋會出現(xiàn)這個現(xiàn)象

成都創(chuàng)新互聯(lián)專業(yè)為企業(yè)提供浚縣網(wǎng)站建設(shè)、浚縣做網(wǎng)站、浚縣網(wǎng)站設(shè)計、浚縣網(wǎng)站制作等企業(yè)網(wǎng)站建設(shè)、網(wǎng)頁設(shè)計與制作、浚縣企業(yè)網(wǎng)站模板建站服務(wù)，十載浚縣做網(wǎng)站經(jīng)驗，不只是建網(wǎng)站，更提供有價值的思路和整體網(wǎng)絡(luò)服務(wù)。

要使用添加模式

就會累加了

請教在VB.net中如何將數(shù)據(jù)寫入txt文件、再從txt文件讀出？

軟糖來告訴你吧。

VB.net中讀寫文件主要使用System.IO命名空間。

① 使用 File.ReadAllText 讀取

Dim s As String = System.IO.File.ReadAllText("C:\a.txt")

② 使用 StreamReader 讀取，注意編碼格式和寫入的編碼保持一致。

Dim sr As StreamReader = New StreamReader("C:\a.txt", System.Text.Encoding.UTF8)

Dim s As String = sr.ReadToEnd()

sr.Close()

③ 使用 File.WriteAllText 寫入，會覆蓋同名的文件。

Dim 要寫的內(nèi)容 As String = ""

File.WriteAllText(文件路徑, 要寫的內(nèi)容, System.Text.Encoding.UTF8)

④ 使用 StreamWriter 寫入。

Dim sw As System.IO.StreamWriter = New System.IO.StreamWriter("C:\a.txt", False, System.Text.Encoding.UTF8)

sw.WriteLine(TextTB.Text)

sw.Close()

⑤ 使用 StreamWriter 追加寫入。

將上面代碼的第二個參數(shù)False改為True。

◆ 滿意請采納，謝謝 ◆

vb.net中，讀取和寫入文件

寫入：Dim sr As New IO.StreamWriter(Application.StartupPath "/寫入的文本.txt")

sr.WriteLine("寫入的內(nèi)容") sr.Close()讀取：If (File.Exists(Application.StartupPath "/msg.txt")) Then

Dim fm As New IO.FileStream(Application.StartupPath "/讀取的文本.txt", FileMode.Open)

Dim sr As IO.StreamReader = New IO.StreamReader(fm)

Do While sr.Peek() = 0

TextBox1.Text = sr.ReadLine() （讀取文本到文本框）

Loop end if

vb.net怎么往已經(jīng)建立好的dat文件里寫東西，還不覆蓋原本的數(shù)據(jù)？

如果想繼續(xù)編輯之前的文檔，在TXT文件尾部繼續(xù)添加文本，那么還需要在函數(shù)后邊加個參數(shù)。

VB 代碼

方法1：

? Dim?sw?As?StreamWriter =?New?StreamWriter("C:\temp\test.txt")

? sw.Write("abc"? vbCrLf)

sw.Close()

Dim?sw2?As?StreamWriter =?New?StreamWriter("C:\temp\test.txt",?True)

sw2.Write("456"? vbCrLf)

sw2.Close()

方法2：

? My.Computer.FileSystem.WriteAllText("test.txt",?"This is test Text",?True)

方法3：

? System.IO.File.AppendAllText("c:\temp\test.txt",?"this is extra test file")

詳見：“網(wǎng)頁鏈接”?

關(guān)于VB.NET的寫入文件

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click

Dim aa As System.IO.StreamWriter = New System.IO.StreamWriter("C:\a.txt", False, System.Text.Encoding.UTF8)

Dim i As Integer = 0

For i = 0 To Val(TextBox4.Text)

aa.WriteLine("[" i "]")

aa.WriteLine("[" i "]")

Next

aa.Close()

aa.Dispose()

End Sub

分享題目：vb.net寫文件,net vb
當(dāng)前網(wǎng)址：http://chinadenli.net/article34/dsidhpe.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站排名、域名注冊、標(biāo)簽優(yōu)化、建站公司、關(guān)鍵詞優(yōu)化、全網(wǎng)營銷推廣

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)