在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
Option Base 1
Private Sub Command1_Ctick()
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