[单项选择题] 设有如下程序：Option Base 1Private Sub Command1

[单项选择题] 设有如下程序：Option base 1Private Sub Command1_Click( )Dim a(10) As IntegerDim n As Integern=InputBox(“输入数据”)If n<10 ThenCall GetArray(a，n)End IfEnd SubPrivate Sub GetArray(b( )As Integer，n As Integer)Dim c(10) As Integerj=0For i=1 To nbb(i)=CInt(Rnd( )*100)If b(i)/2=b(i)2 Thenj=j+1c(j)=b(i)End IfNextPrint jEnd Sub以下叙述中错误的是（ ）。

A．数组b的偶数被保存在数组c中

B．程序运行结束时，在窗体上显示的是c数组中元素的个数

C．GetArray过程的参数n是按值传送的

D．如果输入的数据大于10，则窗体上不显示任何信息

C