狐表右下角的StatusBar显示的统计数据会一闪而过,之前都是正常显示的,请问有可能是什么地方影响了统计数据的显示呢?
项目事件AfterSelRangeChange:
'右下脚计算圆整整数
Dim Sum,Average,Count As Integer
With CurrentTable
Sum = .Aggregate(AggregateEnum.Sum, .TopRow, .LeftCol, .BottomRow, .RightCol)
Average = .Aggregate(AggregateEnum.Average, .TopRow, .LeftCol, .BottomRow, .RightCol)
Count = .Aggregate(AggregateEnum.Count, .TopRow, .LeftCol, .BottomRow, .RightCol)
End With
StatusBar.Message3 =" 累计:" & sum & " 平均:" & Average & " 计数:" & Count