VB2005 關於檔案讀取

看板Visual_Basic作者 (充實自己)時間17年前 (2008/05/20 11:32), 編輯推噓2(208)
留言10則, 3人參與, 最新討論串1/2 (看更多)
請問一下 在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

05/20 12:27, , 1F
編碼的問題,因為 OpenText 方法會使用 UTF-8 編碼
05/20 12:27, 1F

05/20 12:29, , 2F
可以自行建立 StreamReader 並指定編碼方式為
05/20 12:29, 2F

05/20 12:29, , 3F
Encoding.Default
05/20 12:29, 3F

05/20 14:47, , 4F
我發現另一個方法也可以..就是利用StreamWriter建立txt檔
05/20 14:47, 4F

05/20 14:48, , 5F
這時候就可以在以StreamWriter建立起的txt檔裡輸入內容了
05/20 14:48, 5F

05/20 14:49, , 6F
然後其它想要讀取中文的都可以直接copy此txt檔過去用
05/20 14:49, 6F

05/20 14:52, , 7F
不過還是請教一下,自行自訂編碼要怎麼寫阿@_@?
05/20 14:52, 7F

05/23 06:29, , 8F
不是自訂編碼吧@@ 是改用System.IO.StreamReader類別
05/23 06:29, 8F

05/23 06:31, , 9F
New System.IO.StreamReader(檔案路徑, 編碼)
05/23 06:31, 9F

05/23 06:31, , 10F
編碼=System.Text.Encoding.Default
05/23 06:31, 10F
文章代碼(AID): #18CaOzMZ (Visual_Basic)
文章代碼(AID): #18CaOzMZ (Visual_Basic)