单选题
有如下事件程序,运行该程序后输出结果是( )。Private Sub Command33_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=" & yEnd Sub
A、
x=1, y=0
B、
x=4, y=25
C、
x=5, y=30
D、
输出其他结果
【正确答案】
A
【答案解析】
解析:Do Until循环采用的是先判断条件后执行循环体的做法,如果条件为True,则循环体一次都不执行。否则进入循环体执行。本题中的循环停止条件是y<=25,而y=0,满足条件表达式,则不进入循环体,x、y的值不变,仍为1、0。
提交答案
关闭