项目事件
AfterSelRangeChange
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)
& " "
Forms("录入窗体").Strips("状态栏").Items("合计").text=
Str1
运行之后报错:
.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2020.5.29.8
错误所在事件:全局表事件,AfterSelRangeChange
详细错误信息:
给定关键字不在字典中。
把错误提示关掉后,功能还好用,还能正常计算。求助蓝板,应该怎么去掉这个错误。