有如下事件程序,运行该程序后输出结果是 Private Sub Command0_Click() Dim x As Integer,y As Integer x=1:y=0 Do Until y

admin2017-10-24  40

问题 有如下事件程序,运行该程序后输出结果是
    Private Sub Command0_Click()
    Dim x As Integer,y As Integer
    x=1:y=0
    Do Until y<=25
    y=y+x*x:x=x+1
    Loop
    MsgBox"x="&x&",y="&y
    End Sub

选项 A、x=1,y=0
B、x=4,y=25
C、x=5,y=30
D、输出其他结果

答案A

解析 在Do Until…Loop循环结构中,只有当循环条件语句为“假”时,才执行循环体语句,如果循环条件语句为“真”,则结束循环。本题中变量y的值为1,循环条件语句“y<=25”为“真”,所以本题中的循环语句一次也不会执行,最终x和y的值不会发生变化,所以选项A正确。
转载请注明原文地址:https://jikaoti.com/ti/0J10FFFM
0

最新回复(0)