问题
单项选择题
在窗体上面一个名称为Commandl的命令按钮，然后编写如下程序：
Option.Base 1
Private Sub Command1_Click()
Dim a As Variant
a=Array(1，2，3，4，5)
Sum = 0
For i = 1 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
程序运行后，单击命令按钮，在窗体上显示的内容是
A．1 2
B．1 2 3
C．3 4 5
D．4 5
答案
参考答案：D
解析： 本题主要考查考生对程序代码的阅读理解能力。用Array函数为数组a(5)赋值，其元素分别为1、2、3、4、5。第一个For i循环把a(i)数组中的元素逐个加到变量Sum上，然后求出Sum浮点除5的结果(为3)，赋值给变量x。第二个Fori循环表示当a(i)大于3时，则用Print语句输出该元素。据此，正确答案为D。