在silverlight datagrid中顯示xml數據，vb.net

Question

我想在silverlight數據網格中顯示xml文件數據。即時通訊使用下面的代碼，但它does not工作。請幫助。

我的vb.net代碼：

進口系統 進口System.Collections.Generic 進口System.Linq的 進口System.Windows 進口System.Windows.Controls 進口System.Xml.Linq的

命名空間SilverlightApplication1 公共部分分類頁面 Inherits UserControl Public Sub New（） InitializeComponent（） End Sub

Private Sub Page_Loaded(ByVal sender As Object, ByVal e As RoutedEventArgs) 
     DataGrid1.ItemsSource = GetReport() 
    End Sub 

    Public Function GetStatusReport() As List(Of Table) 
     Dim statusReport As New List(Of Table)() 

     Dim doc As XElement = XElement.Load("Data/Report.xml") 

     report = (From row In doc.Elements() _ 
      Select GetStatus(row)).ToList() 

     Return statusReport 
    End Function 

    Private Function GetReport(ByVal row As XElement) As Table 
     Dim s As New Table() 
     s.JobID= row.Attribute("ID").Value 
     s.VenueName= row.Attribute("Name").Value) 
     Return s 
    End Function 
End Class 

末命名空間

Answer 1

我所以這段代碼...這可能是爲什麼它不工作混爲一談。

首先，當您設置ItemsSource時，可以調用不帶參數的GetReport（）。 GetStatusReport（）從不被調用，即使它執行了XML提升。在GetStatusReport的內部，你返回statusReport，它是一個空的列表......並且你從來沒有對報告做過任何事情，這是實際的查詢。在查詢內部，你調用GetStatus，雖然我相信它應該是GetReport，但它沒有被定義。

Arghhh ......與所有的，我猜想，你要重新編寫所有的代碼是這樣的：

Private Sub Page_Loaded(ByVal sender As Object, ByVal e As RoutedEventArgs) 
     DataGrid1.ItemsSource = GetStatusReport() 
    End Sub 

    Public Function GetStatusReport() As List(Of Table) 
     Dim statusReport As New List(Of Table)() 

     Dim doc As XElement = XElement.Load("Data/Report.xml") 

     statusReport = (From row In doc.Elements() _ 
      Select GetReport(row)).ToList() 

     Return statusReport 
    End Function 

    Private Function GetReport(ByVal row As XElement) As Table 
     Dim s As New Table() 
     s.JobID= row.Attribute("ID").Value 
     s.VenueName= row.Attribute("Name").Value) 
     Return s 
    End Function 
End Class 

除了這些補丁，如果我不能告訴你是否正確...它失敗的地方在哪裏？