Option Explicit
Dim i, j, T As Integer
Dim isSu As Boolean
Private Sub Form_Load()
Show
T = 0
For i = 3 To 100
isSu = True
For j = 2 To i ^ 0.5
If i Mod j = 0 Then isSu = False
Next j
If isSu = True Then
Print i;
T = T + 1
ElseIf T = 10 Then
Print
T = 1
End If
Next i
End Sub
我只帮做病毒 其他面谈 (*^__^*) 嘻嘻……! 不过我没黑过别人哦!!
你也太懒了吧,这都要问别人?
匿名要扣十分的,唉