مشكله في القراءه من ملف نصي

ممكن توضح يعنى إيه يتوقف؟؟؟؟؟؟

يعنى بيطلع خطأ و يتوقف

وللا مفيش أخطاء بس مفيش نتيجة بتطلع

وللا بيهنج و يقف من غير لا خطأ وللا حاجة؟؟؟؟؟؟؟؟

عند التعامل مع الملفات النصية خاصة يستحسن أن تقوم بقراءة الملف كله (أو جزء كبير منه إذا كان الملف ضخماً) في string ثم التعامل معه من داخل الstring و هكذا يكون البرنامج أسرع بكثير

و الآن نحاول سوياً

Dim hfs As IO.FileStream
       Dim hfsr As IO.StreamReader
       hfs = New FileStream(Application.StartupPath & "/filename", FileMode.Open)
       hfsr = New StreamReader(hfs)
Dim fileData as String = hfsr.ReadToEnd()
int foundIndex = fileData.IndexOf(textBox1.Text)
if foundIndex > 0 Then MessageBox.Show("Found"); End IF

تمام يا محمد لكن بعد أن وجدت الجزء من النص الذي أبحث عنه أريد أن أتعامل معه سواء بالحذف أو الاستبدال ؟؟؟

وبالنسبه للجزء ده :

Dim filetxt As String, foundindex As Integer
filetxt = hfsr.ReadToEnd
foundindex = filetxt.IndexOf(TextBox1.Text)
If foundindex > 0 Then
MsgBox("found")
End If

فهو يعمل تماما ولكن عايز أفهم كيف يعمل :أنا استنتجت أنه يقوم باعطاء Index لكل حرف في النص ولكن كيف يبحث عن النص مقارنة بما في الـ textbox ???

أنا مش عارف انت متضايق ليه :lol: فالIndoxOf بحثت لك عن النص في الstring و أعطت لك الحرف الذي بدأت عنده الكلمة التي تبحث عنها

و إذا كنت تريد عمل أستبدال أو حذف

يمكنك استخدام Replace مكان IndexOf و اعطاءها كل من الكلمة التي تريد استبدالها و بماذا ستستبدلها.. و عند الحذف استبدلها بالString.Empty ثم أعد كتابة الملف

أنا مش متضايق ولا حاجه بس كنت عايز أفهم والحمد لله فهمت وشكرا لمتابعتك يا بشمهندس ,,,