选择题 39. 有如下事件程序，运行该程序后输出结果是______。
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="&y
End 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。