Foxtable(狐表)用户栏目专家坐堂 → 窗口状态栏可以合计选中数据吗?


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

主题:窗口状态栏可以合计选中数据吗?

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


加好友 发短信
等级:幼狐 帖子:124 积分:1325 威望:0 精华:0 注册:2016/11/16 14:21:00
窗口状态栏可以合计选中数据吗?  发帖心情 Post By:2019/3/16 11:45:00 [只看该作者]

老师请问在窗口状态栏可以显示选中的多个单元格的数值合计吗?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105943 积分:538784 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/3/16 11:53:00 [只看该作者]

到AfterSelRangeChange事件遍历选中的单元格然后合计即可:http://www.foxtable.com/webhelp/scr/0647.htm

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


加好友 发短信
等级:幼狐 帖子:124 积分:1325 威望:0 精华:0 注册:2016/11/16 14:21:00
  发帖心情 Post By:2019/3/18 10:57:00 [只看该作者]

老师,我指的是在窗口模式下,而不是 StatusBar.Message3

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


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

参考,编写systemIdle事件,窗口里显示,最后就改成 forms("窗口1").controls("Textbox1").text = str1

 

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) & " "
StatusBar.Message3 = str1

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


加好友 发短信
等级:幼狐 帖子:124 积分:1325 威望:0 精华:0 注册:2016/11/16 14:21:00
  发帖心情 Post By:2019/4/4 12:51:00 [只看该作者]

显示在 窗口  状态栏   累计 标签上怎么写,谢谢老师。
图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20190404125000.png
图片点击可在新窗口打开查看

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


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

StatusBar.Message3 = str1

 

改成

 

If forms("窗口1").opened then

    forms("窗口1").strips("状态栏").items("累计").text = str1

End If


 回到顶部