首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
如果存在如下过程: Private Function Fun( a( ) As Integer) Dim First As Integer, Last As Integer, i As Integer First
如果存在如下过程: Private Function Fun( a( ) As Integer) Dim First As Integer, Last As Integer, i As Integer First
admin
2010-03-30
27
问题
如果存在如下过程:
Private Function Fun( a( ) As Integer)
Dim First As Integer, Last As Integer, i As Integer
First = LBound(a)
Last=UBound (a)
Max = a(First)
For i=First To Last
If a(i)>Max Then Max =a(i)
Next
Fun=Max
End Function
在窗体上添加一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
ReDim m(1 To 4) As Integer
m(1) =20: m(2) =30: m(3) =50: m(4) =100
c =Fun(m)
Print c
End Sub
单击命令按钮,其输出结果为【 】。
选项
答案
100
解析
在程序Sub中定义了一个含4个元素的数组,并且分别给它们赋值,数组上界是4,下界为1;将数组m作为实参调用Fmax事件过程,并将数组m的地址传递给数组a,即此时数组。与m用一个存储空间;将数组的上界和下界分别赋给变量Last和First,在赋值表达式中分别调用了LBound()函数求数组下界,及 UBound()函数求数组的上界;在循环语句中,变量的初始值为数组的下界为1,终值为数组的上界为4,循环体是一个条件语句,如果a(i)中的值大于Max,那么就将 a(i)的值赋给Max,当循环结束后,将Max作为函数的返回值,所以此事件过程的功能即为求数组中的最大值。
转载请注明原文地址:https://jikaoti.com/ti/AOg0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列说法中错误的是()。
下列程序创建了一个线程并运行,请在下划线处填入正确代码。 publicclassTryextendsThread{ publicstaticvoidmain(Stringargs[]){ Threadt=newTry();
下列选项中属于字符串常量的是
Java的反汇编命令是
若有如下程序:publicclassTest{publicstaticvoidmain(String[]args){intx=20;if(x>10)System.out.print(x-=5);if(x>5)Syste
使用如下( )保留字可以使只有在该类的包中的其他类才能访问该类。
开发软件所需高成本和产品的低质量之间有着尖锐的矛盾,这种现象称作( )。
在先左后右的原则下,根据访问根结点的次序,二叉树的遍历可以分为三种:先序遍历、【】遍历和后序遍历。
树中度为零的结点称为______。
对长度为n的线性表进行顺序查找,在最坏情况下需要比较的次数为()。
随机试题
可用于亲水性凝胶骨架片的材料为
男性,37岁,上腹不适、反酸,嗳气5年,反复发作恶心、呕吐3个月,呕吐物为宿食,不含胆汁,体重减轻4kg。查体,上腹部饱满、无压痛及反跳痛,未触及肿物;移动性浊音(-),振水音(+)。初步纠正患者的电解质紊乱和酸碱代谢失衡以后,最适宜的治疗方案是
患者,女,28岁。近日感外阴瘙痒、阴道分泌物增多。妇科检查:白带呈豆腐渣样,阴道黏膜红肿并附有白膜。考虑感染的病原体是
唾液腺黏液囊肿好发于
老李在市区有一套房子,在郊区有一套房子。2016年8月,老李因病住院,不久病情恶化,老李在抢救时立下口头遗嘱,由三名护士在场见证。市区房子和存款由儿子李刚继承,郊区房子由妹妹李玲继承。后不幸抢救失败,老李死亡。李刚继承市区房子和遗产后,因其原先在市区已经有
建设单位的下列行为中,违反《建设工程质量管理条例》规定的是()。
1998年—2002年,我国出现通货紧缩的经济形势,为反通货紧缩,我国采取相应的宏观调控措施,使经济从2003年开始至今出现良好的发展势头。根据以上材料回答下列问题:治理通货紧缩的货币政策措施主要有()等。
工商行政管理的对象是()。
Whataretheytalkingabout?
Whatisthenameoftheadvertiser?Howlongwilltheemploymentlast?
最新回复
(
0
)