运用StreamReader从一个标准的文本文件读行信息。

        '运用StreamReader从一个标准的文本文件读行信息。

        Dim srReadLine As New System.IO.StreamReader("D:\1.txt", System.Text.Encoding.GetEncoding("GB2312"))

        srReadLine.BaseStream.Seek(0, System.IO.SeekOrigin.Begin)

        While srReadLine.Peek() > -1

            TextBox1.Text += srReadLine.ReadLine() & vbCrLf

        End While

本文地址：http://com.8s8s.com/it/it43910.htm