2. 计算机
  3. 以下过程的功能是从数组中寻找最大值： 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

admin2019-06-11  47
问题 以下过程的功能是从数组中寻找最大值：
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
解析 本题中定义了一个子过程FindMax，第一个形参是一个数组，第二个形参是一个整型值，所以调用此过程的实参也应该是一个数组和一个整型变量；在过程中遍历整个数组，首先让数组的第一个元素为最大值，然后依次用数组元素和Max进行比较，若其比Max大则令其成为新的最大值，所以For循环次数等于a数组的元素数，参数Max用于存放找到的最大值：子过程没有返回值，也无需增加一条返回最大值的语句FindMax=Max。
转载请注明原文地址:https://www.kaotiyun.com/show/CDUp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)