2. 计算机
  3. 有如下程序： Option Base 1 Private Sub Form_Click() Dim arr, Sum Sum=0 arr=Array(1, 3, 5, 7, 9, 11, 13, 15,

有如下程序： Option Base 1 Private Sub Form_Click() Dim arr, Sum Sum=0 arr=Array(1, 3, 5, 7, 9, 11, 13, 15,

admin2013-04-11  46
问题 有如下程序：    Option Base 1    Private Sub Form_Click()        Dim arr, Sum        Sum=0        arr=Array(1, 3, 5, 7, 9, 11, 13, 15, 17, 19)        For i=1 To 10          If arE(i)/3=arr(i)\3 Then             Sum=Sum+arr(i)          End If        Next i        Print Sum    End Sub    程序运行后，单击窗体，输出结果为______。
选项 A、25
B、26
C、27
D、28
答案C
解析 本题考查的是数组赋值以及算术运算符“/”和“\”的区别。本程序段首先用Array函数给arr数组赋初值。“/”是浮点除法，执行标准除法操作，结果为浮点数。“\”为整数除法，整型整除运算，结果为整型值。本程序的功能是：找出arr数组中能被3整除的元素值，将其累加到sum中，然后输出。满足该条件的元素是3、9、15，和值为27。
转载请注明原文地址:https://kaotiyun.com/show/f9Qp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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