在窗体上有一个命令按钮Commandl,编写事件代码如下: Private SuB commandl_Click() Dim a(10),p(3)As Integer k=5 For i=1 To 10 a(i)=i+i Next i Fo

admin2010-04-21  24

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

选项

答案201

解析 题目考查循环操作,最后求得k值。程序中共有3处for循环。在第一个for循环,得到a(1)=1*l=l,a(2)=2*2=4,…,a(10)=10*10=100。在第二个for循环,得到p(1)=a(1*1)=l,p(2)=a(2*2)=a(4)=16,…,p(10)=p(10*10)。在第三个for循环,i等于1时,k;初始k+p(1)*2=5+1*2=7;i等于2时,k=k+p(2)+2=7+16*2=39;i等于3时,k=k+p(3)$2=39+81*2=201。
转载请注明原文地址:https://kaotiyun.com/show/JKwp777K
0

最新回复(0)