编写如下程序: Private Sub Command l_Click() Dim x As Integer,y As Integer x=1:y=1 Do

admin2019-01-17  33

问题 编写如下程序:
    Private Sub Command l_Click()
           Dim x As Integer,y As Integer
           x=1:y=1
           Do
              y=x*y
              If y>10 Then
                   Exit Do
              Else
                   x=x+3
              End If
           Loop Until x<=10
           Print x;y
    End Sub
    程序运行后,单击命令按钮Commandl,输出结果为

选项 A、l 1   
B、4 1   
C、4 2
D、7 28

答案B

解析 Do型循环结构,首先看条件判断在循环体的前面还是后面,如果是先判断条件,则有可能一次也不执行循环体;如果是后判断条件,则无论条件是什么,至少执行一次循环体。在Until循环中条件为False时执行循环体,条件为True时退出循环;在While循环中条件为True时执行循环体,条件为False时退出循环。本题中使用的是后判断型循环,第一次循环时y的值为1,不满足y>10,执行Else分支,x变成4,此时由于满足x<=10所以结束循环。
转载请注明原文地址:https://jikaoti.com/ti/22m0FFFM
0

最新回复(0)