在窗体上画一个名称为Command1的命令按钮,并编写如下程序代码: Private Const NUM As Integer = 10 Private Sub Command1_Click() Dim a As Integer, b As Int

admin2015-09-23  16

问题 在窗体上画一个名称为Command1的命令按钮,并编写如下程序代码:
Private Const NUM As Integer = 10
Private Sub Command1_Click()
    Dim a As Integer, b As Integer
    a = 1
    b = NUM
    Do Until b > NUM
        a = a * NUM
        b = b + 1
    Loop
    Print a
End Sub
则当程序运行时,单击Command1后,在窗体上的输出结果是(    )。

选项 A、10
B、1
C、21
D、100

答案A

解析 在"Do Until……Loop"循环中,先判断循环条件是否为"假",若条件为"假",则执行循环体语句;若条件为"真",则结束循环。本题中第一次判断循环条件语句b = 10,"b>NUM"为假,执行循环体语句"a=a*NUM:b=b+1"后,a=10,b=11。第一次循环结束;第二次循环开始前,先判断条件"b>NUM"为真,结束循环,所以最终a的值为10。故A选项正确。
转载请注明原文地址:https://jikaoti.com/ti/rJJ0FFFM
0

最新回复(0)