2010VB.net 如何一直讀取TXT文檔最后一行信息，麻煩給個代碼，謝謝

首先在代碼的開頭引入命名空間：

成都創(chuàng)新互聯(lián)公司-專業(yè)網(wǎng)站定制、快速模板網(wǎng)站建設(shè)、高性價比郴州網(wǎng)站開發(fā)、企業(yè)建站全套包干低至880元,成熟完善的模板庫,直接使用。一站式郴州網(wǎng)站制作公司更省心,省錢,快速模板網(wǎng)站建設(shè)找我們，業(yè)務(wù)覆蓋郴州地區(qū)。費用合理售后完善，十年實體公司更值得信賴。

Imports?System.IO

給出三個讀文本文件的例子。

'直接讀取所有文本

Dim?fileString?As?String?=?File.ReadAllText("1.txt")

'把所有行弄進(jìn)一個數(shù)組

Dim?fileLines()?As?String?=?File.ReadAllLines("1.txt")

'以流的方式一行一行讀取

Using?fs?As?FileStream?=?File.OpenRead("1.txt")?'初始化文件流

Using?sr?As?New?StreamReader(fs)?'初始化流讀取器

Dim?lineString?As?String?=?""

While?Not?sr.EndOfStream?'循環(huán)直到流結(jié)束

lineString?=?sr.ReadLine()?'讀一行

'這里lineString就是每行的文件內(nèi)容了。

'你可以在這里對它進(jìn)行處理。

End?While

End?Using

End?Using

請教在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 如果讀取txt數(shù)據(jù)(或十進(jìn)制dat數(shù)據(jù))

vb.net雖也有input語句，但一次只能讀取到一個變量中，可以用TextFieldParser類代替，但似乎沒以前的方便。不過比以前的更靈活。寫入文件Write還是可以用，在Microsoft.VisualBasic.FileIO中。

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

Dim?fileName?As?String?=?"E:\User?Documents\Master\My?Documents\電子閱讀\股票\table2.csv"

Using?Recrods?As?New?Microsoft.VisualBasic.FileIO.TextFieldParser(fileName)?'建立TextFieldParser對象

'MyReader.TextFieldType?=?FieldType.Delimited

Recrods.SetDelimiters(",")?'把字段分隔符設(shè)置為","

Dim?curRow()?As?String

Do?Until?Recrods.EndOfData

curRow?=?Recrods.ReadFields()?'讀取記錄行，返回字符串?dāng)?shù)組，所以不同字段類型需要自己轉(zhuǎn)換。

Debug.Print(Join(curRow,?vbTab))

Loop

End?Using

End?Sub

vb.net 循環(huán)讀取文件問題

先用StreamWriter一行行的循環(huán)讀取到一個字符串中利用split('，')取得2個數(shù)字，將2個數(shù)字和文本框進(jìn)行比對即可