[ana ali]

(07-12-15, 01:23 AM)hamada558 كتب : جرب هاد وخبرنا بالنتيجة

كود :

       Dim txt() As String = IO.File.ReadAllLines("C:\a.txt")
       For Each s In txt
           If s.Contains("=") Then RichTextBox1.Text = RichTextBox1.Text.Replace(s.Split("=")(0), s.Split("=")(1))
       Next

جزاك الله خير نجح الكود