如何將已有的txt格式的文件數(shù)據(jù)導(dǎo)入VB.NET程序中，（也就是在VB.NET中讀取所需的txt文

一個(gè)按鈕，一個(gè)文本框，把文本框設(shè)置成多行顯示。

成都創(chuàng)新互聯(lián)于2013年開(kāi)始，先為鼓樓等服務(wù)建站，鼓樓等地企業(yè)，進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為鼓樓企業(yè)網(wǎng)站制作PC+手機(jī)+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問(wèn)題。

代碼如下：

Imports System.IO

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim r As New StreamReader(Application.StartupPath "\ABC.txt", System.Text.Encoding.Default) '用StreamReader打開(kāi)文本文件

Dim s As String

TextBox1.Text = ""

Do While r.Peek -1 '是否到文件尾

s = r.ReadLine '從打開(kāi)的文件中讀取一行內(nèi)容

TextBox1.Text = TextBox1.Text s vbCrLf '添加到文本框TextBox1.Text的后面并回車

Loop

r.Close() '關(guān)閉對(duì)象

End Sub

End Class

VB.net 2008 如何以二進(jìn)制的方式向文本文件中追加一個(gè)回車符

解決了，把 fr.Write(vbCrLf) 改成 fr.Write(CByte(vbCrLf))即可。

牛，為使用二進(jìn)制的程序員鼓掌！

從來(lái)沒(méi)用過(guò)的人問(wèn)：為什么要用二進(jìn)制啊，有啥好處？

VB.net在原數(shù)據(jù)庫(kù)內(nèi)容的基礎(chǔ)上追加新字段并對(duì)新字段進(jìn)行賦值

ALTER TABLE TABLE_Name ADD columnName varchar(30) '新增字段

ALTER TABLE TABLE_Name ADD columnName1 varchar(30) '新增字段

INSERT INTO TABLE_Name(columnName,columnName1)VALUES(columnName,columnName1) ‘插入新行，只給新字段賦值

vb.net 怎么寫入和多行讀取txt文件，而且多次寫如之前的不被覆蓋？

.net應(yīng)該提供了此類函數(shù)。如C#就有File.AppendAllText(filename,string)用于追加內(nèi)容，F(xiàn)ile.ReadAllLine(filename)用于讀取多行。

請(qǐng)教在VB.net中如何將數(shù)據(jù)寫入txt文件、再?gòu)膖xt文件讀出？

軟糖來(lái)告訴你吧。

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 寫入，會(huì)覆蓋同名的文件。

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 追加寫入。

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

◆ 滿意請(qǐng)采納，謝謝 ◆

新聞標(biāo)題：vb.nettxt追加的簡(jiǎn)單介紹
本文地址：http://aaarwkj.com/article4/hhphoe.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供企業(yè)網(wǎng)站制作、商城網(wǎng)站、網(wǎng)站排名、外貿(mào)網(wǎng)站建設(shè)、App設(shè)計(jì)、營(yíng)銷型網(wǎng)站建設(shè)

廣告

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