如何实现指定指取文本的某一行

Dim path As String = Application.StartupPath & "\config.txt"
Dim sr As = New (path)
Dim sLine As String = sr.ReadLine()
Dim sFiledata As String=""
While (Not sLine Is Nothing)
    sFiledata = sLine
    sLine = sr.ReadLine()
End While