用VB6.0找出四位数的超级素数
一个数，除去个位是素数，除去百位是素数……而且各个位上没有零的数，就是超等素数。
东西/原料
- Visual Basic 6.0
- 电脑
方式/步调
- 1
启动VB6.0，新建一个尺度exe工程。
- 2
在窗体上绘制一个号令按钮，名称为Command1。
- 3
双击号令按钮进入代码窗口。
- 4
假设有一个名为ss的函数过程进行挪用，从1000到9999一一查找。可以选择计数轮回For....Next语句。
- 5
编写ss函数过程。（具体过程请看代码中的绿色注释）
- 6
按F5运行测试。（想学更多经典算法可以点击存眷。若是感觉对您有帮忙，请动脱手指点下赞吧，感谢哦。）
注重事项
- 任何一个超等素数都是素数
- 发表于 2018-03-10 00:00
- 阅读 ( 940 )
- 分类：其他类型
admin
0 篇文章
作家榜 »
-
xiaonan123
189 文章
-
汤依妹儿
97 文章
-
luogf229
46 文章
-
jy02406749
45 文章
-
小凡
34 文章
-
Daisy萌
32 文章
-
我的QQ3117863681
24 文章
-
华志健
23 文章