【VB】vb各种求1-100内的素数
作者: 郑晓 分类: 编程基础 发布于: 2011-08-08 23:46 浏览:52,642 评论(12)
2021.02.18 经批评,原提供的几段代码有错误,本人其实对VB也不了解。
以下是回复中更正的代码:
Private Sub Form_Click()
For i = 1 To 100 Step 1
p = 0
For j = 2 To Sqr(i) Step 1
If i Mod j = 0 Then
p = 1
End If
Next j
If p = 0 Then
Print i;
End If
Next i
End Sub
本文采用知识共享署名-非商业性使用 3.0 中国大陆许可协议进行许可,转载时请注明出处及相应链接。
本文永久链接: https://www.zh30.com/vb-vb-1-100-of-the-prime-requirements.html
【VB】vb各种求1-100内的素数:目前有12 条留言
Private Sub Form_Click()
For i = 1 To 100 Step 1
p = 0
For j = 2 To Sqr(i) Step 1
If i Mod j = 0 Then
p = 1
End If
Next j
If p = 0 Then
Print i;
End If
Next i
End Sub
感谢指正,N年前的代码了,当时对VB也不太了解
嗯
第一个定义出错,定义这样写的话只能定义到离as最近的那一个变量
第一个if语句也出错,如果i是4的时候if判断出来它不是素数,而你要输出的是素数
你不是要输出是素数的吗?
真的三个都是错的
写程序最基本的都错了
能详细的说明下吗
第一个编程在vb中根本没有办法运行,这些编程你运行了吗就发出来了
需要我给你录个屏吗?
很赞~
我喜欢这样的文章 收藏了
LS说的很对啊 哈哈哈