أرجو المساعدة في قراءة أسطر معينة من text file

''' <summary>
''' Method to read a specified line in a text file
''' </summary>
''' <param name="file">File to read from</param>
''' <param name="line">Line number to read</param>
''' <returns></returns>
Public Shared Function ReadSpecifiedLine(file As String, lineNum As Integer) As String
	'create a variable to hold the contents of the file
	Dim contents As String = String.Empty
	'always use a try...catch to deal
	'with any exceptions that may occur
	Try
		Using stream As New StreamReader(file)
			contents = stream.ReadToEnd().Replace(vbCr & vbLf, vbLf).Replace(vbLf & vbCr, vbLf)
			Dim linesArray As String() = contents.Split(New Char() {ControlChars.Lf})

			'Make sure we have ana ctual array
			If linesArray.Length > 1 Then
				'Make sure user didnt provide number greater than the number
				'of lines in the array, and not less than 0 (zero) Thanks AdamSpeight2008
				If Not lineNum > linesArray.Length AndAlso Not lineNum < 0 Then
					Return linesArray(lineNum)
				Else
				'Failed our check so return the first line in the array
					Return linesArray(0)
				End If
			Else
				'No array so return the line
				Return contents
			End If	
		End Using
	Catch ex As Exception
		Return ex.ToString()
	End Try
End Function

الأخ محمد سامر، هذا الكود يقرأ الملف كاملاً ولكن أنا أريد أن أقرأ سطر واحد فقط! ولكن لك الشكر على كل حال أن قمت بالرد.

مشكلتي في عدم قراءة كامل الملف هي أن الملف حجمه كبير جداً بالإضافة الى أنه تتم قراءته من أكثر من مستخدم في نفس الوقت باستخدام Threading

أرجو أن تكون هناك دالة أو أي حل لقراءة سطر واحد بدون تحميل كامل الملف للذاكرة

في إنتظار حل...

.