Private Sub Command1_Click() For i = 2 To 100 For j = 2 To i - 1 If i Mod j = 0 Then GoTo 20 Next j Print i 20 Next i End Sub 求1到100的素数 为什么gaoto之后一定要加一个二十啊，还有NEXT I之前也一定要加。。。
你这个语句其实就是个跳出循环的语句，我看这样写好像挺好 Private Sub Command1_Click() For i = 2 To 100 For j = 2 To i - 1 If i Mod j = 0 Then exit for Next j Print i Next i End Sub
