在考生文件夹下有一个工程文件stj4.vbp，相应的窗体文件为stj4.frm，其功能是通过调用过程FindMax求数组的最大值，请装入该文件，程序运行后，在四个文本框中各输入一个整数，然后单击命令按钮，即可求得数组的最大值，并在窗体上显示出来(如下图所示)。这个程序不完整，请把它补充完整，并能正确运行。
试题源程序：
1 Option Base 1
2 Private Function FindNax(a( )As Integer)
3 Dim Start As Integer
4 Dim Finish As Integer，i As Integer
5 ’Start=(a)
6 ’Finish=(a)
7 ’Max=(Start)
8 For i=Start To Flnlsh
9 ’If a(i)Nax Then Nax=
10 Next i
11 FindMax=Nax
12 End Function
13 Private Sub Command1_Click( )
14 Dim arr1
15 Dim art2(4)As Integer
16 arr1=Array(Val(Text1.Text)，Val(Text2.Text)，Val(Text3.Text)，Val(Text4.Text))
17 For i=1 To 4
18 arr2(i)=CInt()
19 Next i
20 ’M=FindUax()
21 Print"最大值是："；M
22 End Sub
