[填空题] 阅读程序： Sub p(b( ) As Integer) For i=1 To 4 b(i)=2*i Next i End 5ub Private Sub Command1_C1

[填空题] 阅读程序：

Sub p(b( ) As Integer)

For i=1 To 4

b(i)=2*i

Next i

End 5ub

Private Sub Command1_C1ick( )

Dima(1 To 4)As InteSer

a(1)=5

a(2)=6

a(3)=7

a(4)=8

caU p(a)

For i=1 To 4

Pdnt a(i)

Next i

End Sub

运行上面的程序，单击命令按钮，输出结果为【15】。