请问怎么用VB编程列出50到150之间所有的素数?请写出过程,多谢啦! Private Sub Command1_Click()Dim i As IntegerDim j As IntegerDim a(100)As IntegerDim k As Integerk=0For i=50 To 150For j=1 To iIf i Mod j=0 Thenx=x+1End IfNextIf x=2 Thena(k)=iText1.Text=Text1.Text&a(k)&\"/k=k+1Elsex=0End IfNextEnd Sub
随机阅读
- 半贴甲片贴法教程图解 贴片甲的图片
- 贵州赤水天岛湖海拔高度是多少? 赤水天岛湖票价
- 水冷壁爆管的原因有哪些? 5.水冷壁爆管现象及处理
- 制作好吃的豌豆粉 豌豆粉适合做什么
- 乌鲁木齐吉利领克4S店在什么地方 成都有几家领克4s店?都在哪里?选个方便的去看看车呢
- 中国能源网招聘采编 新闻采编与制作专业就业前景怎么样?
- 腾州市的邮编是多少 龙山镇武楼村南的房屋怎么样
- 水位记录仪价格如何选择 如何进行水位测量
- 洗衣粉中奥妙和碧浪两个牌子,哪种更好? 奥妙皂洗衣粉价位
- 清炖鱼头 清炖鱼头做法大全家常
- 形容水调歌 求苏轼<水调歌>全文
- 陕西省西安市长安区韦曲街道288号晶鑫丽座小区邮编? 韦曲街道邮政编码
- 新房装修前要做这几步,不然等装修完为时已晚! 新楼盘公共部分装修标准
- 豌豆田 孟德尔
- 濮阳未来天气 濮阳近期天气怎么样?
- 幼儿园晨检记录表怎么填? 餐厅人员晨检表格
- 苯的二氯代物有几种,其结构简式分别是 二氯代苯的分子式
- 解放碑有没有叫西山街或者13街的地方 解放碑西山街水产市场
- 歌词你是拉萨尼玛拉萨 找一首西藏歌歌词大概是拉拉 拉拉拉拉 吉拉萨哦
- 武林群侠传官网 武林群侠传2官网