运行下列程序,在立即窗口显示的结果是 Pfivate Sub Command0_Click() Dim IAs Integer,JAs Integer For I=2 To 10 For J=2 To I/2 If I mod J=0 Then Exit

admin2015-12-15  26

问题 运行下列程序,在立即窗口显示的结果是
Pfivate Sub Command0_Click()
Dim IAs Integer,JAs Integer
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

解析 根据题意,两个For执行的过程中,各变量的值如下所示:

由上表可知,当i为2、3、5、7时,在立即窗口中显示i的值。
转载请注明原文地址:https://jikaoti.com/ti/La20FFFM
0

最新回复(0)