单选题
在窗体上画一个名称为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
程序运行后,单击窗体,则在文本框中显示的内容是______ 。