首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: Option Base 1 Sub P(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Prirate Sub Form_Click() Dim a(4)As Integer For i=
阅读程序: Option Base 1 Sub P(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Prirate Sub Form_Click() Dim a(4)As Integer For i=
admin
2019-06-11
27
问题
阅读程序:
Option Base 1
Sub P(b()As Integer)
For i=1 To 4
b(i)=2*i
Next i
End Sub
Prirate Sub Form_Click()
Dim a(4)As Integer
For i=1 To 4
a(i)=i+4
Next 1
P a
For i=1 To 4
Print a(i)
Next i
End Sub
运行上面的程序,单击窗体,输出结果为
选项
A、2
4
6
8
B、5
6
7
8
C、10
12
14
16
D、4
8
12
16
答案
A
解析
Form_Click过程中首先对a数组用For循环赋值。然后调用过程P。注意P参数传递是引用传递,因此数组a的元素值在执行p过程后会被改变。之后的For输出变量值是过程P中对数组元素的赋值。选A。
转载请注明原文地址:https://kaotiyun.com/show/NDUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在名称为Forml的窗体上添加一个名称为Label1、标题为“滚动条控件”的标签,一个名称为HScroll1的水平滚动条。请通过属性窗口设置属性使水平滚动条取值范围的最大值为100,最小值为1,滚动条的高度为300,宽度为3000,滚动块的初始位置为20。
以下变量名中合法的是()。
下面可以作为软件需求分析工具的是()。
若在窗体模块的声明部分声明了如下自定义类型和数组:PrivmeTyperecCodeAsIntegerCaptionAsStringEndTypeDimarr(5)Astee则下
耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是()。
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是()。
下列叙述中正确的是()。
程序运行时,要清除图片框Picturel中的图像,应使用语句()。
在学生管理的关系数据库中,存取一个学生信息的数据单位是
下列队列的描述中,正确的是()。
随机试题
用天然气置换空气阶段是最危险的时间,因此置换速度一定要慢,按规定用氮气进行置换。()
A、碱洗B、水洗C、酸洗D、盐洗E、纯水煮沸效率较高的清洗方法是
A.<6个月的婴儿无热性支气管肺炎应考虑B.年长儿发热、咳嗽,同时伴有其他器官受累,中毒症状不重,应考虑C.新生儿及婴幼儿多见,肺部体征出现早,中毒症状重,应考虑D.6个月以内婴儿多见,中毒症状不明显,胸片以气肿改变为主,应考虑E.6~2
创伤 的X线表现为
【2003年第2题】如图3—3所示平面内平衡力系中,P3的正确数值是多少?(与图中方向相同为正值,反之为负值)
某建筑采用筏形基础底面尺寸为10m×20m,底面压力为220kPa,基础底面下设300mm褥垫层,基础埋深2.0m,勘察资料如下:I.0~10m,淤泥质土,γ=19.5kN/m3,qsk=7kPa,fak=80kPa,Es=8.8MPa;Ⅱ.10~20
某远洋运输企业2004年3月发生以下经营业务:为A公司出口货物提供运输业务,取得运输收入456000元、装卸费4000元、货物保鲜费8000元;将5号远洋运输船舶以“期租”方式出租给A公司,租期1年,3月份收取租金250000元;将8号远洋运输船舶以“光租
某企业2008年有关会计资料如下:(1)年度会计利润总额为180万元;(2)全年销售收入为1200万元;(3)“管理费用”中列支的业务招待费30万元,广告费和业务宣传费480万元;(4)“营业外支出”中列支的税收罚
城市因水而生,因水而兴,因水而美。我们可以列举湖泊给城市带来的一系列好处,比如人工湖的修建对于改善人居环境,改善生态环境,治水治内涝等方面都能起到积极作用。但是,人工湖是不是越多越好、越大越好,大规模开挖人工湖是否会加重财政负担,政府这样大手笔的投入,到底
Giventhechoicebetweenspendinganeveningwithfriendsandtakingextratimeforhisschoolwork,AndyKliseadmitshewouldp
最新回复
(
0
)