有如下事件程序,运行该程序后输出结果是(  )。 PrivateSub Command33_click()Dim x AsInteger,Y AsIntegerx=1:y=0Do Untily<=25y=y+x*xx=x+1LoopMsgBox”x=&x&”,y=&YEnd Sub

2023-04-24

[单选] 有如下事件程序,运行该程序后输出结果是(  )。
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

参考解析:

简单的循环计算,可以逐次循环计算出结果。