Foxtable(狐表) → 用户栏目 → 专家坐堂 → 自动计算的代码


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

主题：自动计算的代码
帅哥哟，离线，有人找我吗？
mxl810823
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：349 积分：2974 威望：0 精华：0 注册：2018/2/27 17:32:00 		自动计算的代码  发帖心情 Post By：2020/2/17 0:11:00 [只看该作者]

我自定义了菜单栏，然后选择数据自动计算结果显示在右下角的功能没有了，如下图

图片点击可在新窗口打开查看此主题相关图片如下：qq图片20200216235534.png
图片点击可在新窗口打开查看
但是我还想在自定义了菜单栏后保留这个功能，那么代码是什么，如何实现呢？
 回到顶部
帅哥哟，离线，有人找我吗？
y2287958
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：狐神 帖子：4632 积分：33804 威望：0 精华：0 注册：2008/8/31 22:44:00 		  发帖心情 Post By：2020/2/17 8:51:00 [只看该作者]

Dim str1 As String = ""
Dim t As Table = CurrentTable
Str1 = Str1 & "计数:" & t.Aggregate(AggregateEnum.Count, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
Str1 = Str1 & "累计:" & t.Aggregate(AggregateEnum.Sum, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
Str1 = Str1 & "平均:" & t.Aggregate(AggregateEnum.Average, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
Str1 = Str1 & "最大:" & t.Aggregate(AggregateEnum.Max, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
Str1 = Str1 & "最小:" & t.Aggregate(AggregateEnum.Min, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
Str1 = Str1 & "标准差:" & t.Aggregate(AggregateEnum.Std, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
Str1 = Str1 & "总体标准差:" & t.Aggregate(AggregateEnum.StdPop, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
Str1 = Str1 & "方差:" & t.Aggregate(AggregateEnum.Var, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
Str1 = Str1 & "总体方差:" & t.Aggregate(AggregateEnum.VarPop, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " "
 回到顶部
帅哥哟，离线，有人找我吗？
nmamtf
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：79 积分：644 威望：0 精华：0 注册：2019/5/1 18:38:00 		  发帖心情 Post By：2020/12/4 18:05:00 [只看该作者]

也帮到我了，衷心感谢！

 回到顶部
帅哥哟，离线，有人找我吗？
白国栋
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：幼狐 帖子：176 积分：1689 威望：0 精华：0 注册：2017/3/26 10:20:00 		  发帖心情 Post By：2021/1/2 10:45:00 [只看该作者]

这个指令是放到系统事件的systemidle里吗？
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：106665 积分：542508 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/1/3 10:47:00 [只看该作者]

一般放到systemidle

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 4 次数据查询