有如下事件程序,运行该程序后输出结果是 Private Sub Command33_Click() Dim XAs Integer,yAs Integer x=l:y=0 Do Until y<=25 y=y+x*x

admin2015-08-28  18

问题 有如下事件程序,运行该程序后输出结果是
  Private Sub Command33_Click()
    Dim XAs Integer,yAs Integer
    x=l:y=0
    Do Until y<=25
    y=y+x*x
    x=x+l
    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=0<=25条件为真,即不执行循环体,所以x、y的值即为初始值。
转载请注明原文地址:https://jikaoti.com/ti/LB20FFFM
0

最新回复(0)