有如下事件程序，运行该程序后输出结果是Private Sub Command33_Click（)Dim X As Integer，y As In

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

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