2. 计算机
  3. 在窗体上画一个名称为Textl的文本框，并编写如下程序： Option Base 1 Private Sub Form＿Click() Dim lilt Dim Start As Integer，Finish As Integer

在窗体上画一个名称为Textl的文本框，并编写如下程序： Option Base 1 Private Sub Form＿Click() Dim lilt Dim Start As Integer，Finish As Integer

admin2020-06-30  58
问题 在窗体上画一个名称为Textl的文本框，并编写如下程序：
Option Base 1
Private Sub Form＿Click()
    Dim lilt
    Dim Start As Integer，Finish As Integer
    Dim Sum As Integer
    art=Array(12，4，8，16)
    Start=LBound(arr)
    Finish=UBound(arr)
    Sum=0
    For i=Start T0 Finish
         Sum=Sum+arr(i)
    Next i
    c=Sum／Finish
    Textl．Text=c
End Sub
    运行程序，单击窗体，则在文本框中显示的是(     )。
选项 A、40
B、10
C、12
D、16
答案B
解析 程序中将变量arr初始化为有4个元素的数组，使用Lbound和LJbound函数分别获取数组下标的上下限，然后将数组中的元素值相加，用整除运算求它们的平均值。算式可写为(12+4+8+16)／4=(40)／4=l0。所以答案为B。
转载请注明原文地址:https://www.kaotiyun.com/show/61Hp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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