今天就跟大家聊聊有关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 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) '转成系统对应的编码字符 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字符串的内容写入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中怎么操作文本文件有进一步的了解吗?如果还想了解更多知识或者相关内容,请关注亿速云行业资讯频道,感谢大家的支持。
亿速云「云服务器」,即开即用、新一代英特尔至强铂金CPU、三副本存储NVMe SSD云盘,价格低至29元/月。点击查看>>
免责声明:本站发布的内容(图片、视频和文字)以原创、转载和分享为主,文章观点不代表本网站立场,如果涉及侵权请联系站长邮箱:is@yisu.com进行举报,并提供相关证据,一经查实,将立刻删除涉嫌侵权内容。