在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click()Dim a(1 To 10)Dim p(1 To 3)k=5For i=1 To 10 a(i)=iNext iFor i=1 To 3 p(i)=a(i*i)Next iFor i=1 To 3 k=k+p(i)*2 Next i Print k End Sub 程序运行后,单击命令按钮,输出
主观题
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click()Dim a(1 To 10)Dim p(1 To 3)k=5For i=1 To 10 a(i)=iNext iFor i=1 To 3 p(i)=a(i*i)Next iFor i=1 To 3 k=k+p(i)*2 Next i Print k End Sub 程序运行后,单击命令按钮,输出