Foxtable(狐表)用户栏目专家坐堂 → 图标统计


  共有2215人关注过本帖树形打印复制链接

主题:图标统计

帅哥哟,离线,有人找我吗?
cd_tdh
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3082 积分:20596 威望:0 精华:0 注册:2016/3/28 16:57:00
图标统计  发帖心情 Post By:2020/1/2 12:26:00 [只看该作者]

老师,我生成的临时表如下:目前为0是,也有数量是:1

 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20200102122113.png
图片点击可在新窗口打开查看

生成图表,需要排除项目名称为空的,当项目名称为空时,显示数量为:0,但所有分支机构都需要显示,后面代码怎么写?

 

Dim Chart3  As WinForm.Chart  '定义一个图表变量
Dim Series3 As WinForm.ChartSeries '定义一个图系变量
Dim tb3 As DataTable =  dt8 '定义一个变量tbl引用数据表
Dim lst3 As List(Of String) = tb3.GetValues("所属机构") '获得产品名称集合
Chart3 = e.Form.Controls("Chart3") ' 引用窗口中的图表
Chart3.ChartType = ChartTypeEnum.Bar '图表类型该为Bar(条形),不加这一句为折线图
Chart3.SeriesList.Clear() '清除图表原来的图系
Chart3.AxisY.Text = "参与投标数量(个)"
Series3 = Chart3.SeriesList.Add() '增加一个图系
Series3.Length = lst3.Count '设置图系的长度
For i As Integer =  0  To lst3.Count -  1  '指定每个数据点的位置
    Series3.X(i) = i '指定水平坐标
    Series3.Y(i) = tb3.Compute("Count(所属机构)","[所属机构] = '" & lst3(i) & "' ") '指定垂直坐标
    Chart3.AxisX.SetValueLabel(i, lst3(i))  '指定字符表示
    Series3.DataLabelText = "{#YVAL}"  '显示Y轴的值
    Series3.DataLabelCompass = LabelCompassEnum.North  '标识的位置
Next

 

[此贴子已经被作者于2020/1/2 12:27:13编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
cd_tdh
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:狐精 帖子:3082 积分:20596 威望:0 精华:0 注册:2016/3/28 16:57:00
  发帖心情 Post By:2020/1/2 12:32:00 [只看该作者]

明白了,增加一个统计条件,项目名称不为空。


 回到顶部