易表在线答疑技术与交流用户社区 → 如何完善个表的功能


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

主题:如何完善个表的功能

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


加好友 发短信
等级:论坛游民 帖子:167 积分:442 威望:0 精华:0 注册:2007/10/28 12:55:00
如何完善个表的功能  发帖心情 Post By:2012/1/10 21:14:00 [显示全部帖子]

[这个贴子最后由不同凡响在 2012/01/10 10:18pm 第 4 次编辑]

这是程版主几年前一个堪称经典的统计模块,在现在我想在统计表里增加一些功能:1、增加一个统计人数的列。2、在及格率、优秀率、低分率后面各增加一个列排名,其中及格率、优秀率按降序规律排名;低分率按升序排名。3、在统计表最后增加两列分别为班级最高分、年级最高分的列,并能自动进行统计
egd文件下载
 回到顶部
帅哥哟,离线,有人找我吗?
不同凡响
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:167 积分:442 威望:0 精华:0 注册:2007/10/28 12:55:00
  发帖心情 Post By:2012/1/10 22:40:00 [显示全部帖子]

会不会是因为数据太多,不好测试?

 回到顶部
帅哥哟,离线,有人找我吗?
不同凡响
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:167 积分:442 威望:0 精华:0 注册:2007/10/28 12:55:00
  发帖心情 Post By:2012/1/12 18:32:00 [显示全部帖子]

[这个贴子最后由不同凡响在 2012/01/12 06:40pm 第 2 次编辑]

感谢,忙着统计,没及时测试,今天刚刚上来测试,效果不错,再次谢谢



 回到顶部
帅哥哟,离线,有人找我吗?
不同凡响
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:167 积分:442 威望:0 精华:0 注册:2007/10/28 12:55:00
  发帖心情 Post By:2012/4/6 10:58:00 [显示全部帖子]

[这个贴子最后由不同凡响在 2012/04/06 11:10am 第 3 次编辑]

上次测试4楼文件,主要功能都实现了,非常好,这次运用在三率排名上出现了这么个情况:在一个年级有5个班,其中有4个班的优秀率为0,现在这4个班的优秀率排名却不一样(如图一所示),最合理的结果应该是:这4个班的优秀率排名应该一样(如图二所示)
总之就是如何处理相同排名的问题.因为还可能有这种情况:假如这五班的优秀率分别是:1班2.50%   2班4.05%   3班6.00%  4班6.00%  5班12.00%,那么这个时候的优秀率排名应该为:1班排第5、2班排第4、3班排第2、4班也排第2、5班排第1
请朋友们帮看看,怎么用公式使三率的排名都能达到这样的要求。
图一

egd文件下载

我细看了总分排名上的已经很好的处理了这个相同排名的问题,可是找代码了来看,也看不出奥妙所在,应该在以下的代码中怎么修改呢
If([%科目%] = "",MsgBox("请选择科目后再执行此操作!",1),SetLabel("","开始统计,请稍候!") And ClearGrid("统计表") And CopyRows("统计表") And If([%学校%] <> "",DelFor("统计表","学校", "<>" ,[%学校%]), True ) And If([%班别%] <> "",DelFor("统计表","班别", "<>" ,[%班别%]), True ) And EvalFor("统计表","标识","If(Instr([项目],[%科目%]) >= 0,0,-1)") And RecalcGrid("统计表",1) And DelFor("统计表","标识", "=" ,-1) And DelFor("统计表","项目", "=" ,"") And DelFor("统计表","学校", "=" ,"","班别", "=" ,"") And SortCol("统计表","及格率",2) And RecalcCol("统计表","及格率名次","及格率名次") And SortCol("统计表","优秀率",2) And RecalcCol("统计表","优秀率名次","优秀率名次") And SortCol("统计表","低分率",1) And RecalcCol("统计表","低分率名次","低分率名次") And SortCol("统计表","班别",1) And SortCol("统计表","学校",1))


 回到顶部
帅哥哟,离线,有人找我吗?
不同凡响
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:167 积分:442 威望:0 精华:0 注册:2007/10/28 12:55:00
  发帖心情 Post By:2012/4/6 12:02:00 [显示全部帖子]

谢谢,测试中,仔细看看

 回到顶部
帅哥哟,离线,有人找我吗?
不同凡响
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:167 积分:442 威望:0 精华:0 注册:2007/10/28 12:55:00
  发帖心情 Post By:2012/4/6 21:38:00 [显示全部帖子]

[这个贴子最后由不同凡响在 2012/04/06 09:48pm 第 1 次编辑]

8楼的文件经过测试,不错,只是在统计低分率排名时的代码中大于符号是不是应该修改为小于符号才正确
And SortCol("统计表","低分率",1) And Evalfor("统计表","低分率名次","CountFor(""统计表"",""项目"",""="",[项目],""低分率"","" > "",[低分率])+1") 修改成: And SortCol("统计表","低分率",1) And Evalfor("统计表","低分率名次","CountFor(""统计表"",""项目"",""="",[项目],""低分率"","" < "",[低分率])+1")
另外统计低分人数时如何设置才能只统计有成绩并且数值小于设定低分线的,如果是空值则不参与统计.

 回到顶部