- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]如何调用状态栏统计汇总？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=79879)
-- 发布时间：2016/1/11 16:16:00
-- [求助]如何调用状态栏统计汇总？
如题 开发的程序如何在状态栏显示统计？就像狐表一样，选择多少汇总多少？
-- 发布时间：2016/1/11 16:19:00
--
写到系统SystemIdle事件
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
-- 发布时间：2016/1/11 16:42:00
-- 回复：（大红袍）写到系统SystemIdle事件 D...
如图，如果鼠键指向中间，那么就是出现“|小锁” 拉扯锁定列， 怎么禁用
此主题相关图片如下：qq图片20160111163859.png
-- 发布时间：2016/1/11 16:44:00
--
Tables("表A").AllowFreezeColumn = False
-- 发布时间：2016/1/11 19:04:00
-- 回复：（大红袍）Tables("表A").AllowFreezeColumn = ...
在关闭项目的时候 内部表数据更改了，会弹出保存项目，但是我生成的软件 也会弹出保存项目，怎么才能禁止弹出保存项目？
-- 发布时间：2016/1/11 19:31:00
--
参考
e.SkipSave = true
http://www.foxtable.com/help/topics/0668.htm