执行下面的程序，消息框的输出结果是______。
option Base 1
PrivateSubCommandl_Click()
Dima(10),P(3)As Integer
K=5
Fori=1 To 10
a(i)=i
Nexti
Fori=1 To 3
p(i)=a(i*i)
NextI
Fori=1 To 3
k=k+p(i)*2
Ncxti
MsgBoxk
End sub