问题
填空题
在窗体上有一个命令按钮Command1，编写事件代码如下：
Private Sub Command1_Click()
Dim a(10)，P(3) As Integer
k=5
For i=1 To 10
a(i)=i * i
Next i
For i=1 To 3
P(i)=a(i * i)
Next i
For i=1 To 3
k=k+p(i) *2
Next i
MsgBox k
End Sub
打开窗体运行后，单击命令按钮，消息框中输出的结果是______。
答案
参考答案：201
解析： 本题考查的是VBA编程基础。经过第一个for循环，a(i)中a(1)～a(10)存的分别是1～10的平方。第二个循环后，p(i)中的p(1)存的是a(1)的值，p(2)中存的是a(4)的值，p(3)中存的是a(9)的值，经过最后一个循环之后，k的值应该为201。