求教：如何将MDX表达式的结果用图表或表格表示出来？

Dim amdCat As New ADOMD.Catalog
Dim amdCset As New ADOMD.CellSet
' 指定连接及查询字串
amdCat.ActiveConnection = "Provider=msolap;" + "Data Source=local;Initial Catalog=FoodMart 2000;"
amdCset.Source = "SELECT Gender.members on columns, Measures.members on rows FROM sales"' 连接到OLAP服务器及执行MDX查询语句
Set amdCset.ActiveConnection = amdCat.ActiveConnection
amdCset.Open请教如何用Office web component组件中的PivotTable 或ChartSpace 控件将结果表现出来？  急用！谢谢！