问题
单项选择题
在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
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)＞xThen 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。第二个For i循环表示当a(i)大于3时，则用Print语句输出该元素。