[Eng Ma7moud 3ly]

السلام عليكم ورحمة الله وبركاته ..
يا جماعه لو سمحتم .
عاوز اعرف الكود اللى يخليك تقرى سطر معين من ملف نصى مثلا السطر التانى فقط او التالت
وهل ده ليه داله معينه ولا ينفع بطريقة streamreader او my.computer
ياريت تفيددوا اخوكم

[vbnet]

كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Try
        Dim s As String = IO.File.ReadAllLines("xx.txt")(2) ' الأسطر تبدأ من الرقم صفر وهنا قرأنا السطر الثالث
        MsgBox(s)
    Catch ex As Exception
    End Try
End Sub

[Eng Ma7moud 3ly]

شكراً يا غالى جزاك الله خير

[سعود]

حبيت اشارك بالموضوع باستخدام الـregular expression
لنفترض ان النص المطلوب هو بالتنسيق التالي

كود :

<[ip=77.55.11]>

مخزن بمربع نص الكود سيكون كالتالي

كود :

Dim ma As Match = Regex.Match(TextBox2.Text, "(<\[ip=)(.*)(\]>)")
        Dim ip As String = ma.Groups(2).Value
        MsgBox(ip)
        Dim all As String = ma.Value
        TextBox2.Text = TextBox2.Text.Replace(all, String.Empty)

[Genius Live]

يمكنك ايضا استخدام الطريقة التالية :

كود :

Dim txt As String = IO.File.ReadAllText(مسار الملف)
Dim lin() As String = txt.Split(vbNewLine)
TextBox1.text = lin(رقم السطر).ToString