[Aly El-Haddad]

كود :

Dim txt As String = System.IO.File.ReadAllText("مسار الملف النصي")
        Dim line As String() = txt.Split(vbCrLf)
        txt = txt.Replace(line(0), line(1))
        System.IO.File.WriteAllText("مسار الملف النصي", txt)