2. 计算机
  3. 在窗体上画一个命令按钮(Name属性为Commandl)，然后编写如下事件过程： Private Sub Command l_Click( ) Dim a(10)As Interger，p(3)As Interger K=5 For i=1 To

在窗体上画一个命令按钮(Name属性为Commandl)，然后编写如下事件过程： Private Sub Command l_Click( ) Dim a(10)As Interger，p(3)As Interger K=5 For i=1 To

admin2013-10-06  49
问题 在窗体上画一个命令按钮(Name属性为Commandl)，然后编写如下事件过程：
Private Sub Command l_Click(     )
Dim a(10)As Interger，p(3)As Interger
K=5
For i=1 To 10
a(i)=i
Next i
For i=l To 3
p(i)=a(i*i)
Next i
For i=l To 3
k=k+p(i)*2
Nexti
Printk
End Sub
程序运行后，单击命令按钮，输出结果是(     )。
选项 A、35
B、28
C、33
D、37
答案C
解析 题中第一个循环功能是给数组a赋值，即a(1)=1、即a(2)=2…；第二个循环功能是给数组p赋值，即p(1)=1、即p(2)=4、即p(3)=9；第三个循环是求K的值，即是将K值加上数组P所有元素的值，所以K=K+p(1)*2+p(2)*2+p(3)*2=33。
转载请注明原文地址:https://kaotiyun.com/show/khQp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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