首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
如果存在如下过程: Private Function FMax(a( )As Integer) Dim First As Integer,Last As Integer,i As Integer First=LBound(A)Last=UB
如果存在如下过程: Private Function FMax(a( )As Integer) Dim First As Integer,Last As Integer,i As Integer First=LBound(A)Last=UB
admin
2009-01-15
60
问题
如果存在如下过程:
Private Function FMax(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 i
FMax=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=FMax(m)
Print c
End Sub
单击命令按钮,其输出结果为【 】。
选项
答案
100
解析
在程序Sub中定义了一个含4个元素的数组,并且分别给它们赋值,数组上界是4,下界为1;将数组m作为实参调用Fmax事件过程,并将数组m的地址传递给数组a,即此时数组a与m用一个存储空间;将数组的上界和下界分别赋给变量Last和First,在赋值表达式中分别调用了Lbound()函数求数组下界,及Ubound()函数求数组的上界;在循环语句中,变量的初始值为数组的下界为1,终值为数组的上界为4,循环体是一个条件语句,如果a(I)中的值大于Max,那么就将a(I)的值赋给Max,当循环结束后,将Max作为函数的返回值,所以此事件过程的功能即为求数组中的最大值。
转载请注明原文地址:https://kaotiyun.com/show/Vp2p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
已知有下列类的说明,则下列哪个语句是正确的? publicclassTest{ privatefloatf=1.0f; intm=1
下面是一个Applet程序,其功能是实现一个计数器,每隔0.15秒计数器数值加1,数值动态变化,并且能够控制计数器的暂停和继续。要求通过使用swing的构件建立图形用户界面,主要包括一个文本区域,用于显示计数器结果;两个按钮,一个使计数器暂停,一个使计数器
下列Aplication程序实现:从1到100的整数分别对35求余数,并根据不同余数(0,1,2,3时分别输出“余0”,“余1,”“余2”,“余3”,其他输出“其他”)输出相应信息。请将程序补充完整。publicclasstest18_2{
下述关于数据库系统的叙述中正确的是
【】是数据库设计的核心。
在AWT了组件中,为了实现单选按钮的功能,除了用到Checkbox组件以外,还需要用到下列哪个组件?
软件工程包括3个要素,分别为方法、工具和【】。
算法的时间复杂度是指
Java设计有______功能,这不仅防止了内存地址计算出错的问题,也省去了编程时对内存进行分配的烦恼。
随机试题
关于数字x线成像方法的叙述,错误的是
能产生白喉毒素的白喉杆菌,是因为其有
各类旅游用地评估,应注意()评价标准。
在资产负债表“负债及所有者权益”方填列的项目是()
对库存现金进行清查应该采用的方法是()。
甲公司拟在厂区内建造一幢新厂房,有关资料如下:(1)2015年1月1日向银行专门借款5000万元,期限为3年,年利率为6%,每年1月1日付息。(2)除专门借款外,甲公司还有两笔一般借款,分别为公司于2014年12月1日借入的长期借款1
X公司的主要产品为日用洗涤用品,其产品通过数十家批发商进入全国各地的市场,2000年X公司对这些批发商进行了顾客满意度调查。这些批发商属于X公司的_______。
WhydoesastudentmentiontheMonaLisa?
ThedevelopmentofJamestowninVirginiaduringthesecondhalfofthe17thcenturywascloselyrelatedtothemakinganduseof
A、Hedoesn’tlikeTomHanks.B、Hedoesn’tlikeYomCruises.C、Hedoesn’tlikeZeltaJones.D、Hedoesn’tlikelovemovies.B
最新回复
(
0
)