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

Private Sub Command33_Click()

D．im X As Integer，y As Integer

x=1：Y=0

D．o Until y<=25

y=y+X*X

X=X+1 ‘

Loop ’ 。

MsgBox“x一”＆X＆,“y=”＆y

E．nd Sub

A．x=1，y=0

B．x=4，y=25

C．x=5，y=30

D．输出其他结果

[单选题]（33）有如下事件程序，运行该程序后输出结果是Private Sub Command33_Click()D．im x As Integer,y As Integerx=1:y=0D．o Until y<=25y=y+x*xx=x+1LoopMsgBox "x="&x&",y="&yE．nd SubA．）x=1,y=0B．） x=4,y=25C．）x=5,y=30D．）输出其他结果

[主观题]有如下程序，该程序的执行结果是[ ]。Private Sub Command1_lick()F．or i= 1 To 4x= 4F．or j =1 To 3x =3F．or k=1 To 2X= K+5Next kNext jNext iPrint xE．nd Sub

[单选题]下面程序运行后的输出结果是______。Private Sub Command1_ Click ( ) for j = 1 To 10 if j Mod 3 ＜＞ 0 then a =a+j/3 Next j Print aEnd SubA．20B．10C．3D．9

[单选题]下列事件过程运行后输出结果是 Private Sub Command1_Click() Print Format$(123,456，"###,##%") End SubA．123.46%B．123.45%C．123.456%D．12345.6%

[单选题]下列事件过程运行后输出结果是Private Sub Command1_Click()Print Format$(123,456, "###,##%")E．nd SubA．123.46%B．123.45%C．123.456%D．12345.6%

[单选题]下列事件过程运行后输出结果是 Private Sub Command1_Click() Print Formats(123,456，"###,##%") End SubA．123.46%B．123.45%C．123.456%D．12345.6%

[单选题]下列程序段，运行后窗体上输出结果是( )。Private Sub Command1_Click()a=5:b=4:c=3:d=2x=3＞2*b Or a=c And b＜＞c Or c＞dPrintxE．nd SubA．1B．TrueC．FalseD．2

[单选题]下面程序运行后，输出结果是( )。 Private Sub mysub(b()As Integer,OptionalByValnAsInteger=2) ForI=1 to 4 b(I)=n*I NextI End Sub Private Sub Commandl_Click() Dima(1 to 4)As Integer，I As Integer Callmysub(a()，5) Mysuba() ForI=1 to 4 PrinA．5101520B．2468C．出错D．0000

[单选题]运行下列程序，结果是Private Sub Command32_Click()f0=1:f1=1:k=1D．o While k<=5f=f0+f1f0=flf1=fk=k+1LoopMsgBox“f=”＆fE．nd SubA．f=5B．f=7C．f=8D．f=13

[单选题]下列程序的运行结果是 ______。Private Sub Command1_ Click () a =1: b=1 for i = 1 To 3 a= a+ b: b=b+ a Next i Print a, bEnd SubA．6 6B．5 8C．13 21D．34 55