首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下过程的功能是从数组中寻找最大值: Private Sub FindMax(a()As Integer,ByRef Max As Integer) Dim s As Integer,f As Integer Dim i As
以下过程的功能是从数组中寻找最大值: Private Sub FindMax(a()As Integer,ByRef Max As Integer) Dim s As Integer,f As Integer Dim i As
admin
2015-08-13
38
问题
以下过程的功能是从数组中寻找最大值:
Private Sub FindMax(a()As Integer,ByRef Max As Integer)
Dim s As Integer,f As Integer
Dim i As Integer
s=LBound(a)
f=UBound(a)
Max=a(s)
For i=s To f
If a(i)>Max Then Max=a(i)
Next
End Sub
以下关于上述过程的叙述中,错误的是( )。
选项
A、语句Call FindMax(a,m)可以调用该过程,其中的a是数组,m是Integer类型变量
B、For循环次数等于a数组的元素数
C、过程末尾应该增加一条返回最大值的语句FindMax=Max
D、参数Max用于存放找到的最大值
答案
C
解析
过程定义语句中第1个参数是数组,调用是实参应该是一个数组变量或元素,第2个参数是整型变量。过程中LBound函数获取了数组下标的下限,UBound函数获取了数组下标的上限,在For i=s to f语句的循环中就可以访问数组中的各个元素。本过程是用Sub定义的过程不需要返回值。程序中找到的最大值由参数Max返回,因为它是按址传递的参数,它的值会带给实参。因此C选项的说法错误。
转载请注明原文地址:https://kaotiyun.com/show/JlQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在KeyPress事件过程中,KeyAscii是所按键的【】值。
对用MsgBox显示的消息框,下面______是错的。
在窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程:PrivatesubForm_Click()Open“d:\test\smtextl.txt”ForInputAs
下面关于标准模块的叙述中错误的是
(1)在考生文件夹下有一个工程文件sj3.vbp(相应的窗体文件名为sj3.frm),在窗体上添加一个名称为Listl的列表框和一个名称为Text1的文本框,如图42—4所示。编写窗体的MouseDown事件过程。程序运行后,如果用鼠标左键单击窗体,则从键
(1)在名称为Forml的窗体上画一个图片框,名称为Pieturel;一个垂直滚动条,名称为VScrolll;一个命令按钮,名称为Commandl,标题为“设置属性”。通过“属性”窗口在图片框中装入一个图形(文件名为Pic1.jpg,位于考生文件夹下),图
(1)在考生文件夹下有工程文件sj3.vbp及窗体文件sj3.frm,该程序是不完整的。在窗体上建立一个列表框、一个组合框和两个命令按钮。程序运行后,在列表框中选择所需要的项目,单击“导出”按钮,把所选择的项目移到组合框中。如果单击“导人”按钮,则把组合框
“年龄在14~25之间”这种约束是属于数据库当中的______。
下列关于源程序文档化的说法不适宜的是______。
一个项目具有一个项目主管,一个项目主管可管理多个项目,则实体"项目主管"与实体"项目"的联系属于【】的联系。
随机试题
公开募集基金的基金管理人应当建立董事、监事、高级管理人员和其他从业人员进行证券投资的申报、登记、审查、处置等管理制度,并报()备案。
可操作性强,能使一些模糊的概念精确化,使主观随意性的程度减弱,这是哪种评估的优点?()
确证感染最直接的方法
下列关于药物注射吸收的叙述中,正确的是
我国《民事诉讼法》规定的审限不包括下列哪些期间?()
广义的基金监管是指有法定监管权的()对基金市场、基金市场主体及其活动的监管。
根据《民事诉讼法》的规定,下列有关财产保全和先予执行的说法中不正确的有()。
账号:转账
近年来,PC机中出现了两种高速串行通信端口,它们是IEEE-1394和USB。USB目前有3种版本,其中速度最快的是______版。
•Youwillhearajobadvisortalkingaboutthejobofacashier.•Asyoulisten,forquestions1-12,completethenotesusingup
最新回复
(
0
)