Foxtable(狐表)用户栏目专家坐堂 → [求助]学生成绩表最后1行的数据统计到成绩分布表


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

主题:[求助]学生成绩表最后1行的数据统计到成绩分布表

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


加好友 发短信
等级:幼狐 帖子:113 积分:980 威望:0 精华:0 注册:2023/6/18 23:26:00
[求助]学生成绩表最后1行的数据统计到成绩分布表  发帖心情 Post By:2024/8/8 16:08:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:学生成绩表最后1行的数据统计到成绩分布表.foxdb


求助:学生成绩表最后1行的数据统计到成绩分布表
不想要科目所有列的值都统计到成绩分布表

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111401 积分:567075 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/8/8 16:26:00 [只看该作者]


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


加好友 发短信
等级:幼狐 帖子:113 积分:980 威望:0 精华:0 注册:2023/6/18 23:26:00
回复:(有点蓝)参考:http://www.foxtable.com/webh...  发帖心情 Post By:2024/8/8 16:42:00 [只看该作者]

蓝总,帮助  手工编码进行统计  案例是科目列所有值统计,就是不懂最后1行的统计,求助

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111401 积分:567075 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/8/8 16:53:00 [只看该作者]

最后一行?!!第44行【4班 张李华】这一行?就一行数据有啥好统计的
[此贴子已经被作者于2024/8/8 16:53:02编辑过]

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


加好友 发短信
等级:幼狐 帖子:113 积分:980 威望:0 精华:0 注册:2023/6/18 23:26:00
回复:(有点蓝)最后一行?!!第44行【4班 张李华】...  发帖心情 Post By:2024/8/8 16:59:00 [只看该作者]

蓝总,想要的效果是下面代码,但不会怎么增加,只取当前表最后1行的值,统计到表B

求助,下面代码,增加当前表最后1行修改后,当前表最后1行的数据更新统计到表B


If e.DataCol.Name = "第一列" Then '如果内容发生变动的是第一列列

    If e.NewValue Is Nothing Then '如果新值是空白,也就是第一列列的内容为空

        e.DataRow("第二列") = Nothing '那么清空此行第二列列的内容

    Else

        Dim dr As DataRow

        '否则在表B表查找同名的表B行,将找到的行赋值给变量dr

        dr = DataTables("表B").Find("[第一列] = '" & e.NewValue & "'")

        If dr IsNot Nothing Then '如果找到了同名的表B行,也就是dr不是Nothing

            e.DataRow("第二列") = dr("第二列")

        End If

    End If

End If

[此贴子已经被作者于2024/8/8 17:09:33编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111401 积分:567075 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2024/8/8 17:23:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:学生成绩表最后1行的数据统计到成绩分布表.zip


 回到顶部