[填空题] 阅读程序：Option Base 1Dim arr2() As IntegerPrtvate Function FindMax(a()As Integer)As Integer Dim S

[填空题] 阅读程序：Option Base 1Dim arr2() As IntegerPrtvate Function FindMax(a()As Integer)As Integer Dim S

[填空题] 阅读程序：Option base 1Dim arr2() As IntegerPrtvate Function FindMax(a()As Integer)As Integer Dim Start As Integer Dim FlnlSh As Integer, i As Integer Start=LBound 【10】 Finish：UBound 【11】 Max＝ 【12】 For i=Start To Pinlsh If a (i)＞Max Then Max= 【13】 Next i FindMax=Max End Function Private Sub Commandl_Click() Dim arr1 arrl=Atray(12，435，76，24，78，54，866，43) b=UBound(arrl) Renm arr2( 【14】 )As Integer For i=1 TO barr2(i)＝CInt( 【15】 ) Next i M=FindMax(arr2()) Print"最大值是："：M End Sub 以上程序的功能是x在命令按钮事件过程中定义一个数组，把这个数组作为参数传送到通用过程PindMax，并返回该数组的最大值。请填空。

正确答案：

[10](a)

参考解析：

[11](a)[12]a(Start)或a(1)[13]a(i) 在FindMax功能函数中的Start变量和Finish变量分别用来表示数组下标的最小值和最大值。又Lbound函数、Ubound函数的格式为： Lbound(数组名[，维]) Ubound(数组名[，维]) 故[10]、[11]处应均填(a)。变量Max是用来存放数组中最大值的。首先应把数组的第一个元素初始化给Max，然后分别和剩下的元素进行比较，如果哪个元素比它大，就交换把这个元素的值给Max，直到最后。这是经常见到的求最值的方法。因为程序的首部有 Option base 1，故数组的下标从1开始，[12]处可以填a(Start)或a(1)。根据if语句的条件表达式，可知[13]处应填a(i)。[14]b[15]arrl(i)