问题详情

执行下面的程序，消息框的输出结果是______。
optionBase1
PrivateSubCommandl_Click()
Dima(10),P(3)AsInteger
K=5
Fori=1To10
a(i)=i
Nexti
Fori=1To3
p(i)=a(i*i)
NextI
Fori=1To3
k=k+p(i)*2
Ncxti
MsgBoxk
Endsub请帮忙给出正确答案和分析，谢谢！