在窗体上面一个名称为Commandl的命令按钮,然后编写如下程序: Option.Base 1 Private Sub Command1_Click() Dim a As Variant a=Array(1,2,3,4,5

admin2010-03-30  22

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

答案8

解析 本题主要考查考生对程序代码的阅读理解能力。用Array函数为数组a(5)赋值,其元素分别为1、2、3、4、5。第一个For i循环把a(i)数组中的元素逐个加到变量Sum上,然后求出Sum浮点除5的结果(为3),赋值给变量x。第二个Fori循环表示当a(i)大于3时,则用Print语句输出该元素。据此,正确答案为D。
转载请注明原文地址:https://jikaoti.com/ti/jXg0FFFM
0

最新回复(0)