[求助]统计过去10天的最大值-当天的值的差？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]统计过去10天的最大值-当天的值的差？

共有2190人关注过本帖树形打印复制链接主题：[求助]统计过去10天的最大值-当天的值的差？

18628339616

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：3 积分：103 威望：0 精华：0 注册：2017/10/28 16:46:00

[求助]统计过去10天的最大值-当天的值的差？ 发帖心情

Post By：2017/11/3 0:55:00 [只看该作者]

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目1.table

该表中增加了一列表达式列MAX1，该列要统计最高列中过去10天的最大值，并用最大值减去当天的值。请问该如何写表达式？

相当于前9行都没有值，从第10行开始每行统计最高列中的最大值，并用该最大值减去当天的值。

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2017/11/3 9:14:00 [只看该作者]

做个按钮，执行代码

Dim t As Table = Tables("国电电力数据")
For i As Integer = 9 To t.Rows.count-1
    Dim r As Row = t.Rows(i)
    Dim max As Double = 0
    For j As Integer = i-9 To i
        If t.Rows(j)("最高") > max Then
            max = t.Rows(j)("最高")
        End If
    Next
    r("MAX1")=max-r("最高")
Next

下一主题 >> << 上一主题

主题：[求助]统计过去10天的最大值-当天的值的差？