'Nel CreateXML


  Dim AliquotaIVA As XmlNode
  AliquotaIVA = DettaglioLinee.AppendChild(xml.CreateElement("AliquotaIVA"))
  AliquotaIVA.AppendChild(xml.CreateTextNode(Replace(Format(Double.Parse(self.Linea( counter,5).ToText),"0.00"),",",".")))

  Dim Natura As XmlNode
  Natura = DettaglioLinee.AppendChild(xml.CreateElement("Natura"))
  Natura.AppendChild(xml.CreateTextNode(NaturaIVA.Text))  'NaturaIVA inserirlo come parametro della funzione

Next