阅读程序：
Option Base 1
Dim arr2() As Integer
Prtvate 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 b
arr2(i)＝CInt( 【15】 )
Next i
M=FindMax(arr2())
Print"最大值是："：M
End Sub
以上程序的功能是x在命令按钮事件过程中定义一个数组，把这个数组作为参数传送到通用过程PindMax，并返回该数组的最大值。请填空。
