méthode replace ne fonctionne pas

Bonjour,

J'ai fait un projet tout simple indépendant de mon gros projet et ça marche pas:

Code:

---

1 2 3 4 5 6 7

Dim objreader As New StreamReader(CurDir() + "toto.txt") Dim str2 As String = objreader.ReadToEnd() objreader.Close() str2.Replace("old", "ok ! ") objWriter = New StreamWriter(CurDir() + "toto.txt") objWriter.Write(str2) objWriter.Close()

---

ayant déjà écrit avant un fichier toto.txt avec en contenu "old"

Bonjour,

Code:

---

1 2 3 4

Dim r as integer r = Replace(texte, "recherché", "remplaçant") ' ok si <> 0

---

ça ne marche toujours pas:

Code:

---

1 2 3

Dim str As String = Me.TextBox1.Text Replace(str, "vieux", Me.TextBox2.Text) Me.TextBox3.Text = str

---

où récupère t'on le nouveau texte dans str??

Bonsoir,

Il suffit de lire la documentation pour comprendre :

Citation:

---

Retourne une nouvelle chaîne dans laquelle toutes les occurrences d'une chaîne spécifiée dans l'instance actuelle sont remplacées par une autre chaîne spécifiée.

---

Par conséquent :

Code:

---

1 2 3 4

'... Dim newStr2 As String = str2.Replace("old", "ok ! ") '... objWriter.Write(newStr2)

---

Cordialement !

oui, merci.