Leer linea de un fichero [vb.net]

[moradazo]

Hola. Para tomar una linea de un archivo y colocarla en un label, se hace lo siguiente:

Código PHP:

       Dim objReader As New System.IO.StreamReader("direccion del archivo") 
                Dim sLinea As String = "" 
                Dim TextLine As String = "" 
                Do While objReader.Peek() <> -1 
                    sLinea = objReader.ReadLine() 
                    If sLinea.Contains("Escribe una palabra clave del texto") Then 
                        label1.text = sLinea 
                        End 
                    End If 
                Loop 
                objReader.Close()  
   

Saludos