[求助]流输出问题！！！急 - VB.NET论坛

问题点数：0 回复次数：1

[求助]流输出问题！！！急

读取文件内容的时候可以读取英文和数字，但读取中文的时候出现乱码。请问应该怎么办？小弟先谢啦！代码如下：

Private Sub Read_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Read.Click Dim FS As FileStream Dim str As String Dim cl As String = Chr(13) & Chr(10) FS = New FileStream("cql.txt", FileMode.OpenOrCreate, FileAccess.Read) Dim tr As New StreamReader（FS） tr.BaseStream.Seek(0, SeekOrigin.Begin) While tr.Peek() > -1 str &= tr.ReadLine & cl End While tr.Close() TextBox1.Text = str End Sub

/pa?p=1:123440016:10" border="0" onload="if(this.width>screen.width*0.7) {this.resized=true; this.width=screen.width*0.7; this.alt='Click here to open new window\nCTRL+Mouse wheel to zoom in/out';}" onmouseover="if(this.width>screen.width*0.7) {this.resized=true; this.width=screen.width*0.7; this.style.cursor='hand'; this.alt='Click here to open new window\nCTRL+Mouse wheel to zoom in/out';}" onclick="if(!this.resized) {return true;} else {window.open('http://wpa./pa?p=1:123440016:10');}" onmousewheel="return imgzoom(this);" alt="" />/msgrd?V=1&Uin=123440016&Site=im.&Menu=yes" target="_blank">点击这里给我发消息