作者chienyu (充实自己)
看板Visual_Basic
标题VB2005 关於档案读取
时间Tue May 20 11:32:12 2008
请问一下
在VB2005里读取txt档案
txt档案里是打中文
但是执行後，Combobox里却显示乱码，EX: 口口口口口 (原文为:大屁屁)
程式码如下
Dim f As New FileInfo(Application.StartupPath + "\combolist.txt")
Dim sr As StreamReader = f.OpenText
Do While sr.Peek >= 0
ComboBox7.Items.Add(sr.ReadLine)
Loop
sr.Close()
请问这是哪里出了问题呢@_@?
还是说这是转码的问题?
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.138.138.213
1F：推 hamsters:编码的问题，因为 OpenText 方法会使用 UTF-8 编码 05/20 12:27
2F：→ hamsters:可以自行建立 StreamReader 并指定编码方式为 05/20 12:29
3F：→ hamsters:Encoding.Default 05/20 12:29
4F：→ chienyu:我发现另一个方法也可以..就是利用StreamWriter建立txt档 05/20 14:47
5F：→ chienyu:这时候就可以在以StreamWriter建立起的txt档里输入内容了 05/20 14:48
6F：→ chienyu:然後其它想要读取中文的都可以直接copy此txt档过去用 05/20 14:49
7F：→ chienyu:不过还是请教一下，自行自订编码要怎麽写阿@_@? 05/20 14:52
8F：推 fumizuki:不是自订编码吧@@ 是改用System.IO.StreamReader类别 05/23 06:29
9F：→ fumizuki:New System.IO.StreamReader(档案路径, 编码) 05/23 06:31
10F：→ fumizuki:编码=System.Text.Encoding.Default 05/23 06:31