VB6中三位水仙花数的计算（5）

首先水仙花数是什么？

水仙花数（Narcissistic number）也被称为超完全数字不变数（pluperfect digital invariant, PPDI）、自恋数、自幂数、阿姆斯壮数或阿姆斯特朗数（Armstrong number），水仙花数是指一个 3 位数，它的每个位上的数字的 3次幂之和等于它本身（例如：1^3 + 5^3+ 3^3 = 153）。

从100到999一共有四个水仙花数：153，370，371，407

代码如下

 

 

一开始出现了001也是水仙花数的错误，添加一个确定的范围就解决了。还有就是但数字大于三位数，它还会继续运行的错误。

只要你不断的去查百度，去问同学，问老师，问题总会解决的。