编程中国 | 业界新闻 | 技术文章 | 视频教程 | 下载频道 | 程序源码 | 个人空间 | 编程论坛  
全能 ASP / PHP / ASP.NET 主机,支持月付专业 MSSQL 数据库空间,支持月付专业 MySQL 数据库空间,支持月付学习型 ASP/PHP/ASP.NET 主机 30元/年
发新话题
打印

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

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

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

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

TOP

看你的默认编码是不是更改了
说你哪,看了我那么多帖子都不回,好意思吗?! 觉得需要我帮助,请Q:496227096

TOP

发新话题