Bonjour à tous,
Je cherche à créer un fichier XML pour sauvegarder le contenu des champs de mon appli.
Pour ce faire, j'utilise le code suivant ;
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
Sub Enregistre()
With SaveFileDialog1
            .Title = "Enregistrement fichier essai"
            .Filter = "Fichiers texte (*.txt) | *.txt"
            .ShowDialog()
        End With
        If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            Nomfichier = SaveFileDialog1.FileName
            Dim sw As New StreamWriter(Nomfichier)
            sw.WriteLine("<Evaluation>")
            sw.WriteLine("<Version>3.1</Version>")
            sw.WriteLine("</Evaluation>")
            sw.Close()
        End If
Dim doc As New XmlDocument()
            doc.Load(Nomfichier)
            Dim noeud As XmlNode = doc.DocumentElement
            For Each noeud In noeud.ChildNodes
                If noeud.Name = "EtudeRendement" Then
                    doc.DocumentElement.RemoveChild(noeud)
                    doc.Save(Nomfichier)
                End If
            Next
 
            Dim Elem_EtudeRendement As XmlElement
            Elem_EtudeRendement = doc.CreateElement("EtudeRendement")
 
            Dim Elem_DateDeb As XmlElement
            Elem_DateDeb = doc.CreateElement("DateDeb")
            Elem_DateDeb.InnerText = TextBox_DateDeb.Text
            Elem_EtudeRendement.AppendChild(Elem_DateDeb)
 
Dim Elem_NbTx As XmlElement
            Elem_NbTx = doc.CreateElement("NbTx")
            Elem_PrixHA.InnerText = Form_Trvx.ContTrvx
            Elem_EtudeRendement.AppendChild(Elem_NbTx)
 
 Dim Elem_Apr As XmlElement
            Elem_Apr = doc.CreateElement("Apr")
            Elem_Apr.InnerText = TextBox_Apport.Text
            Elem_EtudeRendement.AppendChild(Elem_Apr)
 
doc.DocumentElement.AppendChild(Elem_EtudeRendement)
            doc.Save(Nomfichier)
 
end sub
Tout se passe comme je le veux, sauf pour la création du noeud "NbTx".
En effet, voici le fichier XML qui est généré :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
<Evaluation>
  <Version>3.1</Version>
  <EtudeRendement>
    <DateDeb>01/12/2016</DateDeb>
     <NbTx />
    <Apr>0</Apr>
</EtudeRendement>
</Evaluation>
J'ai beau chercher, je ne comprend pas ce qui peut causer une telle erreur.

Quelqu'un aurait une idée ?
Merci d'avance