|
|
|
|
|
Dicas
|
|
Visual Basic.Net (Miscelâneas)
|
|
|
Título da Dica: Lendo um arquivo XML
|
|
|
|
Postada em 9/10/2003 por ~Ð@®£@Ñ
Neste exemplo, demonstramos como podemos carregar uma arquivo XML e ler suas informações utilizando a classe System.Xml.XmlDocument.
Module Module1 Sub Main() Dim xDoc As New XmlDocument xDoc.Load("teste.xml") Output(xDoc.DocumentElement) End Sub Sub Output(ByVal node As XmlNode) Console.WriteLine(node.Name) If (node.HasChildNodes) Then Dim nList As XmlNodeList = node.ChildNodes Dim i As Int32 For i = 0 To nList.Count - 1 Console.WriteLine(" {0}", nList(i).Name) If (nList(i).HasChildNodes) Then Dim xn As XmlNode For Each xn In nList(i).ChildNodes Console.WriteLine(" {0}: {1}", xn.Name, xn.InnerText) Next End If Next End If End Sub End Module
|
|
|
|
|