2. 计算机
  3. 阅读下面程序代码： Private Sub Command1_Click() Dim s As Integer s=0 a=Array(65，23，12，54，67，32，45，98，48，62) For k=0 To 4 If a(k)＞a(9-k)Th

阅读下面程序代码： Private Sub Command1_Click() Dim s As Integer s=0 a=Array(65，23，12，54，67，32，45，98，48，62) For k=0 To 4 If a(k)＞a(9-k)Th

admin2019-03-14  45
问题 阅读下面程序代码：
Private Sub Command1_Click()
Dim s As Integer
s=0
a=Array(65，23，12，54，67，32，45，98，48，62)
For k=0 To 4
If a(k)＞a(9-k)Then
s=s+a(k)
End If
Next k
Print s
End Sub
此程序代码运行后的输出是(    )。
选项 A、35
B、186
C、221
D、285
答案B
解析 Army函数用来为数组元素赋值，即把—个数据集读入某个数组。本题中利用Array函数，将一组整型数据读入到数组变量a中，然后通过For循环结构依次判断数组首尾对应元素的大小关系，若“首元素”大于“尾元素”，则将首元素累加到变量s中。循环执行过程中，各变量的值如下表。

最终变量s的值为186，所以B选项正确。
转载请注明原文地址:https://www.kaotiyun.com/show/bnUp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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