选择题 13.  有如下事件程序，运行该程序后输出结果是______。
    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
【答案解析】 该结构当Do Until后的条件表达式为假时，重复执行循环体，直至条件式值为真，结束循环。在本题中，初始条件式值为真，该程序不执行循环体即结束。程序结束运行时，变量x和y的值仍为其初值。