主题：这种表格怎么建立图表

此主题相关图片如下：图片1.png

年月作为X轴，报修次数作为Y轴，然后地区列的内容作为图例，现在可以实现地区列的所有内容都建立图例，但是不能把相同的内容筛选出来建立图例，比如所滨湖有四行，但是只想建立一个图例，是否可以？

用value方法试了一下，可是还是不成功。

这是具体的表格和生成的图表，比如说生成的图表里面滨湖就有好多个图例，我只需要一个共同的图例改怎么做？

这是代码，该增加什么东西？

 Dim Chart As WinForm.Chart '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Dim t As Table = Tables("各地区报修次数统计(按月生成)") '定义一个变量t引用数据表
Chart = e.Form.Controls("Chart2") ' 引用窗口中的图表
Chart.ChartType = ChartTypeEnum.Bar '图表类型改为Bar(条形)
Chart.VisualEffect = False
Chart.SeriesList.Clear() '清除图表原来的图系
For r As Integer = 0 To t.Rows.count -1
    Series = Chart.SeriesList.Add() '增加一个图系
    Series.Text = t.rows(r)("地区") '设置图系的标题
    Series.Length = t.Rows.Count - 11
        series.x(r)=t.Rows(r)("年")
        series.y(r)=t.Rows(r)("报修次数")
    Chart.AxisX.setvaluelabel(r,t.Rows(r)("年"))
    Chart.AxisY.setValueLabel(r,t.Rows(r)("报修次数"))
Next
Chart.AxisX.AnnoWithLabels = True '启用字符标示
Chart.LegendVisible = True '显示图列
Chart.LegendCompass= CompassEnum.South '图列显示在南方(底端)

此主题相关图片如下：图片2.png


此主题相关图片如下：图片3.png

0.0

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.rar

上面是实例0.0

好的，谢谢各位啦。

版主您那个实例里面X轴的数据点有些事没有数据的，我想把这些数据点就去掉，就是数据点的个数等于行数，但是我实现之后不知道X轴的数据段的名称怎样命名才能够实现和数据点一一对应。

比如说2016年5，6，7，8月是有数据的，而9，10，11月是没有数据的，所以没有数据的就不要在X轴里面占用位置的，然后那个setvaluelabel有改怎么设置才能把名字和数据对上呢？