问题：
[单选] 有如下事件程序，运行该程序后输出结果是（ ）。PrivateSub Command33_click()
Dim x AsInteger，Y AsInteger
x=1：y=0
Do Untily<=25y=y+x*xx=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 . 输出其他结果
参考答案：C
参考解析：
简单的循环计算，可以逐次循环计算出结果。
有如下事件程序，运行该程序后输出结果是（ ）。 PrivateSub Co
有如下事件程序，运行该程序后输出结果是（ ）。 PrivateSub Command33_click()Dim x AsInteger，Y AsIntegerx=1：y=0Do Untily<=25y=y+x*xx=x+1LoopMsgBox”x=＆x＆”，y=&YEnd Sub
PrivateSub Command33_click()
Dim x AsInteger，Y AsInteger
x=1：y=0
Do Untily<=25y=y+x*xx=x+1
Loop
MsgBox”x=＆x＆”，y="&Y
End Sub
