[問答題] 在考生文件夾下有一個工程文件sjt4.vbp(相應的窗體文件名為sjt4.frm)，其功能是通過調用過程Average求數(shù)組的平均值，請裝入該文件。程序運行后，在4個文本框中各輸入一個整數(shù)，然后單擊命令按鈕，即可求出數(shù)組的平均值，并在窗體上顯示出來(如下圖所示)。這個程序不完整，請把它補充完整，并能正確運行。要求：去掉程序中的注釋符，把程序中的“”改為正確的內容，使其實現(xiàn)上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盤。[試題源程序]1 Option Base 12 Private Function Average(a( )As Integer)As Single3 Dim Start As Integer，F(xiàn)inish As Integer4 Dim i As Integer5 Dim Sum As Integer6 ’Start=(a)7 ’Finish=(a)8 ’Sum=9 For i=Start To Finish10 ’Sum=Sum+11 Next i12 ’Average=13 End Function1415 Private Sub Command1_Click( )16 Dim arr117 Dim arr2(4)As Integer18 arr1=Array(Val(Text1.Text)，Val(Text2Text)，Val(Text3.Text)，Val(Text4.Text))1920 For i=1 To 421 arr2(i)=CInt(arrl(i))22 Next i23 ’Aver=Average()24 Print "平均值是："；Aver25 End Sub

第一步：啟動Visual Basic，打開考生文件夾下的工程文件sjt4.vbp。第二步：雙擊窗體中的命令按鈕，進入代碼編輯窗口，對確定按鈕的單擊事件進行代碼編輯如下：1 Option Base 12 Private Function Average(a( )A0Integer)As Single3 Dim Start As Integer，F(xiàn)inishAs Integer4 Dim i As Integer5 Dim Sum As Integer6 Start=LBound(a)7 Finish=UBo

使用LBound函數(shù)來返回數(shù)組的指定維數(shù)的最小可用下標，使用UBound函數(shù)確定數(shù)組的指定維數(shù)的最大可用下標。