XML LINQ VB.Net

Module Program
  Sub Main()
    Dim doc As XElement = XElement.Load("Inventory.xml")
    Dim ids = From c In doc. Select c.@carID
    For Each id In ids
      Console.WriteLine(id)
    Next
  End Sub
End Module