选择题 6.  在窗体上画一个名称为Text1的文本框,并编写如下程序:
    Option Base 1
    Private Sub Form_Click()
    Dim arr
    Dim Start As Integer, Finish As Integer
    Dim 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
【答案解析】 程序中将变量arr初始化为有4个元素的数组,使用LBound和UBound函数分别获取数组下标的上下限,然后将数组中的元素值相加,用整除运算求它们的平均值。算式可写为(12+4+8+16)/4=(40)/4=10。所以答案为B。