执行下面的程序,消息框的输出结果是______。 Option Base 1 P
题型:填空题
问题:
执行下面的程序,消息框的输出结果是______。
Option Base 1
Private Sub Command1_Click()
Dim a(10),p(3) As Integer
k=0
For i=1 To 10
a(i)=i
Next i
For i=1 To 5
p(i)=a(i*2)
Next i
For i=1 To 5
k=k+p(i)*a(i)
Next i
MsgBox k
End Sub