数组问题?
option base 1
private sub command1_click()
k = 5
for i = 1 to 10
      a(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

print k
end sub
请问编写以上代码后，转出的结果为多少？详细说明一下动行的过程？

33啊

a(1)=1.........a(10)=10
p(1)=a(1)=1
p(2)=a(2*2)=a(4)=4
p(3)=a(3*3)=a(9)=9
关键：   for i = 1 to 3
        k = k +p(i)*2
        next i
i=1  k=k+2p(1)
i=2 k=k+2P(1)+2p(2)
i=3 k=k+2p(1)+2p(2)+2p(3)=5+2(1+4+9)=33
应该是这样的

2p(1)应该是2*p(1)  我省略了，应该不能省略

谢谢了！我一直都看不明白第三个循环，现在明白了。

共同进步