今天就跟大家聊聊有关VB.NET中怎么操作文本文件,可能很多人都不太了解,为了让大家更加了解,小编给大家总结了以下内容,希望大家根据这篇文章可以有所收获。
在.NET里的System.IO.File和System.IO.FileInfo里的OpenText和AppenText等几个方法都是使用UTF-8编码操作文件的.这就导致如果操作不是使用UTF-8编码编写的文件时将会出现乱码现象!!!
解决方法就是对文本文件使用字节流操作,即不使用.NET里提供的OpenText和AppenText等几个方法,而是将文本当成二进制文件来操作,并且在操作时使用Encoding的方法进行相应的解码即可
实现VB.NET操作文本文件代码如下:
打开文本文件:
Public Function LoadFile
(ByVal FileName As String)
as StringIf 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)'转成系统对应的编码字符
Dim MyEncoder As EncodingEncoding
= Encoding.DefaultFileReader.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字符串的内容写入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
看完上述内容,你们对VB.NET中怎么操作文本文件有进一步的了解吗?如果还想了解更多知识或者相关内容,请关注亿速云行业资讯频道,感谢大家的支持。
免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。