.NET 4.x Парсинг xml документа - Visual Basic .NET

Формулировка задачи:

Доброе время суток. Помогите пожалуйста, получить данные из xml документа

                    Листинг программы
                
<?xml version="1.0" encoding="windows-1251" standalone="yes"?>
<comp><PassportData>
<Record field_4="TEST 12.04.01.002" field_5="Обойма" field_7="Со специальной таблицы" field_10="4" field_25="Ст3сп2-2ГП ГОСТ 535-2005&amp;" field_57="Ст3сп5-св" field_58="ГОСТ 14637-89" field_105="1" field_108="0004" field_114="1.31"><secondary><Record field_6="1" field_100="TEST 12.00.00.000" field_101="1" field_104="1" field_113="1" field_125="40"/></secondary></Record>
</RecordsData></comp>

Хочется получить в итоге данные: field_100 field_57 field_58

Решение задачи: «.NET 4.x Парсинг xml документа»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
    Dim xmlDoc As XDocument = XDocument.Load("tst02.xml")
    Dim query = From ele In xmlDoc.<comp>...<Record> _
        Select f4 = ele.@field_4, f57 = ele.@field_57, f58 = ele.@field_58, f100 = ele.@field_100
    ListBox1.Items.Clear()
    Dim ss As String = ""
    For Each qq In query
        If qq.f4 = "TEST 12.01.00.001" Then
            ss = "Наименование: TEST 12.01.00.001  Марка: " & qq.f57 & "  ГОСТ: " & qq.f58
            ListBox1.Items.Add(ss)
        End If
        If qq.f100 IsNot Nothing Then ListBox1.Items.Add(qq.f100)
    Next
End Sub