自学（说不清） 书上抄的一小段，就是有错解决方法

自学（说不清） 书上抄的一小段，就是有错
自学-------看到StreamReader---文件操作了（win7 64位+VB2008）

Public Class Form1
  Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  Dim line As String
  Dim MyFile As New StreamReader("d:\ddd.txt")
  Do While (MyFile.Peek() <> -1)
  line = MyFile.ReadLine()
  textbox1.Text += line + Chr(10) + Chr(13)
  Loop
  End Sub
  MyFile.Close()
End Class

[解决办法]

VB.NET code

 '换下位置 MyFile.Close() End Sub
[解决办法]
在文件开头加上
Imports System.IO
[解决办法]
Imports System.IO

Public Class Form1
   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim line As String
       Dim MyFile As New StreamReader("d:\ddd.txt")
       Do While (MyFile.Peek() <> -1)
           line = MyFile.ReadLine()
           TextBox1.Text += line + Chr(10) + Chr(13)
       Loop
       MyFile.Close()
   End Sub
End Class
在VB2010中运行，显示正常。你的d:\ddd.txt是否有内容？