首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读下面程序代码: 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 T
阅读下面程序代码: 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 T
admin
2020-07-22
18
问题
阅读下面程序代码:
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
解析
Array函数用来为数组元素赋值,即把一个数据集读入某个数组。本题中利用Array函数,将一组整型数据读入到数组变量a中,然后通过For循环结构依次判断数组首尾对应元素的大小关系,若“首元素”大于“尾元素”,则将首元素累加到变量s中。循环执行过程中,各变量的值如下表。
最终变量s的值为186,所以B选项正确。
转载请注明原文地址:https://kaotiyun.com/show/YyHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:PrivateSubCommandl—Click()Dima(10)AsInteger,maxAsIntegerFork=lTo10
下列关于栈的叙述正确的是()。
下列叙述中正确的是( )。
输入VisualBasic源程序时,若一个命令行中包含两个语句,则两个语句之间的分隔符应使用
设a、b都是自然数,为求a除以b的余数,某人编写了以下函数:Functionfun(aAsInteger,bAsInteger)Whilea>ba=a—bWendfun=aEndFu
下列数据结构中,能够按照“先进后出”原则存取数据的是( )。
数据库的数据模型分为()。
VB的数值型数据分为()两种。
(1)在考生文件夹下有一个工程文件sit3.vbp,其窗体中有一个红色方框和一个计时器控件。程序运行时每隔0.5秒,方框的颜色交替变为黄色和红色(黄色值为&HFFFF&;红色值为&HFF&);若单击鼠标右键,则停止变色;若单击鼠标左键,则方框左上角移到鼠标
随机试题
交联剂的选用由聚合物水溶液的水解度决定。()
Afriendofminemetwithanaccidentdrivingindarkness.Hislegsweresohurtthathecouldn’tmove.Whatwasthe【C1】______w
溶液型液体制剂分散相质点的直径是
下列哪项不是精神分裂症的特征性症状
下列没有违反诚实守信要求的是()。
证据按其来源可分为原始证据和传来证据。原始证据就是直接来源于案件客观事实的证据;传来证据是指不是直接来源于案件事实或原始出处,而是从间接的非第一来源获得的证据材料。根据上述定义,下列属于传来证据的是:
我国的国家结构形式是()。
23591733()。
下列行为中,不视为侵犯专利权的有()。
Thenewspaperstoriesdeliberatelyputdowntheactress’sunattractivepast.
最新回复
(
0
)