Question

vb程序问题

Private Sub Form_Click()
Dim i As Integer
Dim j As Integer
For i = 2 To 100
For j = 2 To i - 1
If i Mod j = 0 Then
Exit For
End If
Next j
If j = i Then Print i
Next i
End Sub
为什么j最大取i-1，但是输出时j=i?

Answer 1

没看明白你的意思，这个是求素数的程序吧，
For j = 2 To i - 1
If i Mod j = 0 Then
Exit For
End If
Next j
这个是将i值和除了1和自己外都除一次，如果没有余数，那么结束时，j不超过i-1都是在循环的，但如果都不能整除，在next j后，j=i了，超过了j=i-1，循环结束，这时，j就等于i了，
所以：If j = i Then Print i 出来的就是素数了，因为他只能被他自己整除。

Answer 2

i=2时对不对