关于水仙花数编程vb，水仙花数vb代码这个很多人还不知道，今天小六来为大家解答以上的问题，现在让我们一起来看看吧！
1、Dim a As Integer, b As Integer, c As IntegerFor a = 1 To 9For b = 0 To 9For c = 0 To 9If a * 100 + b * 10 + c = a ^ 3 + b ^ 3 + c ^ 3 Then Print a & b & cNext cNext bNext a 答案补充 运行结果是：153 370 371 407。
本文到此分享完毕，希望对大家有所帮助。
