单项选择题

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框，然后编写
如下事件过程：
Private Sub Command1_Click()
n = Val(Text1.Text)
For i = 2 To n
For j = 2 To Sqr(i)
If i Mod j=0 Then Exit For
Next j
If j＞Sqr(i)Then Print i
Next i
End Sub
该事件过程的功能是

点击查看答案&解析