如果一个N位数等于它的各数位上的数字的N次方和，则称Armstrong数
工具/原料
1
联想2020
2
Win11
方法/步骤
1
首先启动VB6.0，新建一个标准exe工程。
3
双击命令按钮进入代码窗口。
4
假设有一个名为a的函数过程进行调用，从100到99999逐一查找。可以选择计数循环For....Next语句。
5
编写a函数过程，使用Do....loop While 进行各个位数分解判断，如果相等返回TRUE，否则返回FALSE。
注意事项
1
任意一个玫瑰花数、水仙花数、五角星数都是Armstrong数。
2
将各个位数进行分解也可以采用Mid函数字符串分解。
3
只要修改查找范围可以任意转换为玫瑰花数、水仙花数、五角星数
上一篇：明日之后怎样得到猪崽子
下一篇：喝酸奶我们有什么注意的地方呢