2. 计算机
  3. 有如下程序 Option Base 1 Private Sub Command 1 Click() Dim arr(10) arr=Array(10,35,28,90,54,68,72,90) ForEach aIn

有如下程序 Option Base 1 Private Sub Command 1 Click() Dim arr(10) arr=Array(10,35,28,90,54,68,72,90) ForEach aIn

admin2012-05-23  43
问题 有如下程序
    Option Base 1
    Private Sub Command 1 Click()
    Dim arr(10)
    arr=Array(10,35,28,90,54,68,72,90)
    ForEach aIn arr
    Ifa>50 Then
        Sum=Sum+a
      End If
     Next a
    End Sub
    运行上述程序时出现错误,错误之处是
选项 A、数组定义语句不对,应改为Dim arr
B、没有指明For循环的终值
C、应在For语句之前增加Sum=0
D、Next a应改为Next
答案A
解析 Array函数用于为数组元素赋值,即把一个数据集读入指定数组中。其格式为:数组变量=Array(数组元素值列表)。其中,“数组变量”是预先定义的数组名,后面不能带括号和下标。
转载请注明原文地址:https://www.kaotiyun.com/show/HPhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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