试题35运行下列程序 在立即窗口显示的结果是（）Private Sub Command0_Click（)Dim I As Single J
试题,窗口,程序
已帮助 人
试题35
运行下列程序，在立即窗口显示的结果是（）
Private Sub Command0_Click()
Dim I As Single ， J As Single
For I= 2 To 10
For J = 2 To I/2
If I mod J = 0 Then Exit For
Next J
If J > sqr (I) Then Debug .Print I;
Next I
End Sub
A．1 5 7 9
B．4 6 8
C．3 5 7 9
D．2 3 5 7
-
参考答案：D试题35分析If I mod J = 0 Then Exit For语句的功能是当I能被J除断的时候推出循环，I=2，J=2，I/2=1，J从2到1，不满足条件，退出；执行If J > sqr (I) Then Debug .Print I；因为J> sqr (I)，所以Then Debug .Print I ，此时I=2,；I=3，I/2=1.5，打印输入I；I=4，I mod J = 0。退出for循环，但J > sqr (I)也不成立；I=5，J=3，J > sqr (I)成立，输出5．．．。试题35答案D