导读 关于vb编写100至999的水仙花数,vb水仙花数编程这个问题很多朋友还不知道,今天小六来为大家解答以上的问题,现在让我们一起来看看吧!1、
关于vb编写100至999的水仙花数,vb水仙花数编程这个问题很多朋友还不知道,今天小六来为大家解答以上的问题,现在让我们一起来看看吧!
1、首先双击桌面图标启动 visual basic 6.0。
2、2、然后新建工程,选择标准EXE。
3、3、选择完工程后,点击打开,就可以新建一个exe工程了。
4、4、然后双击 FORM1 窗体,在弹出的代码窗体中复制该代码到 Form_Click() 事件中。
5、5、代码:If a * 100 + b * 10 + c = a ^ 3 + b ^ 3 + c ^ 3 Thenn = n + 1If (n Mod 5) = 0 ThenPrint a & b & cElsePrint a & b & c,End IfEnd IfNext cNext bNext aPrint Chr(13) & Chr(13) & "三位数中水仙花数个数为" &n。
6、最后运行这样就完成了。
本文分享完毕,希望对大家有所帮助。
标签:
免责声明:本文由用户上传,如有侵权请联系删除!