在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click( ) Dim a As Variant

admin2009-02-13  24

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

答案8

解析 用Array函数为数组a(5)赋值,其元素分别为1、2、3、4、5。第一个 For i循环把a(i)数组中的元素逐个加到变量Sum上,然后求出Sum浮点除5的结果(为 3),赋值给变量x。第二个For i循环表示当a(i)大于3时,则用Print语句输出该元素。
转载请注明原文地址:https://jikaoti.com/ti/WY80FFFM
0

最新回复(0)