请教老师 统计表中有合计行,下面代码生成的饼图,不要显示合计行的图形比例,应该怎样改
Dim Chart1 As New ChartBuilder '定义一个图表变量
Dim Series1 As WinForm.ChartSeries '定义一个图系变量
Dim t1 As Table = Tables("员工信息_Table1") '定义一个变量t引用数据表
Dim sm1 As Integer = t1.Compute("Sum(投标设计任务量)") '计算总数量
Dim dr22 As Row = t1.Rows(t1.Rows.Count(True) - 1,True)
Chart1.VisualEffect = True '加上这一行,让你的图表更漂亮
Chart1.ChartType = ChartTypeEnum.Pie '图表1类型改为Bar(条形)
Chart1.SeriesList.Clear() '清除图表原来的图系
For Each r1 As Row In t1.Rows
Series1 = Chart1.SeriesList.Add() '增加一个图系
Series1.Length = 1 '一个系列只能包括一个值
Series1.Text = r1("电压等级") & "(" & r1("投标设计任务量") & ")" '设置图系的标题
Series1.Y(0) = r1("投标设计任务量") '指定值
Series1.DataLabelText = Math.Round(r1("投标设计任务量")*100/sm1,2) & "%" '计算百分比
Next