Visual Studio のプロジェクトファイルから参照しているアイテムを取得する

こんな感じかな?


Public Function GetLinkItems(ByVal projectFilePath As String) As Dictionary(Of String, String)

Dim xml = XElement.Load(projectFilePath)
Dim query = From element In xml...<ItemGroup>.<Content> _
Where element.<Link> IsNot Nothing _
Order By element.@Include


Dim linkItems As New Dictionary(Of String, String)
For Each item In query
linkItems.Add(item.@Include, item.<Link>.Value)
Next

Return linkItems
End Function