单选题 在窗体上画一个名称为Text1的文本框,并编写如下程序:Option Base 1Private Sub Form_Click() Dim arr Dim Start As Integer,Finish As Integer Sum As Integer arr=Array(12,4,8,16) Start=LBound(arr) Finish=UBound(arr) Sum=0 For i=Start To Finish Sum=Sum+arr(i) Next i c=Sum/Finish TeXt1.Text=c End Sub运行程序,单击窗体,则在文本框中显示的是
【正确答案】 B
【答案解析】解析:本题中变量Start存放的是数组的下界,Finish存放数组的上界,因此For循环将遍历整个数组:在每次循环中将数组元素累加到累加和变量Sum中,循环结束后用累加和变量除以数组上界,由于数组下界从0开始,即求出数组平均值。