水仙花数的程序怎么写啊？

输出所有的"水仙花数"。所谓“水仙花数”是指一个3位数，其各位数字立方和等于该数本身。例如：153是一个水仙花数，因为153=1*1*1+5*5*5+3*3*3。

谢谢各位高手指教！！！

Private Sub Form_Click()
Dim a, b, c ，x As Integer
For a = 0 To 9
For b = 0 To 9
For c = 1 To 9
x=100 * c + 10 * b + a
If a ^ 3 + b ^ 3 + c ^ 3 = a + 10 * b + 100 * c Then print x;
Next c
Next b
Next a
这是用vb编的 我只学了这个
==================================
C语言的"水仙花数"代码
main(){
int i,j,k;
for(i=1;i<10;i++)
for(j=0;j<10;j++)
for(k=0;k<10;k++)
if( (i*100+j*10+k)==((i*i*i)+(j*j*j)+(k*k*k)))
printf("%d%d%d ",i,j,k);
getch();
}

C语言的"水仙花数"代码
main(){
int ge,shi,bai,number;
for(number=100;number<1000;number++){
bai=number/100;
shi=(number%100)/10;
ge=number%10;
if(number==bai*bai*bai+shi*shi*shi+ge*ge*ge)
printf("\nnumber=%d\n",number); }
getch();
}
这是c语言 从这里抄来的