VB2005 關於檔案讀取

[chienyu (充實自己)]

請問一下

在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
推 hamsters:編碼的問題，因為 OpenText 方法會使用 UTF-8 編碼
→ hamsters:可以自行建立 StreamReader 並指定編碼方式為
→ hamsters:Encoding.Default
→ chienyu:我發現另一個方法也可以..就是利用StreamWriter建立txt檔
→ chienyu:這時候就可以在以StreamWriter建立起的txt檔裡輸入內容了
→ chienyu:然後其它想要讀取中文的都可以直接copy此txt檔過去用
→ chienyu:不過還是請教一下，自行自訂編碼要怎麼寫阿@_@?
推 fumizuki:不是自訂編碼吧@@ 是改用System.IO.StreamReader類別
→ fumizuki:New System.IO.StreamReader(檔案路徑, 編碼)
→ fumizuki:編碼=System.Text.Encoding.Default