2. 计算机
  3. 在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Option Base1 Private Sub Commandl_Click() Dim a As Variant a=Array(1，2，3，4，5)

在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序： Option Base1 Private Sub Commandl_Click() Dim a As Variant a=Array(1，2，3，4，5)

admin2020-04-18  51
问题 在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：
    Option Base1
    Private Sub Commandl_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、12
B、123
C、345
D、45
答案D
解析 本题考查数组和循环。在Commandl的Click事件代码里面，定义了数组a，并通过Array函数给数组赋初值。接下来通过For循环计算数组元素的累加和Sum，得到累加和后x=Sum／5来计算平均值。最后通过For循环，打印大于平均值的元素。
转载请注明原文地址:https://kaotiyun.com/show/UZTp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)