首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为( )。 Option Base 1 Private Sub fun(a()As Integer,n As Integer) ReDim Preserve a(6
在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为( )。 Option Base 1 Private Sub fun(a()As Integer,n As Integer) ReDim Preserve a(6
admin
2009-02-13
26
问题
在窗体上画一个按钮,然后编写如下的事件代码。在按钮上单击,输出为( )。 Option Base 1 Private Sub fun(a()As Integer,n As Integer) ReDim Preserve a(6) a(6)=a(1)*a(3)*a(5) n=UBound(a)End Sub Private Sub Command1_Click() Dim arr1()As Integer,k As Integer ReDimarrl(5) For i=1 To 5 arrl(i)=i Next i k=6 Call fun(arrl,k) Print arrl(1);arrl(k) End Sub
选项
A、1 3
B、0 0
C、1 15
D、0 15
答案
4
解析
当发生Command1_Click事件时,首先定义了一个可调数组arrl,接着重新定义它的长度为5,然后通过一个For循环给该数组元素arrl(1)~arrl(5)赋值1~5。给k赋值6,调用过程fun,把数组arrl按地址传递给形参数组a,把变量k按地址传递给形参变量n。在fun过程中重新定义了数组a的长度为6,并保持原来的值,给a(6)赋值为1*3*5,并通过Ubound函数求得该数组的下标上界并赋值给n,n的值为6。过程调用返回后,由于是按地址传递的,所以对形参数组a的修改就是对实参数组arrl的修改,对形参n的修改就是对实参k的修改,k的值为6。输出arrl(1)和arrl(6)的值分别为1和15。
转载请注明原文地址:https://kaotiyun.com/show/5E1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若有定义inta=2;则执行完语句a+=a-=a*a;后,a的值是()。
下列叙述中,错误的是
已知关系模式R(A,B,C,D),其函数依赖集F={A→B,B→CD,A→D},则下列函数依赖不成立的是()
一幅1024×768的彩色图像,其数据量达2.23MB左右,若图像数据没有经过压缩处理,则图像中的彩色是使用______二进制位表示的。()
Java的体系结构中,最下层是移植接口,上面一层是虚拟机,虚拟机的上层是Java基本类和______,它们都具有可扩展性。
变量属性是描述变量的作用域,按作用域分类,变量有局部变量、类变量、______和异常处理参数。
将具有相同属性和操作(方法)相似的一组对象称为()。
赋值表达式是由位于赋值运算符左边的变量和右边的________组成的。
算法的空间复杂度是指()。
随机试题
下列关于室内消火栓设备的布置要求中,说法错误的是()。
AlthoughtheUnitedStatescherishesthetraditionthatitisanationofsmalltownsandwideopenspaces,onlyoneineveryei
我国文房四宝中著名的“湖笔”产自()。
深化事业单位人事制度改革必须遵循的基本原则是:
学校教育制度(学制)(2019年北京师大、2018年华东师大、2016年东北师大、2016年福建师大、2015/2019年南京师大、2013/2014年西北师大、2012/2014/2016/2020年陕西师大、2011/2018年华中师大)
支持数据库各种操作的软件系统称为()。
It’sofficialthatmarriedpeoplearehealthier,oratleasttheythinktheyare.AnAmericansurveyof【C1】______100000people
Thefirstdaymynewteacherstoodinfrontoftheclass,Iburstintolaughter.RonClarkwasfromNorthCarolinaandhetalked
Duringrecentyearswehaveheardmuchabout"race":howthisracedoescertainthingsandthatracebelievescertainthingsand
Seariseasaresultofglobalwarmingwouldimmediatelythreatenthatlargefractionoftheglobelivingatsealevel.Nearlyo
最新回复
(
0
)