选择题   运行下列程序,立即窗口显示的结果是______。
    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。