VB “水仙花数”实现代码 计算代码
水仙花数是指一个 n 位数 ( n≥3 ),它的每个位上的数字的 n 次幂之和等于它本身。(例如:1^3 + 5^3+ 3^3 = 153)
操作方法
(01)双击桌面图标启动 visual basic 6.0
(02)选择标准EXE,然后点击打开。
(03)然后双击 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
-
如何编写家谱世系图
世系图是家谱中的主体部分,又称为世系考、世系记等。这部分内容为所有中国家谱共有,因而成为家谱区别于正史、地方志的最明显的标志。世系表有两种格式比较常见。一、宝塔式图谱:(01)这一图谱形式何人所创、创于何时目前尚无定论,不过最迟已在南宋时出现了,因此很可能...
-
教你如何使用小米MINI盒子
小米MINI盒子是一款小米最近推出的一款新产品,其外观小巧玲珑,操作简单方便,一推出便俘获了大批粉丝的心,下面我就教大家如何使用小米MINI盒子操作方法(01)首先做好准备工作,蓝牙遥控器、HDMI是小米MINI版盒子的标配,新的蓝牙遥控器要取出电池仓里的绝缘片,确保遥控器通...
-
微信怎么备份手机通讯录?
微信怎么备份手机通讯录?我们生活中有很多地方都会用到通讯录,有时候我们也需要备份通讯里,那么手机中如何备份通讯录呢?本就是为了解决大家的这个问题。iTunes(01)果粉们应该都知道iTunes的功能,它的功能十分强大,不仅可以播放音乐,同时也是可以帮助我们备份手机数据的...
-
如何使用新浪邮箱发邮件
许多人拥有一个电子邮箱,却不会使用它来发送电子邮件,接下来,我以新浪邮箱为例教大家如何发送电子邮件。操作方法(01)首先,登陆邮箱(02)找到“写信”,单击打开(03)收件人就是对方的电子邮箱地址,输入到方框内(04)主题可以随便写(05)正文写在红色的框内(06)下面是例子(07)写完后,单击...