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


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

主题:自动统计

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


加好友 发短信
等级:八尾狐 帖子:1942 积分:14925 威望:0 精华:0 注册:2016/4/28 9:58:00
自动统计  发帖心情 Post By:2016/8/18 19:19:00 [只看该作者]

Dim Vals As List(of String())
Vals = DataTables("成绩").GetValues("学校代码|单位名称|年级代码|班级")
For i As Integer = 0 To Vals.Count - 1
    Dim dr As DataRow = DataTables("统表").AddNew()
    dr("学校代码") = Vals(i)(0)
    dr("单位名称") = Vals(i)(1)
    dr("年级代码") = vals(i)(2)
    dr("班级") = vals(i)(3)
。。。

Next


请问我想把成绩表中学校代码,单位名称,年级代码,班级不重复填到统表中,有几个问题请教

1、如果做成个按钮,会执行一次同样数据行在统计中再次增加,如何检测到有学校代码,单位名称,年级代码,班级一样的跳过不再新新记录。
2、如果统表中有空行,它也会新增,可否直接填充空行走,不够的再新增行。
3、能不能在。。。处增加统表中的”人数“,”语文平均分“分字段统计,如能,请帮忙写个下代码。

不好意思,初学不懂,请高手多指教,通过你的代码,我才会更深刻理解其意义,谢谢!!

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


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33951 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2016/8/18 20:16:00 [只看该作者]

直接填充好了

 

Dim f As New Filler
f.SourceTable = DataTables("成绩")
f.SourceCols = "学校代码,单位名称,年级代码,班级"
f.DataTable = DataTables("统表")
f.DataCols = "学校代码,单位名称,年级代码,班级"
f.ExcludeExistValue = True
f.ExcludeNullValue = True
f.Fill()


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


加好友 发短信
等级:八尾狐 帖子:1942 积分:14925 威望:0 精华:0 注册:2016/4/28 9:58:00
  发帖心情 Post By:2016/8/18 20:34:00 [只看该作者]

这个办法好,学习了,再请问下,统表中有人数,语文平均分,语文优秀率,如何从成绩表统计到统表直接填充,请帮忙加上这个示例,谢谢

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/8/18 21:02:00 [只看该作者]


 回到顶部