以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  全局表事件报错....''右下角圆点计算''  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=8653)

--  作者:qhczy
--  发布时间:2010/11/22 11:50:00
--  全局表事件报错....''右下角圆点计算''

图片点击可在新窗口打开查看此主题相关图片如下:全局表报错.jpg
图片点击可在新窗口打开查看
查询出来用SQL语句进行保存时报错.望指点一下.
--  作者:qhczy
--  发布时间:2010/11/22 13:17:00
--  

全局表事件代码如下:

\'右下脚计算圆整整数
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


--  作者:狐狸爸爸
--  发布时间:2010/11/22 14:04:00
--  
 我测试没事,做个例子上来看看。