文本文件写入后乱码!!读取一个文本文件然后写入另外一个文本文件后,写入的部分是乱码,怎么解决啊?

fatkids 2013-07-31 05:38:41
各位:求助!
读取一个文本文件然后写入另外一个文本文件后,写入的部分是乱码,怎么解决啊?
代码如下:
Dim sr As StreamReader = New StreamReader(Read_file, System.Text.Encoding.Default)
Dim sw As StreamWriter = New StreamWriter(Save_file, True, System.Text.Encoding.Default)
Dim line As String
Do While sr.peek() > 0
line = sr.ReadLine
sw.Flush()
sw.WriteLine(line)
sw.Flush()
Loop
sr.Close()
sr = Nothing
sw.Close()
sw = Nothing
谢谢啊!
...全文
157 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
fatkids 2013-07-31
  • 打赏
  • 举报
回复
可以了!我用得是Unicode
threenewbee 2013-07-31
  • 打赏
  • 举报
回复
编码没有选择对,试试utf8或者gb编码。
古今多少事 2013-07-31
  • 打赏
  • 举报
回复
试试System.Text.Encoding.GetEncoding("GB2312")

16,555

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧