XmlElement to XElement + vice versa

XmlElement-vs-XElement.txt

Convert XmlElement to XElement
---
Private Function ConvertToXmlElement(ByVal elem As XElement) _
                                    As XmlElement
   Dim xmldoc As New XmlDocument()
   xmldoc.Load(elem.CreateReader())
   Return xmldoc.DocumentElement
End Function


Convert XElement to XmlElement
---
Private Function ConvertToXElement(ByVal elem As XmlElement) As XElement
    Return XElement.Parse(elem.OuterXml)
 End Function