填空题
在窗体上有一个命令按钮Commandl,编写事件代码如下:
Private Sub Command1_Click1
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
打开窗体运行后,单击命令按钮,消息框中输出的结果是【10】。