怎么数据显示成多折线图，高手指点！！！

[qiujb]

我想做多折线图,不知那位高手有这方面的例子,或者指点我一下
我的数据:
产品名称 月份 销售数量
x1 4 2000
x2 5 3000
x1 5 6000
x3 5 7000
x3 4 1500
x2 4 2500
x1 6 3200
x2 6 4300
x3 6 5500

要求：不同产品显示的折线要不同颜色来区分，在折线加备注该折线属于那个产品。 或者加颜色条说明！
那位高手有这方面的例子麻烦发下E-mail或帮忙指点一下，我试了好多都没能成功！
我的E-mail:[e-mail]

[sunshine_anycall]

画这个图，你打算用什么呢？
reportingservice，水晶报表，第三方控件？
这些应该都可以实现的，你只要提供数据源

[guying999]

可以使用使用ZedGraph画，开源的并且扩展性很好

[qiujb]

我用水晶报表 来做已经可以实现一个产品的折线图,现在客户需要有两个以上的产品折线图,可以做个销售对比,请高手能说一下水晶报表怎么做??

[qiujb]

高手都不进来帮忙一下吗？这个好急的！！！！！！！

[哥本哈士奇]

我推荐你用visifire了,silverlight下的一个图表控件,可以实现你说的功能.
它现在支持托管代码创建了,一个chart可以有若干的series,所以完全可以实现你的功能.
它的官方网站是http://www.visifire.com

如果楼主对silverlight感兴趣的话,可以尝试一下.
.net3.5下有图表组件,不过我不确定是否会实现你的功能.

[qiujb]

目前我项目都用了水晶报表，不想改其它组件，感谢楼上！！

[wmy2370_cn]

你可以试试OWC，它可以非常完美的解决。
你有3个产品，也就是3个系列，OWC会自动为每个系列生成不同的颜色
3个月份，也就是3个分类了，值与之对应

图片代码已发给你，希望能帮到你。

Dim meChart As Owc11.ChChart = Me.AxChartSpace.Charts.Add(0)
meChart.HasLegend = True
meChart.HasTitle = True
meChart.Title.Caption = "月份效益图"

meChart.Axes(0).HasTitle = True
meChart.Axes(0).Title.Caption = "月份"
meChart.Axes(1).HasTitle = True
meChart.Axes(1).Title.Caption = "效益"

meChart.Type = Owc11.ChartChartTypeEnum.chChartTypeLineMarkers
meChart.SetData(Owc11.ChartDimensionsEnum.chDimSeriesNames, Owc11.ChartSpecialDataSourcesEnum.chDataLiteral, "x1,x2,x3")
meChart.SetData(Owc11.ChartDimensionsEnum.chDimCategories, Owc11.ChartSpecialDataSourcesEnum.chDataLiteral, "4,5,6")

meChart.SeriesCollection(0).SetData(Owc11.ChartDimensionsEnum.chDimSeriesNames, Owc11.ChartSpecialDataSourcesEnum.chDataLiteral, "x1")
meChart.SeriesCollection(0).SetData(Owc11.ChartDimensionsEnum.chDimValues, Owc11.ChartSpecialDataSourcesEnum.chDataLiteral, "2000,6000,3200")
meChart.SeriesCollection(0).DataLabelsCollection.Add()
meChart.SeriesCollection(0).DataLabelsCollection(0).HasValue = True

meChart.SeriesCollection(1).SetData(Owc11.ChartDimensionsEnum.chDimSeriesNames, Owc11.ChartSpecialDataSourcesEnum.chDataLiteral, "x2")
meChart.SeriesCollection(1).SetData(Owc11.ChartDimensionsEnum.chDimValues, Owc11.ChartSpecialDataSourcesEnum.chDataLiteral, "2500,3000,4300")
meChart.SeriesCollection(1).DataLabelsCollection.Add()
meChart.SeriesCollection(1).DataLabelsCollection(0).HasValue = True

meChart.SeriesCollection(2).SetData(Owc11.ChartDimensionsEnum.chDimSeriesNames, Owc11.ChartSpecialDataSourcesEnum.chDataLiteral, "x3")
meChart.SeriesCollection(2).SetData(Owc11.ChartDimensionsEnum.chDimValues, Owc11.ChartSpecialDataSourcesEnum.chDataLiteral, "1500,7000,5500")
meChart.SeriesCollection(2).DataLabelsCollection.Add()
meChart.SeriesCollection(2).DataLabelsCollection(0).HasValue = True

[boyle0630]

水晶报表安装目录下有例子去找找吧,网上也有

[qiujb]

楼上能给个地址吗?不胜感激

[qiujb]

楼上的真不知道怎么用，而且要改别的组件又要学一下花费的时间太长。这个太急了 请水晶高手帮忙一下

[rainbus]

我也正在找.如何把产品A销售折线设为红色，产品Ｂ的折线设为绿色，而不要随机产生．就是能指定折线的颜色．