[填空题] 在窗体上画一个命令按钮，然后编写如下事件过程:Private Sub Command1_ Click( ) Dim a(1 To 10) Dim p(1 To 3) k=5 For i =

[评析] 观察程序，通过第一个以i为循环变量的循环，给数组a()进行赋值，数组a()中的各个元素的值就是其下标值。通过第二个以i为循环变量的循环，给数组p()进行赋值：i=1，p(i)=a(i*i)，p(1)=a(1)=1i=2，p(i)=a(i*i)，p(2)=a(4)=4i=3，p(i)=a(i*i)，p(3)=a(9)=9通过第三个以i为循环变量的循环，得到变量k的值：i=1，k=k+ p(i)*2=5+p(1)*2=7i=2，k=k+ p(i)*2=7+p(2)*2=15i=3，k=k +p(i)*2=15+p(3)*2=33最终输出结果是：33。