看板 Visual_Basic 關於我們 聯絡資訊
大部分的書都是寫FileOpen(),然後用一個Loop去逐行讀出資料 可是總覺得這樣寫有一點冗長 因為我是要在每個comboBox的選項各讀一個.txt 我有另外看到一個寫法,就是先宣告 Dim txt1 As StreamReader = File.OpenText("txt\2.txt") 然後執行的時候打 TextBox1.Text = txt1.ReadToEnd 這樣是可以讀出完整的文字,但只能讀英文, 中文不知道為什麼完全不能顯示 想請問有沒有辦法直接從這個方法修正成能讀中文呢? 還是有什麼比較簡短的寫法呢? -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 59.113.3.164 ※ 編輯: siaujan 來自: 192.83.183.14 (05/22 10:00)
kenimai:Dim txt1 As SteamReader("txt\2.txt") 05/22 19:39
kenimai:While txt1.EndOfFile 05/22 19:39
kenimai:s1 = txt1.ReadLine 05/22 19:40
kenimai:End While 05/22 19:41