假定有如下程序: Private Sub Form_Click() Dim N As Integer, J As Integer N = 0 J = 1 Do Until N > 2 N = N + 1

admin2020-07-22  26

问题 假定有如下程序:
Private Sub Form_Click()
    Dim N As Integer, J As Integer
    N = 0
    J = 1
    Do Until N > 2
        N = N + 1
        J = J + N * (N + 1)
    Loop
    Print N; J
End Sub
运行程序,单击窗体,输出结果是

选项 A、3  21
B、3  7
C、0  1
D、3  13

答案A

解析 Do Until…Loop语句在条件满足的前提下会一直执行中间的循环语句。N的初值为0,因此循环会执行3次。在循环体内N每次被加1。因此结束时N=3。同样的方法可算出J=21。选A)。
转载请注明原文地址:https://jikaoti.com/ti/uBS0FFFM
0

最新回复(0)