单项选择题

在窗体上面一个名称为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