VB.NET中怎么操作文本文件
今天就跟大家聊聊有关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中怎么操作文本文件有进一步的了解吗?如果还想了解更多知识或者相关内容,请关注编程网行业资讯频道,感谢大家的支持。
免责声明:
① 本站未注明“稿件来源”的信息均来自网络整理。其文字、图片和音视频稿件的所属权归原作者所有。本站收集整理出于非商业性的教育和科研之目的,并不意味着本站赞同其观点或证实其内容的真实性。仅作为临时的测试数据,供内部测试之用。本站并未授权任何人以任何方式主动获取本站任何信息。
② 本站未注明“稿件来源”的临时测试数据将在测试完成后最终做删除处理。有问题或投稿请发送至: 邮箱/279061341@qq.com QQ/279061341