在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base1 Private Sub Command1_Click( ) Dim a As Variant a=Array(1,2,3,4,5) Sum=0 For i=1To 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
A.1 B.1 C.3 D.4
【参考答案】
D 解析:此题中第一个For循环是将数组中所有元素相加并且将结果赋值给Sum,sum=15,而变量x=3,第二个......