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

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

admin2018-09-19  46
问题 在窗体上画一个命令按钮(Name属性为Commandl)，然后编写如下事件过程：
    Private Sub Command 1_Click()
    Dim a(10)As Interger，p(3)As Interger
    K=5
    For i=l To 10
    a(i)=i
    Nexti
    For i=1 To 3
    p(i)=a(i*i)
    Next i
    For i=1 To 3
    k=k+p(i)*2
    Next i
    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://www.kaotiyun.com/show/LIFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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