Leer una linea completa de un archivo de texto

[german_martin]

Sip el SUB etc etc esta.
Lo que tuve que hacer fue dejar el Return solo quedando algo asi.

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim stringReader As String
Dim fileReader As System.IO.StreamReader
fileReader = My.Computer.FileSystem.OpenTextFileReader("C:\Util es\prueba.txt")
stringReader = fileReader.ReadLine()
While stringReader <> Nothing
If stringReader.Contains("ERROR") Then
Return
End If
stringReader = fileReader.ReadLine()
Label1.Text = ("aca hay error " & stringReader)
End While


fileReader.Close()

End Sub



MUCHAS GRACIAS!!!
Saludos a Mexico desde Argentina y sus paros agropecuarios alpedisimos.