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

admin2019-02-19  45

问题 运行下列程序,在立即窗口显示的结果是
    Private Sub Command0_Click()
    Dim I As Integer.J As Integer
    For I=2 To 10
    For J=2 To 1/2
    IfI 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/I8o0FFFM
0

最新回复(0)