选择题 34.  有如下事件程序:
    Private Sub Command33_Click()
    Dim x As Integer, y As Integer
    x=1: y=0
    DoUntily<=25
    y=y+x*x
    x=x+1
    Loop
    MsgBox"x="&x&",y="&y
    End Sub
    运行该程序后输出结果是______。
【正确答案】 A
【答案解析】 Do Until…Loop循环结构是当条件为假时,重复执行循环体,直至条件表达式为真,结束循环。本题中循环条件是y=0<=25条件为真,即不执行循环体,所以x、y的值即为初始值。