共3 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：求和
1楼
nxdx112 发表于：2025/5/12 10:58:00类似excel中这样显示求和，在foxtable 中怎样实现？
此主题相关图片如下：360截图20250512105631266.jpg
此主题相关图片如下：360截图20250512105631266.jpg2楼
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) & " "
3楼
有点蓝 发表于：2025/5/12 11:50:00
共3 条记录, 每页显示 10 条, 页签:
[1]