| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 值对于 Decimal 太大或太小 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=176834) |
| -- 作者：zhuxinhui -- 发布时间：2022/4/28 11:03:00 -- 值对于 Decimal 太大或太小 Dim str11 As String = "" Dim t As Table = CurrentTable Str11 = Str11 & "著作所有权:肇庆市二八科技有限公司 QQ:542139832 电话微信:15089699226 计数:" & t.Aggregate(AggregateEnum.Count, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " " \'Str11 = Str11 & "累计:" & t.Aggregate(AggregateEnum.Sum, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " " \'Str11 = Str11 & "平均:" & t.Aggregate(AggregateEnum.Average, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " " \'Str11 = Str11 & "最大:" & t.Aggregate(AggregateEnum.Max, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " " \'Str11 = Str11 & "最小:" & t.Aggregate(AggregateEnum.Min, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " " \'Str11 = Str11 & "标准差:" & t.Aggregate(AggregateEnum.Std, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " " \'Str11 = Str11 & "总体标准差:" & t.Aggregate(AggregateEnum.StdPop, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " " \'Str11 = Str11 & "方差:" & t.Aggregate(AggregateEnum.Var, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " " \'Str11 = Str11 & "总体方差:" & t.Aggregate(AggregateEnum.VarPop, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " " StatusBar.Message3 = str11 一直运行都没有问题，今日提示“ 值对于 Decimal 太大或太小”，弹了很多个窗口出来，我把\'Str11 = Str11 & "累计:" & t.Aggregate(AggregateEnum.Sum, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " " 转为备注是正常了，应该是这句的问题， Str11 = Str11 & "累计:" & t.Aggregate(AggregateEnum.Sum, t.TopRow, t.LeftCol, t.BottomRow, t.RightCol) & " " 这句的什么问题 |
| -- 作者：有点蓝 -- 发布时间：2022/4/28 11:05:00 -- 累计的值超出了高精度类型可以表示的范围 |
| -- 作者：zhuxinhui -- 发布时间：2022/4/28 14:50:00 -- 要怎样处理?? |
| -- 作者：有点蓝 -- 发布时间：2022/4/28 15:00:00 -- 试试把代码放到try catch中间 |