选择题
运行下列程序,立即窗口显示的结果是______。
Private Sub Command0_Click()
Dim I As Integer, J As Integer
For I=2 To 10
For J=2 To 1
If I mod J=0 Then Exit For
Next J
If J>sqr(I) Then Debug.Print I;
Next I
End Sub
【正确答案】
D
【答案解析】此题考查For循环,当I=2 To 10,步长默认为1,当If中判断I mod J=0,则继续执行,所以结果为2,同理可得输出的结果为2,3,5,7,所以答案选择D。