vb求水仙花(vb水仙花数编程)

搜罗天下 编辑:
导读 大家好,小空来为大家解答以上的问题。vb求水仙花,vb水仙花数编程这个很多人还不知道,现在让我们一起来看看吧!1、首先双击桌面图标启动 v...

大家好,小空来为大家解答以上的问题。vb求水仙花,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、最后运行这样就完成了。

本文到此分享完毕,希望对大家有所帮助。

标签:
免责声明:本文由用户上传,如有侵权请联系删除!