[單項選擇題] 在窗體上畫一個名稱為CoilTlilandl的命令按鈕，然后編寫如下事件過程：

Private Sub command1 Click()

Dim m As Integer， i As Integer， x(3)As Integer

For i=0 To 3：x(i)=i：Next i

For i = 1 To 2： Call sub1(x，i)：Next i

For i = 0 To 3： Print x(i)；： Next i

End Sub

Private Sub sub1(a()As Integer，k As Integer)

Dim i As Integer

Do

a(k)=a(k)+a(k+1)

j = j + 1

Loop While j ＜ 2

End Sub

程序運行后，單擊命令按鈕，則窗體上顯示的內(nèi)容是

A．0 3 7 5

B．0 1 2 3

C．3 2 4 5

D．0 5 8 3

D解析：[分析]： 數(shù)組也可以作為函數(shù)或者過程的參數(shù)，使用方法是直接使用數(shù)組名加括號，也可以直接使用數(shù)組名，采用sub1(x)和sub1(x())的調用形式都正確。變量i的作用只控制循環(huán)次數(shù)。