问题
填空题
在窗体上有一个命令按钮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。