以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求和  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=196548)

--  作者:nxdx112
--  发布时间:2025/5/12 10:58:00
--  求和
类似excel中这样显示求和,在foxtable 中怎样实现?
图片点击可在新窗口打开查看此主题相关图片如下:360截图20250512105631266.jpg
图片点击可在新窗口打开查看

--  作者:cd_tdh
--  发布时间:2025/5/12 11:06:00
--  
项目事件,SystemIdle事件写代码
\'自动计算
Dim str3 As String = ""
Dim t As Table = CurrentTable

    Str3 = Str3 & "计数:" & t.Aggregate(AggregateEnum.Count, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & ""
    Str3 = Str3 & "  累计:" & t.Aggregate(AggregateEnum.Sum, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & ""
    Str3 = Str3 & "  平均:" & t.Aggregate(AggregateEnum.Average, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & ""
    \'Str3 = Str3 & "  最大:" & t.Aggregate(AggregateEnum.Max, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
    \'Str3 = Str3 & "  最小:" & t.Aggregate(AggregateEnum.Min, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
    \'Str3 = Str3 & "标准差:" & t.Aggregate(AggregateEnum.Std, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
    \'Str3 = Str3 & "总体标准差:" & t.Aggregate(AggregateEnum.StdPop, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
    \'Str3 = Str3 & "方差:" & t.Aggregate(AggregateEnum.Var, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
    \'Str3 = Str3 & "总体方差:" & t.Aggregate(AggregateEnum.VarPop, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "


--  作者:有点蓝
--  发布时间:2025/5/12 11:50:00
--  
默认就有的:http://www.foxtable.com/webhelp/topics/0176.htm