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

admin2006-08-25  47
问题 阅读程序：     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 arr(i)/3=arr(i)\3 Then                    Sum=Sum+arr(i)               End If          Next i          Print Sum     End Sub程序运行后，单击窗体，输出结果为
选项 A、13     
B、14
C、27
D、15
答案C
解析 分析题干，arr(i)/3=arr(i)\3是求出数组中能整除3的元素，而 Sum=Sum+arr(i)是将这些元素相加，也就是求3+9+15的值为27，所以选项C正确。
转载请注明原文地址:https://www.kaotiyun.com/show/yr2p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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