用VB求3位所有“水仙花数”之和？（求100-999之间所有水仙花数的和）急~V 100到999的水仙花数vb

100到999的水仙花数是多少 dim i，a，b，cfor i=100 to 999a=fix(i100)b=i mod 10c=i-a*100+b*10if i=a*a*a+b*b*b+c*c*c thenlabel1.caption=...