主题：饼图 不显示合计的问题

请教老师 统计表中有合计行，下面代码生成的饼图，不要显示合计行的图形比例，应该怎样改

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

这个意思？

For Each r1 As Row In t1.Rows

    If r1("某列") <> "合计" Then
    Series1 = Chart1.SeriesList.Add() '增加一个图系
    Series1.Length = 1 '一个系列只能包括一个值
    Series1.Text = r1("电压等级") & "(" & r1("投标设计任务量") & ")" '设置图系的标题
    Series1.Y(0) = r1("投标设计任务量") '指定值
    Series1.DataLabelText = Math.Round(r1("投标设计任务量")*100/sm1,2) & "%" '计算百分比

    End If
Next