单选题 在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base1 Private Sub Command1_Click() Dim a As Variant a=Array(1,2,3,4,5) Sum=0 For i=l To 5 Sum=Sum+a(i) Next i x=Sum/5 For i=1 To 5 If a(i)>x then Print a(i) Next i End Sub 程序运行后,单击命令按钮,在窗体上显示的内容是
【正确答案】 D
【答案解析】解析:本题考查数组和循环。在Command1的Click事件代码里面,定义了数组a,并通过Array函数给数组赋初值。接下来通过For循环计算数组元素的累加和Sum,得到累加和后x=Sum/5来计算平均值。最后通过For循环,打印大于平均值的元素。