VB “水仙花数”实现代码 计算代码

你非良人 提问于2024-06-02 15:26:03
推荐回答

水仙花数是指一个 n 位数 ( n≥3 ),它的每个位上的数字的 n 次幂之和等于它本身。(例如:1^3 + 5^3+ 3^3 = 153)

操作方法

双击桌面图标启动?visual basic 6.0

选择标准EXE,然后点击打开。

然后双击 ?FORM1 ?窗体,在弹出的代码窗体中复制该代码到?Form_Click() ?事件中。代码:Dim?a?As?Integer,b?As?Integer,c?As?Integer,n?As?Integern?=?0For?a?=?1?To?9For?b?=?0?To?9For?c?=?0?To?9If?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

你非良人 2024-06-07 10:14:24

相关推荐

睡醒后脸浮肿该怎么办才好 发布时间 2024-06-19

生活习惯不好,就会让你在睡醒后,出现浮肿脸的问题。从美容护肤的角度考虑,解决浮肿脸,你可以利用一些按摩方法。究竟,出现浮肿脸问题,我们该如何解决呢?下面,小编我就为你介绍一些护肤常识。精华之后即可加入按摩操想加速面部水分代谢,大家在涂上精华霜之后即可开始轻柔的按摩,加强血管的动力,排出水分。1.由下巴位置向上推。2...
查看全文>

女性附件疼是怎么回事 发布时间 2024-06-19

附件疼痛这是许多女性都会遇见的情况,虽然这是一个很小的问题但是对于女性的健康有着非常大的伤害。附件疼痛在女性中发病的几率非常的高,如果女性得了附件疼痛的症状,不仅影响了自己的生活也影响了自己的工作,所以许多女性对于附件疼痛有些担心,我们都知道想要治疗疾病就要了解它发病的原因,那么常见附件疼是怎么回事呢?1.妇科手术...
查看全文>

美肤与美食搭配起来才是完胜 发布时间 2024-06-19

在网络上,关于养护肌肤的妙招有很多,有些美容护肤法,是将美肤与美食联系起来,这是不错的护肤方式。接下来,小编我就为你介绍一些饮食美容高招,它们能让你的肌肤得到完美护理,一起来看看。让人齿颊生香的美食美肤术蚕食小雀斑人人都希望自己有红润而光洁的面容,因为它不仅给人以美感,而且也使自己精神愉快,有益于身心健康。但是,有...
查看全文>

防晒霜水油分离怎么办 能用吗 发布时间 2024-06-19

防晒霜,这是夏季不可少的,很多热都是要用的,是超级的重要的,那么这个防晒霜水油分离怎么办?能用吗:防晒霜水油分离怎么办:防晒产品出现少量的油水分离现象是正常的。所说的“水”其实就是防晒剂,是一种油份,滴在皮肤上就知道是油份了。因为防晒剂都是油性的,不溶于水,为了膏体混合均匀会加入乳化剂、稳定剂。但这并不能完全让膏体...
查看全文>

经期能不能喝生姜茶呢 发布时间 2024-06-19

女性来月*的时候,身体状态比较差,也是抵抗力最弱的阶段,如果没有做好保健工作,就会出现许多不适,那么经期能不能喝生姜茶?喝生姜茶之后会对月*造成不良影响吗?专家表示姜茶可以治疗感冒、风寒,是否可以喝生姜茶还要根据女性体质而定,最好听从医生的叮嘱。由于饮食还是生活习惯的原因,很多女性朋友都会有宫寒。红糖姜茶可以暖宫,...
查看全文>

优选推荐