Foxtable(狐表)用户栏目专家坐堂 → 跨表计算平均值


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

主题:跨表计算平均值

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


加好友 发短信
等级:幼狐 帖子:78 积分:750 威望:0 精华:0 注册:2017/7/19 12:42:00
跨表计算平均值  发帖心情 Post By:2018/9/25 11:16:00 [只看该作者]

A表有批号列(唯一)、基重_左、基重_中、基重_右列,B有批号、基重平均值列,录入批号后,统计A表基重平均值

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/25 11:59:00 [只看该作者]


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


加好友 发短信
等级:幼狐 帖子:78 积分:750 威望:0 精华:0 注册:2017/7/19 12:42:00
  发帖心情 Post By:2018/9/25 18:08:00 [只看该作者]

这是跨表引用吧?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/25 18:40:00 [只看该作者]

以下是引用foxuser在2018/9/25 18:08:00的发言:
这是跨表引用吧?

 

不就是跨表引用吗?引用这几列的值(基重_左、基重_中、基重_右),然后相加,除以3,不就是平均了?


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


加好友 发短信
等级:幼狐 帖子:78 积分:750 威望:0 精华:0 注册:2017/7/19 12:42:00
  发帖心情 Post By:2018/9/25 19:18:00 [只看该作者]

If e.DataCol.Name = "成品卷号" Then
    If e.NewValue Is Nothing Then 
        e.DataRow("卷头基重") = Nothing 
        e.DataRow("卷芯基重") = Nothing
        
    Else
        Dim dr As DataRow
        
        dr = DataTables("成品检验报表").Find("[成品卷号] = '" & e.NewValue & "'")
        If dr IsNot Nothing Then 
            e.DataRow("卷头基重") = dr(("卷头基重_左") + ("卷头基重_中") +("卷头基重_右") /3 )
            e.DataRow("卷芯基重") = dr(("卷心基重_左") + ("卷心基重_中") +("卷心基重_右") /3 )
        End If
    End If
End If

列是双精度小数


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

[此贴子已经被作者于2018/9/25 19:19:59编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/25 19:23:00 [只看该作者]

改成

 

 e.DataRow("卷头基重") = (dr("卷头基重_左") + dr("卷头基重_中") +dr("卷头基重_右")) / 3


 回到顶部