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

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

admin2017-11-23  34
问题 在窗体上画一个名称为Command1的命令按钮，然后编写如下程序：
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)
Next i
    End Sub
    程序运行后，单击命令按钮，在窗体上显示的内容是
选项 A、12
B、123
C、345
D、45
答案D
解析 本题考查数组和循环。在Commandl的Cliek事件代码里面，定义了数组a，并通过Array函数给数组赋初值。接下来通过For循环计算数组元素的累加和Sum，得到累加和后x=Sum／5来计算平均值。最后通过For循环，打印大于平均值的元素。
转载请注明原文地址:https://jikaoti.com/ti/5hy0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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