@Imports System.Data
@Code
Dim dataSet = new DataSet()
dataSet.ReadXmlSchema(Server.MapPath("data.xsd"))
dataSet.ReadXml(Server.MapPath("data.xml"))
Dim dataView = new DataView(dataSet.Tables(0))
Dim myChart = new Chart(600,400) ' 建立一個 600x400 畫素的圖表
myChart.AddTitle("每位員工的銷售額")
myChart.AddSeries("Default","Pie",,,,,dataView,"Name",dataView,"Sales")
myChart.Write() ' 將圖表輸出
End Code