今天就跟大家聊聊有關(guān)VB.NET中怎么操作文本文件，可能很多人都不太了解，為了讓大家更加了解，小編給大家總結(jié)了以下內(nèi)容，希望大家根據(jù)這篇文章可以有所收獲。

創(chuàng)新互聯(lián)公司專注為客戶提供全方位的互聯(lián)網(wǎng)綜合服務，包含不限于成都做網(wǎng)站、網(wǎng)站制作、臨縣網(wǎng)絡推廣、微信小程序定制開發(fā)、臨縣網(wǎng)絡營銷、臨縣企業(yè)策劃、臨縣品牌公關(guān)、搜索引擎seo、人物專訪、企業(yè)宣傳片、企業(yè)代運營等，從售前售中售后，我們都將竭誠為您服務，您的肯定，是我們最大的嘉獎；創(chuàng)新互聯(lián)公司為所有大學生創(chuàng)業(yè)者提供臨縣建站搭建服務，24小時服務熱線：18980820575，官方網(wǎng)址：www.cdcxhl.com

在.NET里的System.IO.File和System.IO.FileInfo里的OpenText和AppenText等幾個方法都是使用UTF-8編碼操作文件的.這就導致如果操作不是使用UTF-8編碼編寫的文件時將會出現(xiàn)亂碼現(xiàn)象!!!

解決方法就是對文本文件使用字節(jié)流操作,即不使用.NET里提供的OpenText和AppenText等幾個方法,而是將文本當成二進制文件來操作,并且在操作時使用Encoding的方法進行相應的解碼即可

實現(xiàn)VB.NET操作文本文件代碼如下:

打開文本文件:

Public Function LoadFile
(ByVal FileName As String) 
as String   
If FileName= "" Then   
Return ""   
End If   
Try   
Dim FileReader As FileFileStream = 
File.Open(FileName, FileMode.Open)   
Dim FileByte(FileReader.Length) As Byte   
FileReader.Read(FileByte, 0, 
FileReader.Length)   
'轉(zhuǎn)成系統(tǒng)對應的編碼字符   
Dim MyEncoder As EncodingEncoding 
= Encoding.Default   
FileReader.Close()   
FileReader = Nothing   
Return New String(MyEncoder.
GetChars(FileByte))   
Catch e As Exception   
Return ""   
End Try   
End Sub  

保存文件:

Public Sub SaveToFile(ByRef Conten 
As String, ByVal FileName As String)   
'/*將Conten字符串的內(nèi)容寫入FileName文件   
If FileName = "" Then   
Exit Sub   
End If   
Try   
Dim FileToWrite As FileFileStream 
= File.Create(FileName)   
Dim rByte() As Byte = Encoding.
Default.GetBytes(Conten.ToCharArray)   
FileToWrite.Write(rByte, 0, 
rByte.Length)   
FileToWrite.Close()   
FileToWrite = Nothing   
Catch e As Exception   
End Try   
End Sub  

看完上述內(nèi)容，你們對VB.NET中怎么操作文本文件有進一步的了解嗎？如果還想了解更多知識或者相關(guān)內(nèi)容，請關(guān)注創(chuàng)新互聯(lián)行業(yè)資訊頻道，感謝大家的支持。