首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下通用过程: Public Sub Fun(a( )As Integer,x As Integer) For i=1 TO 5 x=x+a(i)
设有如下通用过程: Public Sub Fun(a( )As Integer,x As Integer) For i=1 TO 5 x=x+a(i)
admin
2013-01-23
34
问题
设有如下通用过程: Public Sub Fun(a( )As Integer,x As Integer) For i=1 TO 5 x=x+a(i) Next End Sub 在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮。然后编写如下的事件过程: Private Sub Command1_Cliek( ) Dim arr(5) As Integer,n As Integer For i=1 To 5 arr(i)=i+i Next Fun arr,n Text1.Text=Str(n) End Sub 程序运行后,单击命令按钮,则在文本框中显示的内容是
选项
A、30
B、25
C、20
D、15
答案
1
解析
本题需先对通用过程分析Fun(a( )As Integer,x As,Integer)的功能,该通用过程是将数组的a(1)到a(5)的和返回,arr(5)的各个元素a(1)到a(5)的值分别为2、4、6、8、10,所以其和为30。
转载请注明原文地址:https://kaotiyun.com/show/UAhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为“计算机等级考试”。以下能实现上述操作的事件过程是
下列关于队列的叙述中正确的是
把窗体的KeyPreview属性设置为True,并编写如下两个事件过程:PrivateSubFor_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintKeyCode
可通过“字体”对话框的()属性获得用户选定的字体。
类是具有共同属性、共同操作方法的对象的集合,所以类是对象的【】。
删除列表框中指定的项目所使用的方法为
工程文件的扩展名是
软件测试是由一系列的测试所组成,而其最基本的测试是【】。
在窗体中添加一个名称为Lablel1的标签、两个名称为Text1和Text2的文本框以及名称为Command1的按钮。程序运行后,在两个文本框中输入数据,当单个按钮时,标签Label1中显示运算的结果。程序的功能是计算,n!+(n+1)!+(n+2)!+…
软件动态测试大致可以分为【】测试法和黑盒测试法
随机试题
某化工厂对1162名工人的体检结果如下表,下列说法正确的是
陈某在抢劫时造成被害人重伤,法院以抢劫罪判处陈某有期徒刑15年,并处罚金5万元,赔偿被害人经济损失5万元。经查,陈某个人财产只有8万元,对本判决的财产部分应当如何执行?( )
岩石具有在静载作用下随时间推移而出现强度降低的现象,故有特殊要求的建筑岩质边坡宜作()。
我国城市规划的行政机制的法理基础是()。
制造费用明细账一般采用()进行明细核算。(2012年真题题库)
某铜矿开采企业为增值税一般纳税人,2008年9月生产经营情况如下:采用直接收款方式销售铜矿石5000吨,不含税单价30元/吨;将开采、收购的铜矿原矿各1000吨加工成钢锭,本月将加工铜锭的10%对外投资并承担投资风险;将加工铜锭的60%出售,取得不含税销售
甲公司是我国一家大型汽车生产企业,该公司拥有强大的研发能力和较强的产品设计能力,以及很强的市场营销能力。2018年该公司进入非洲一国家,经过调研,发现该国消费者对于汽车需求多样化。根据以上信息可以判断,适合甲公司实施的战略类型是()。
已知平面上三条直线的方程为l1:ax+2by+3c=0,l2:bx+2cy+3a=0.l3:cx+2ay+3b=0.试证这三条直线交于一点的充分必要条件为a+b+c=0.
Scientistshavediscoveredapowerfulantibioticinthebloodstreamofgiantpandasthatcandestroybacteria.TheChineserese
ThepurposeoftheauthorinwritingthistextistoThephrase"current’accommodative’monetarystance"(Para.3)denotes
最新回复
(
0
)