100到999的水仙花数是多少

100到999的水仙花数是多少

dim i,a,b,c

for i=100 to 999

a=fix(i/100)

b=i mod 10

c=i-a*100+b*10

if i=a*a*a+b*b*b+c*c*c then

label1.caption=i(显示在标签上)

end if

next i

随便你想要什么地方显示

芙蓉王一共有多少品种

太多了！！~！ 芙蓉王烟！~！