2. 计算机
  3. 在窗体上有一个命令按钮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

在窗体上有一个命令按钮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  56
问题 在窗体上有一个命令按钮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
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)