[الوادي]

يا أسامة،

تعبني النوع XmlProcessingInstruction

PHP كود :

Using reader As XmlReader = XmlReader.Create("test.xml")

Dim s As New List(Of String)

   While reader.Read()

       If reader.NodeType = XmlNodeType.Element Then
           Dim mName As String = reader("Name")
           Dim mAge As String = reader("Age")
           'Dim mData As String = reader("Data")'

           If mName <> "" Then
               s.Add(mName)
               s.Add(mAge)

           End If

       End If

       If reader.NodeType = XmlNodeType.ProcessingInstruction Then
           If reader.Name = "Data" Then
               Dim valueStart As Integer = reader.Value.IndexOf(Chr(34)) + 1
               Dim valueEnd As Integer = reader.Value.LastIndexOf(Chr(34))
               Dim mData As String = reader.Value.Substring(valueStart, valueEnd - valueStart)
               s.Add(mData)
           End If
       End If

       If reader.NodeType = XmlNodeType.EndElement Then
           If s.Count > 0 Then ListView1.Items.Add(New ListViewItem(s.ToArray))
           s.Clear()
       End If

   End While

End Using