VB.NET中怎么實(shí)現(xiàn)讀寫文本文件操作，相信很多沒有經(jīng)驗(yàn)的人對(duì)此束手無策，為此本文總結(jié)了問題出現(xiàn)的原因和解決方法，通過這篇文章希望你能解決這個(gè)問題。

創(chuàng)新互聯(lián)致力于互聯(lián)網(wǎng)品牌建設(shè)與網(wǎng)絡(luò)營銷，包括網(wǎng)站設(shè)計(jì)制作、做網(wǎng)站、SEO優(yōu)化、網(wǎng)絡(luò)推廣、整站優(yōu)化營銷策劃推廣、電子商務(wù)、移動(dòng)互聯(lián)網(wǎng)營銷等。創(chuàng)新互聯(lián)為不同類型的客戶提供良好的互聯(lián)網(wǎng)應(yīng)用定制及解決方案，創(chuàng)新互聯(lián)核心團(tuán)隊(duì)十多年專注互聯(lián)網(wǎng)開發(fā)，積累了豐富的網(wǎng)站經(jīng)驗(yàn)，為廣大企業(yè)客戶提供一站式企業(yè)網(wǎng)站建設(shè)服務(wù)，在網(wǎng)站建設(shè)行業(yè)內(nèi)樹立了良好口碑。

VB.NET讀寫文本文件

為了把text保存到文件，創(chuàng)建一個(gè)基于FileStream的StreamReader對(duì)象，然后調(diào)用Write方法把需要保存的text寫入文件。下面的代碼用SaveFileDialog提示用戶指定一個(gè)文件，用于保存TextBox1的內(nèi)容。

SaveFileDialog1.Filter=_ "TextFiles|*.txt|AllFiles|*.*"  SaveFileDialog1.FilterIndex=0 IfSaveFileDialog1.ShowDialog=DialogResult.OKThen  DimFSAsFileStream=SaveFileDialog1.OpenFile  DimSWAsNewStreamWriter(FS)  SW.Write(TextBox1.Text)  SW.Close()  FS.Close()  EndIf

同樣采用類似的語句，我們讀取一個(gè)文本文件，并把內(nèi)容顯示在TextBox控件中。StreamReader的ReadToEnd方法返回文件的全部內(nèi)容。

OpenFileDialog1.Filter=_ "TextFiles|*.txt|AllFiles|*.*"  OpenFileDialog1.FilterIndex=0 IfOpenFileDialog1.ShowDialog=DialogResult.OKThen  DimFSAsFileStream  FS=OpenFileDialog1.OpenFile  DimSRAsNewStreamReader(FS)  TextBox1.Text=SR.ReadToEnd  SR.Close()  FS.Close()  EndIf

各種對(duì)象的存儲(chǔ)

采用BinaryFormatte以二進(jìn)制的形式，或者用SoapFormatter類以XML格式都可以序列化一個(gè)具體的對(duì)象。只要把所有BinaryFormatter的引用改為SoapFormatter，無需改變?nèi)魏未a，就可以以XML格式序列化對(duì)象。

首先創(chuàng)建一個(gè)BinaryFormatter實(shí)例：

DimBinFormatterAsNewBinary.BinaryFormatter()

然后創(chuàng)建一個(gè)用于存儲(chǔ)序列化對(duì)象的FileStream對(duì)象：

DimFSAsNewSystem.IO.FileStream("c:\test.txt",IO.FileMode.Create)

接著調(diào)用BinFormatter的Serialize方法序列化任何可以序列化的framework對(duì)象：

R=NewRectangle(rnd.Next(0,100),rnd.Next(0,300),_  rnd.Next(10,40),rnd.Next(1,9))  BinFormatter.Serialize(FS,R)

加一個(gè)Serializable屬性使得自定義的對(duì)象可以序列化

<Serializable()>PublicStructurePerson  DimNameAsString  DimAgeAsInteger  DimIncomeAsDecimal  EndStructure  DimPAsNewPerson()  P=BinFormatter.Serialize(FS,Person)  DimRAsNewRectangle  R=BinFormatter.Serialize(FS,Rectangle)

看完上述內(nèi)容，你們掌握VB.NET中怎么實(shí)現(xiàn)讀寫文本文件操作的方法了嗎？如果還想學(xué)到更多技能或想了解更多相關(guān)內(nèi)容，歡迎關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道，感謝各位的閱讀！

網(wǎng)站標(biāo)題：VB.NET中怎么實(shí)現(xiàn)讀寫文本文件操作
新聞來源：http://www.aaarwkj.com/article40/jposeo.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站維護(hù)、、外貿(mào)網(wǎng)站建設(shè)、移動(dòng)網(wǎng)站建設(shè)、營銷型網(wǎng)站建設(shè)、用戶體驗(yàn)

廣告

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