I have a datagridview with 6 columns

I want with this data to create a xml file.

Using this code

Dim doc = New XmlDocument()
Dim element1 = doc.CreateElement(element)
doc.LoadXml("<" & root & " />")
For Each row In source.Rows
For Each cell In row.Cells
element1.AppendChild(doc.CreateElement(cell.OwningColumn.HeaderText))
element1.LastChild.InnerText = cell.FormattedValue
Next
doc.FirstChild.AppendChild(element1)
Next

I take this

<Test1>
<F1>Vagelis1</F1>
<F2>Vagelis2</F2>
<F3>test1</F3>
<F4>test2</F4>
<F5>test3</F5>
<F6>Test4</F6>
<F1>Vagelis11</F1>
<F2>Vagelis12</F2>
<F3>test11</F3>
<F4>test22</F4>
<F5>test33</F5>
<F6>Test44</F6>
<F1>Vagelis111</F1>
<F2>Vagelis112</F2>
<F3>test111</F3>
<F4>test222</F4>
<F5>test333</F5>
<F6>Test444</F6>
<F1>Vagelis1111</F1>
<F2>Vagelis1112</F2>
<F3>test1111</F3>
<F4>test2222</F4>
<F5>test3333</F5>
<F6>Test4444</F6>
</Test1>

What i have to do to take this

Code:
<GrpHdr>
  <MsgId>Vagelis1</MsgId>
  <CreDtTm>Vagelis2</CreDtTm>
  <NbOfTxs>test1</NbOfTxs>
  <CtrlSum>test2</CtrlSum>
  <InitgPty>
    <Id>
      <OrgId>
        <Othr>
          <Id>test3</Id>
          <Issr>Test4</Issr>
        </Othr>
      </OrgId>
    </Id>
  </InitgPty>
  <MsgId>Vagelis11</MsgId>
  <CreDtTm>Vagelis12</CreDtTm>
  <NbOfTxs>test11</NbOfTxs>
  <CtrlSum>test22</CtrlSum>
  <InitgPty>
    <Id>
      <OrgId>
        <Othr>
          <Id>test33</Id>
          <Issr>Test44</Issr>
        </Othr>
      </OrgId>
    </Id>
  </InitgPty>
</GrpHdr>

Thanks and regards.