Introducción a los literales XML en Visual Basic
Actualización: November 2007
En esta sección encontrará información acerca de cómo crear árboles XML en Visual Basic.
Para obtener información acerca de cómo utilizar los resultados de las consultas LINQ como contenido para un árbol XML, vea Construcción funcional (LINQ to XML).
Para obtener más información acerca de los literales XML en Visual Basic, vea Información general sobre LINQ to XML en Visual Basic.
Crear árboles XML
El siguiente ejemplo muestra cómo crear un XElement, en este caso, contacts:
Dim contacts As XElement = _
<Contacts>
<Contact>
<Name>Patrick Hines</Name>
<Phone>206-555-0144</Phone>
<Address>
<Street1>123 Main St</Street1>
<City>Mercer Island</City>
<State>WA</State>
<Postal>68042</Postal>
</Address>
</Contact>
</Contacts>
Crear un XElement con contenido simple
Puede crear un XElement que incluya un contenido simple, tal y como se detalla a continuación:
Dim n as XElement = <Customer>Adventure Works</Customer>
Console.WriteLine(n)
Este ejemplo genera el siguiente resultado:
<Customer>Adventure Works</Customer>
Crear un elemento vacío
Puede crear un XElement vacío, tal y como se indica a continuación:
Dim n As XElement = <Customer/>
Console.WriteLine(n)
Este ejemplo genera el siguiente resultado:
<Customer />
Utilizar expresiones incrustadas
Una característica importante de los literales XML es que admiten el uso de expresiones incrustadas. Las expresiones incrustadas le permiten evaluar una expresión e incorporar los resultados de la expresión a un árbol XML. Si el resultado de evaluar la expresión es de tipo XElement, se agregará un elemento al árbol. Si el resultado de evaluar la expresión es de tipo XAttribute, se agregará un atributo al árbol. Puede agregar elementos y atributos al árbol sólo en aquellos lugares donde sea válido.
Es importante reseñar que en una expresión incrustada sólo puede aparecer una expresión única. No es posible incrustar varias instrucciones. Si una expresión se extiende más allá de una única línea, deberá utilizar el carácter de continuación de línea.
Si utiliza una expresión incrustada para agregar nodos (incluyendo elementos) y atributos ya existentes a nuevo árbol XML y los nodos existentes ya tienen elementos primarios, los nodos se clonarán. Esos nodos clonados nuevos se agregan al nuevo árbol XML. Si los nodos ya existentes no tienen elementos primarios, los nodos simplemente se agregan al nuevo árbol XML. El último ejemplo de este tema muestra este comportamiento.
El siguiente ejemplo utiliza una expresión incrustada para agregar un elemento al árbol:
Dim xmlTree1 As XElement = _
<Root>
<Child>Contents</Child>
</Root>
Dim xmlTree2 As XElement = _
<Root>
<%= xmlTree1.<Child> %>
</Root>
Console.WriteLine(xmlTree2)
Este ejemplo genera el siguiente resultado:
<Root>
<Child>Contents</Child>
</Root>
Utilizar expresiones incrustadas para el contenido
Puede utilizar una expresión incrustada para proporcionar el contenido de un elemento:
Dim str As String
str = "Some content"
Dim root As XElement = <Root><%= str %></Root>
Console.WriteLine(root)
Este ejemplo genera el siguiente resultado:
<Root>Some content</Root>
Usar una consulta de LINQ en una expresión incrustada
Puede utilizar los resultados proporcionados por una consulta LINQ para el contenido de un elemento:
Dim arr As Integer() = {1, 2, 3}
Dim n As XElement = _
<Root>
<%= From i In arr Select <Child><%= i %></Child> %>
</Root>
Console.WriteLine(n)
Este ejemplo genera el siguiente resultado:
<Root>
<Child>1</Child>
<Child>2</Child>
<Child>3</Child>
</Root>
Utilizar expresiones incrustadas para los nombres de los nodos
También puede utilizar expresiones incrustadas para calcular nombres de atributos, valores de atributos, nombres de elementos y valores de elementos:
Dim eleName As String = "ele"
Dim attName As String = "att"
Dim attValue As String = "aValue"
Dim eleValue As String = "eValue"
Dim n As XElement = _
<Root <%= attName %>=<%= attValue %>>
<<%= eleName %>>
<%= eleValue %>
</>
</Root>
Console.WriteLine(n)
Este ejemplo genera el siguiente resultado:
<Root att="aValue">
<ele>eValue</ele>
</Root>
Diferencias entre agregar y clonar
Como ya se mencionó anteriormente, si utiliza una expresión incrustada para agregar nodos (incluyendo elementos) y atributos ya existentes a nuevo árbol XML y los nodos existentes ya tienen elementos primarios, los nodos se clonarán y esos nuevos nodos clonados se agregarán al nuevo árbol XML. Si los nodos ya existentes no tienen elementos primarios, simplemente se agregan al nuevo árbol XML.
' Create a tree with a child element.
Dim xmlTree1 As XElement = _
<Root>
<Child1>1</Child1>
</Root>
' Create an element that is not parented.
Dim child2 As XElement = <Child2>2</Child2>
' Create a tree and add Child1 and Child2 to it.
Dim xmlTree2 As XElement = _
<Root>
<%= xmlTree1.<Child1>(0) %>
<%= child2 %>
</Root>
' Compare Child1 identity.
Console.WriteLine("Child1 was {0}", _
IIf(xmlTree1.Element("Child1") Is xmlTree2.Element("Child1"), _
"attached", "cloned"))
' Compare Child2 identity.
Console.WriteLine("Child2 was {0}", _
IIf(child2 Is xmlTree2.Element("Child2"), _
"attached", "cloned"))
Este ejemplo genera el siguiente resultado:
Child1 was cloned
Child2 was attached