单项选择题
在窗体上画一个名称为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)
Sun = 0
For i = Start To Finish
Sum = Sum + arr(i)
Next i
c = Sum/Finish
Text1.Text = c
End Sub
程序运行后,单击窗体,则在文本框中显示的内容是______ 。
A.40
B.10
C.12
D.16