主题：[求助]合并按钮功能

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

点击浏览该文件:退耕还林管理系统.rar

此主题相关图片如下：筛选.jpg

    一、按钮“面积分布”、“面积组成”都是图示数据的。能否将两个按钮合并为一个按钮同时显示两个图。
  按钮“面积分布”
  Dim frm As WinForm.Form
frm = Forms("窗口1")
frm.Open()
  窗口1
Dim Chart As WinForm.Chart '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Dim tbl As DataTable = DataTables("总览") '定义一个变量tbl引用数据表
Dim lst As List(Of String) = tbl.GetUniqueValues("", "乡名") '获得产品名称集合
Chart= Forms("窗口1").Controls("Chart1") ' 引用窗口中的图表
Chart.SeriesList.Clear() '清除图表原来的图系
Series = Chart.SeriesList.Add() '增加一个图系
Series.Length = lst.Count '设置图系的长度
For i As integer = 0 to lst.Count - 1 '指定每个数据点的位置
    Series.X(i) = i '指定水平坐标
    Series.Y(i) = tbl.Compute("Sum(设计面积)","[乡名] = '" & lst(i) & "'") '指定垂直坐标
    Series.TooltipText = "X = {#XVAL}, Y = {#YVAL}"
    Chart.AxisX.SetValueLabel(i, lst(i)) '指定字符表示
Next
Chart.AxisX.AnnoWithLabels = True '启用字符标示
   按钮“面积组成”
Dim g As New GroupTableBuilder("统计表1", DataTables("总览"))
g.Groups.AddDef("乡名")
g.Totals.AddDef("退耕地")
g.Totals.AddDef("荒山")
g.Totals.AddDef("生态林")
g.Totals.AddDef("经济林")
g.Build()
Forms("统计图").Open
    二、按钮“分类统计”、“树种统计”、“分乡统计”合并为一个按钮，通过不同的筛选条件达到不同的统计，
   1、不选任何条件（组合框全为空）时统计各乡镇（列出乡名）各年度的合计值（不列出年度）
   2、选择某个年度后列出该年度各乡镇的统计值
   3、选择某个年度某个乡镇后列出该年度该乡镇各村的统计值（列出村名）
   ┅┅┅┅┅┅┅
     三、为了得到不同的excel报表，在数据表中增加许多表达式列过渡，然后用按钮分组统计生成临时表，又在临时工表上建立报表。这个过程显得太烦琐不如易表来得直接，有没有更好的办法？请做个实例来参照。

真没办法？提个思路也好嘛

二、问题应只是加条件判断(楼主的管理系统估计基本完成,代码是现成的):
1 if 组合框全为空 then
     代码
  elseif 年度=..... then
    代码
  elseif ............ then
    代码
  else 
   .....
  end if
 
三、应也是同理。 

谢谢回得复！易表是一个按钮完成的，你的建议我慢慢摸索。

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

点击浏览该文件:退耕还林管理系统.rar

这是第一个问题
第1个图表是你原来的代码
第2个图表没用统计表,稍微改了一下
就能合并了

考虑一下无从下手，烦请做个实例吧

我5楼说的都是第一个问题.
第二个问题,我还要问你下:
如果跳着选，例如选择年度、造林类别、林种 怎么筛选？

只要选取造林年度，乡名，村名就够了，选多了麻烦。谢谢你第一个问题圆满解决

  1、不选任何条件（组合框全为空）时统计各乡镇（列出乡名）各年度的合计值（不列出年度）
   2、选择某个年度后列出该年度各乡镇的统计值
   3、选择某个年度某个乡镇后列出该年度该乡镇各村的统计值（列出村名）
   4、不选取年度选某个乡镇后列出所有年度该乡镇各村的统计值（列出村名）
   5、选择某个年度某个乡镇某个村列出该年度该乡镇该村的统计值
   6、不选年度选取某个乡镇某个村列出所有年度该乡镇该村的统计值

是这个意思吧：
先根据组合框的内容进行筛选。再进行分组统计。

你有一点没指明，就是筛选之后的分组项：
比如不进行筛选（组合框都为空），分组列可以是“年度”，也可以是“乡名”，也可以是“年度”，“乡名”，还可以是别的很多情况    （你一楼的要求是分组列是“乡名”）
比如筛选出了2007年的所有记录之后，分组列可以是“村名”， 也可以是“村名”“乡名”，也可以是“村名”“乡名”，“造林类别” （你一楼的要求是分组列还是“乡名”）
比如筛选出2007年猫儿乡的记录，分组列也有好多情况。（你一楼要求的分组列是“村名”）
只举了3个例子，所以看不出你的分组规律。