放在项目属性:全局表事件: AfterSelRangeChange 中
With CurrentTable StatusBar.Message3= "累计:" & .Aggregate(AggregateEnum.Sum, .TopRow, .LeftCol, .BottomRow, .RightCol) & " 计数: " & .Aggregate(AggregateEnum.Count, .TopRow, .LeftCol, .BottomRow, .RightCol) & " 平均值: " & .Aggregate(AggregateEnum.Average, .TopRow, .LeftCol, .BottomRow, .RightCol) End With