\'\'图表3
\'生成离退休人数临时表
Dim b2 As New CrossTableBuilder("统计表3",DataTables("person"))
b2.HGroups.AddDef("organName","单位") \'添加客户列用于水平分组
b2.VGroups.AddDef("leaOrRetire") \'添加产品列用于垂直分组
b2.Totals.AddDef("leaOrRetire", AggregateEnum.Count)
b2.Build() \'生成统计表
 
Dim Chart2 As WinForm.Chart \'定义一个图表变量
Dim Series2 As WinForm.ChartSeries \'定义一个图系变量
Dim t2 As Table = Tables("统计表3") \'定义一个变量t引用数据表
Chart2 = e.Form.Controls("Chart3") \' 引用窗口中的图表
Chart2.ChartType = ChartTypeEnum.Bar \'图表类型改为Bar(条形)
Chart2.DataSource = "统计表3" \'设置绑定表
Chart2.SeriesList.Clear() \'清除图表原来的图系
For Each c As Col In t2.Cols
    \'Dim rs1 As Integer = val(t2.Rows(c)("人数"))
    If c.Name <> "单位" Then
        Series2 = Chart2.SeriesList.Add() \'增加一个图系
        Series2.Text =  c.Caption\'设置图系的标题 
        Series2.X.DataField = "单位" \'X轴绑定到产品列
        Series2.Y.DataField = c.Name \'设置Y轴的绑定列
    End If
Next

红色部分如何给它后面加上人数？

Series2.Text =  c.Caption & "(" & 人数变量值 & ")"

老师，我就是不会如何获取那个人数变量值？

Series2.Text =  c.Caption & "(" & t2.compute("sum(" & c.name & ")") & ")"