填空题

执行下面的程序，消息框的输出结果是______。
Option Base 1
Private Sub Command1_Click()
Dim a(10),p(3) As Integer
k=0
For i=1 To 10
a(i)=i
Next i
For i=1 To 5
p(i)=a(i*2)
Next i
For i=1 To 5
k=k+p(i)*a(i)
Next i
MsgBox k
End Sub

点击查看答案&解析