运行下列程序,在立即窗口显示的结果是 Private Sub CommandO Click() Dim IAs Integer,JAs Integer For I=2 To 10 For J=2 To I/2 I

admin2017-06-22  34

问题 运行下列程序,在立即窗口显示的结果是
    Private Sub CommandO Click()
    Dim IAs Integer,JAs Integer
    For I=2 To 10
    For J=2 To I/2
      If I raad J=0 Then Exit For
    Next J
    IfJ>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/N020FFFM
0

最新回复(0)