如下程序,运行的结果是( )PrivateSubForm_Click()DimmAsInteger,IAsInteger,x(10)AsInteg

8 查阅

如下程序,运行的结果是( )

PrivateSubForm_Click()

DimmAsInteger,IAsInteger,x(10)AsInteger

ForI=0to4

x(I)=I+1

NextI

ForI=1to2

Callproc(x)

NextI

ForI=0to4

Printx(I);

NextI

EndSub

PublicSubproc(a()AsInteger)

StaticIAsInteger

Do

a(I)=a(I)+a(I+1)

I=I+1

LoopWhileI<2

EndSub

A.34756

B.35745

C.23445

D.45678