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

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

admin2017-06-21  17
问题 在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：
    Option Base 1
    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)
       Net 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/KPGp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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