用readalltext怎么在文本框中，中文显示的是乱码

[alpheryq]

我是个初学者，下面是代码（按照书上的来做的）。。。
但当我打开TEXT文本后，中文显示全是"口"，英文与数字能正常显示。。难道是VS2008英文版的缘故吗？？


Public Class dialogs
Private strfilename As String

Private Sub btnopen_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnopen.Click
With OpenFileDialog1
.Filter = "Text files(*.txt)|*.txt|All files(*.*)|*.*"
.FilterIndex = 1
.Title = "DEMO"
End With
If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim fileContents As String
strfilename = OpenFileDialog1.FileName
fileContents = My.Computer.FileSystem.ReadAllText(strfilename)
txtfile.Text = fileContents
End If

End Sub
End Class

[alpheryq]

自己不能修改帖子的吗？？？
跟帖另外说。。
现在发现应是编码的问题，因为文本框中的内容用WriteAllText写入的话，中文可以正常显示的。。

[alpheryq]

哎，刚刚发现编码问题的时候，开窍了，终于在网上找到解决方法了。。
fileContents = My.Computer.FileSystem.ReadAllText(strfilename,System.Text.Encoding.Default)
只要加入默认编码就可以了。。
还是要自己多做才成。。。

[qiance]

学习

[jiali3000]

不错，受用~~~