编写如下事件过程：optionBAsE 1privAtE suB FormCliCk()Dim x1()As intEgErDim iAs intEgErDim sAs intEgEr rEDim x1(3) For i = 1 to uBounD(x1) x1(i)=i + 1 nExt iCAll suB1(x1) For i = 1 to uBounD(x1) s = s + x1(i) nExt i print s EnD suBprivAtE suB suB1(n()As intEgEr)Dim iAs intEgEr rEDim prEsErvE n(5) For i = 3 to 5 n(i)=n(i-1)*2 nExt i EnD suB程序运行后，单击窗体，则窗体上显示的内容是
A、6
B．12
C、24
D、47