Class Car
Public PetName As String
Public ID As Integer
End Class
Module Program
Sub Main()
Dim myElement As String = _
"<Car ID='3'>" & _
"<Color>Yellow</Color>" & _
"<Make>Yugo</Make>" & _
"</Car>"
Dim newElement As XElement = XElement.Parse(myElement)
Console.WriteLine(newElement)
Console.WriteLine()
' Load the SimpleInventory.xml file.
Dim myDoc As XDocument = XDocument.Load("SimpleInventory.xml")
Console.WriteLine(myDoc)
End Sub
End Module
|