求解，怎么我求100到200之间的素数怎么才显示一个数值啊！都要气死我了！

level 8

啦嘟啦k😘 楼主

2020年05月24日 08点05分 1

level 8

啦嘟啦k😘 楼主

这是代码
Private Sub Form_Click()
Dim i%, j%, c As Boolean
c = True
For i = 101 To 200
For j = 2 To i - 1
If i Mod j = 0 Then c = False
Next j
If c Then Print i;
Next i
End Sub

2020年05月24日 08点05分 2

level 11

璐村惂鐢ㄦ埛_0748V5Z馃惥

c = True
这行的位置不对。应该下移一行，对每一个数字i，都先假定他是素数。
你当前的位置，是因为101是一个素数。如果i从一个合数开始，你一个都得不到了

2020年05月24日 09点05分 3

啦嘟啦k😘

太感谢您了，这个程序气了我几个小时呢，终于解决了！ [泪]

2020年05月24日 09点05分