读取文本文件并在到达文件末尾时提示答案

【问题标题】：Read text file and prompt when end of file is reached读取文本文件并在到达文件末尾时提示
【发布时间】：2014-03-08 21:21:52
【问题描述】：

Private Sub btnnext_Click(sender As Object, e As EventArgs) Handles btnnext.Click    
   lblfirst.Text = objstreamreader.ReadLine
   lblMiddle.Text = objstreamreader.ReadLine
   lbllast.Text = objstreamreader.ReadLine
   lblempnum.Text = objstreamreader.ReadLine
   lbldept.Text = objstreamreader.ReadLine
   lbltele.Text = objstreamreader.ReadLine
   lblext.Text = objstreamreader.ReadLine
   lblemail.Text = objstreamreader.ReadLine
   lblsal.Text = objstreamreader.ReadLine
   Label10.Text = objstreamreader.ReadLine
   If (objstreamreader.ReadLine) = -1 Then
      'no department has been selected
      MessageBox.Show("There are no more records on file")
   End If
End Sub

【问题讨论】：

你有什么问题？
我似乎无法让 msgbox 提示用户已到达记录末尾** @enderlaned
我正在使用 Visual Studios 2012

标签： vb.net messagebox readline

【解决方案1】：

不是MessageBox.Show("There are no more records on file")，而是MsgBox("There are no more records on file")？

【讨论】：