首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下过程的功能是从数组中寻找最大值: Private Sub FindMax(a() As Integer,ByRef Max As Integer) Dim s As Integer,f As Integer Dim i As Integer s=LBo
以下过程的功能是从数组中寻找最大值: Private Sub FindMax(a() As Integer,ByRef Max As Integer) Dim s As Integer,f As Integer Dim i As Integer s=LBo
admin
2020-04-18
88
问题
以下过程的功能是从数组中寻找最大值:
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=sTof
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
解析
本题中定义了一个子过程FindMax,第一个形参是一个数组,第二个形参是一个整型值,所以调用此过程的实参也应该是一个数组和一个整型变量:存过程中遍历整个数组,首先让数组的第一个元素为最大值,然后依次用数组元素和Max进行比较,若其比Max大则令其成为新的最大值,所以For循环次数等于a数组的元素数,参数Max用于存放找到的最大值;子过程没有返回值,也无需增加一条返回最大值的语句FindMax=Max。
转载请注明原文地址:https://kaotiyun.com/show/2ZTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定Picturel和Textl分别为图片框和文本框的名称,则下列错误的语句是
在VisualBasic环境下设计应用程序时,系统能自动检查出的错误是
窗体上有1个名称为Textl的文本框;1个名称为Timerl的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timerl的事件过程如下:PrivateSubTimer1_Timer()Static
设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是
为了保存数据,需打开顺序文件“E:\UserData.txt”,以下正确的命令是
某人编写了下面的程序,希望能把Textl文本框中的内容写到out.txt文件中PPrivateSubCommandl_Click()Open”out.txt”ForOutputAs#2Print”Text1”
以下关于图片框、图像框的叙述中,正确的是
编写如下程序:PrivateSubCommand1Click()DimmAsInteger,nAsIntegexn=2Form=1To3
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
随机试题
求下列极限
PLC与计算机通信设置的内容是()。
引起出血性结肠炎的细菌是()
糖尿病酮症酸中毒治疗,补碱的指征是
A.做好检疫隔离、疫情预报、疫源地消毒、预防接种和个人防护B.防霉和防尘,加强个人防护和定期健康监护C.诱蛾、捉虫、杀虫,作业时注意个人防护D.治疗钩虫病患者,粪便封存无害化使用,穿鞋袜、长裤作业E.结合施肥消灭椎实螺,粪便无害化处理和个人
市场经济要有效地配制资源,必须要有商品市场和生产要素市场组成的健全的市场体系,商品和生产要素自由交换,自由流动,()则作为交换的工具。
Sometimeswehavespecificproblemswithourmother;sometimes,lifewithhercanjustbehardwork.Iftherearedifficultiesi
已知R3=0x80001000,R4=0x00A00010,执行ARM指令MOVR3,R4,LSL#8后,R3的值为()。
根据程序执行的局部性原理,若一条指令被执行,则在不久的将来,它可能被再执行是对______局部性的描述。
______enablesustoknowthepastandtouseitinpreparingforthefuture.
最新回复
(
0
)