紧急！！！为什么在窗口load的时候读一个空文本文件会报‘输入超出文件尾’呢

Question

下面这段代码是在form_load()时运行的，text2.txt是空文本，就弹出了‘输入超出文件尾’的错误提示。
               Open "text2.txt" For Input As #1
               Dim buff1 As String
               Line Input #1, buff1
               Text2.Text = buff1
               Close #1
请问怎么解决，谢谢

Answer 1

Private Sub Form_Load()
On Error Resume Next
  Open "text2.txt" For Input As #1
               Dim buff1 As String
               Line Input #1, buff1
               Text2.Text = buff1
               Close #1
End Sub

Answer 2

多谢，原来On Error Resume Next这东西真管用呢