单选题有如下事件程序，运行该程序后输出结果是 Private Sub Command3 3 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=0<=25条件为真，即不执行循环体，所以x、y的值即为初始值。