单击一次命令按钮后，下列程序的执行结果为

Private Sub Command1_Click()

D．im m As Integer，I As Integer，x(10) As Integer

F．or I=0 To 4：x(I)=I+1：Next I

F．or I=1 TO 2：Call Prioc(x)：Next I

F．or I=0 TO 3：Print x(I)；：Next I

E．nd Sub

Private Sub Prioc(a()As Integer)

Static I As Integer

D．o

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

I=I+1

Loop While I＜2

E．nd Sub

A．3 4 7 5

B．3 5 7 4

C．1 2 3 4

D．1 2 3 5