首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
执行下面的程序,消息框的输出结果是 【 】。 Option Basel Private Sub Commandl Click() Dim a(10),P(3)As Integer k=5 For i=1 To 1
执行下面的程序,消息框的输出结果是 【 】。 Option Basel Private Sub Commandl Click() Dim a(10),P(3)As Integer k=5 For i=1 To 1
admin
2009-05-20
66
问题
执行下面的程序,消息框的输出结果是 【 】。
Option Basel
Private Sub Commandl Click()
Dim a(10),P(3)As Integer
k=5
For i=1 To 10
a(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
选项
答案
33
解析
本题考查VBA中的数组与循环结构。题目中有3个循环,但相互之间并没有嵌套。第一个For循环实现向数组a赋初值,第二个For循环实现对数组a进行相关运算,然后赋给数组p,p(1)=a(1)=1,p(2)=a(4)=4, p(3)=a(9)=9。第三个For循环进行相关计算,然后把结果交给k,i=l时k=5+p(1)*2=7,i=2时k=7+p(2)*2=15,i=3时k=15+p(3)*2=33最后由MsgBox将结果输出。
转载请注明原文地址:https://kaotiyun.com/show/Vg5p777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有如下类定义:classBox{public:Box(inth,intw,intl):width(w),length(l),height(h){}private:
下列关于this指针的叙述中,错误的是()。
执行下列语句段后,输出字符"*"的个数是()。for(inti=50;i>1;i-=2)cout
常量4.2、4.2f、4L的数据类型分别是
使用VC++6.0打开考生文件夹下的源程序文件2.cpp。阅读下列函数说明和代码,补充空出的代码。函数DecToBin(char*des,intn)的功能是将十进制数据n转换成二进制数据,并将转换结果存放在des中。例如:58的二进制数据为11
关系的实体完整性要求关系中不能为空的属性是()。
在关系数据库中,用来表示实体间联系的是
有如下两个类定义:classXX{private:doublex1;protected:doublex2;public:
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是()。
一个工作人员可使用多台计算机,而一台计算机被多个人使用,则实体工作人员与实体计算机之间的联系是()。
随机试题
我国《行政诉讼法》规定“中级人民法院管辖本辖区内重大、复杂的案件”。其中“本辖区内重大、复杂的案件”主要指下列哪些案件?()
下列关于老年人使用降压药的说法正确的是
A、TC细胞B、TS细胞C、Th1细胞D、Th2细胞E、巨噬细胞分泌细胞因子,促进细胞免疫应答
下列关于常用的寻找潜在客户的方法,说法正确的是()。
串的长度是( )。
建立原型的目的不同,实现原型的途径就有所不同,指出下列不正确的类型()。
WhendoesthelastflightarriveatCleveland?WhydoesMrsCarpenterputoffherappointment?
Whatdoyoulookforinapotentialdate?Sincerity?Goodlooks?Character?Conversationalability?Askedto【C1】______suchquali
Whatisthepurposeoftheprogramthedeandescribes?
Althoughtheargumentswere______,Iwasnotconvinced.
最新回复
(
0
)