Добавить узлы в существующий файл XML

Question

Я хочу добавить строки моего DataGridView в файл XML, который уже существует. У меня есть код, который работает, но создает новый файл каждый раз, когда я его сохраняю.

Dim xmlDocument As XmlDocument = New XmlDocument()
Dim xmlFileName As String = "XMLBackup.xml"
xmlDocument.Load(xmlFileName)
Dim prado As XmlElement = xmlDocument.CreateElement("Prado")

Dim writer As New XmlTextWriter(xmlFileName, Encoding.UTF8)
writer.WriteStartDocument(True)
writer.Formatting = Formatting.Indented
writer.Indentation = 2
writer.WriteStartElement("Prado")

For x As Integer = 0 To DataGridView1.Rows.Count - 2
    createnode(DataGridView1.Rows(x).Cells(0).Value, DataGridView1.Rows(x).Cells(1).Value,
               DataGridView1.Rows(x).Cells(2).Value, DataGridView1.Rows(x).Cells(3).Value,
               DataGridView1.Rows(x).Cells(4).Value, DataGridView1.Rows(x).Cells(5).Value,
               DataGridView1.Rows(x).Cells(6).Value, DataGridView1.Rows(x).Cells(7).Value,
               DataGridView1.Rows(x).Cells(8).Value, DataGridView1.Rows(x).Cells(9).Value,
               DataGridView1.Rows(x).Cells(10).Value, DataGridView1.Rows(x).Cells(11).Value,
               DataGridView1.Rows(x).Cells(12).Value, DataGridView1.Rows(x).Cells(13).Value,
               DataGridView1.Rows(x).Cells(14).Value, DataGridView1.Rows(x).Cells(15).Value,
               DataGridView1.Rows(x).Cells(16).Value, writer)
Next

writer.WriteEndElement()
writer.WriteEndDocument()
writer.Close()