（33）有如下事件程序，运行该程序后输出结果是Private Sub Command33_Click（)Dim x As Integer,y A

（33）有如下事件程序，运行该程序后输出结果是

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）输出其他结果

请帮忙给出正确答案和分析，谢谢！