VB程序员博客

VB程序开发

溢出,怎么解决啊?计算r6_1
r6_1 = Round((Val(RecTemp("js1996")) / pjgz_1(1) + Val(RecTemp("js1997")) / pjgz_1(2) + Val(RecTemp("js1998")) / pjgz_1(3) + Val(RecTemp("js1999")) / pjgz_1(4) + Val(RecTemp("js2000")) / pjgz_1(5) + Val(RecTemp("js2001")) / pjgz_1(6) + Val(RecTemp("js2002")) / pjgz_1(7) + Val(RecTemp("js2003")) / pjgz_1(8) + Val(RecTemp("js2004")) / pjgz_1(9) + Val(RecTemp("js2005")) / pjgz_1(10) + Val(RecTemp("js2006")) / pjgz_1(11) + Val(RecTemp("js2007")) / pjgz_1(12) + Val(RecTemp("js2008")) / pjgz_1(13) + Val(RecTemp("js2009")) / pjgz_1(14) + Val(RecTemp("js2010")) / pjgz_1(15) + Val(RecTemp("js2011")) / pjgz_1(16) + Val(RecTemp("js2012")) / pjgz_1(17) + Val(RecTemp("js2013")) / pjgz_1(18) + Val(RecTemp("js2014")) / pjgz_1(19) + Val(RecTemp("js2015")) / pjgz_1(20)) / Val(cs_11) * Val(cs_2) * Val(r2_1) * Val(cs_10), 1)
js1996:1996年的基数(1996-2008年的基数已给)
pjgz:截止到当年的平均工资(1996-2008年的平均工资已给)
由于计算的时候,从2009之后js2006及pjgz没有赋值,在计算的时候提示溢出,请问如何解决?!

在前面加上on error resume next

工资都能溢出?设计的不合理吧。

没看明白代码,实在太吃力了

引用 3 楼 jennyvenus 的回复:
工资都能溢出?设计的不合理吧。

我的工资什么时候能溢出就好了……….

引用 5 楼 myjian 的回复:
引用 3 楼 jennyvenus 的回复:
工资都能溢出?设计的不合理吧。

我的工资什么时候能溢出就好了……….

如果负数算溢出,俺溢出过。

…………我常这样"溢出"..

楼主,太监了?


标签: , ,