首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读下面程序代码: 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
admin
2019-03-14
24
问题
阅读下面程序代码:
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://kaotiyun.com/show/bnUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果将命令按钮的访问键设置为“D”,以下不会触发命令按钮Click事件的操作是
设a、b都是自然数,为求a除以b的余数,某人编写了以下函数:Functionfun(aAsInteger,bAsInteger)Whilea>ba=a-bWendfun=aEndFunction在调试时发现函数是错误的。为使函数能产
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:PrivateSubCommadl_Ctick()Dima(10)AsInteger,maxAsIntegerFork=1To10a(k)=InputBox(“输入一
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
关于KevPress事件,以下叙述中正确的是
以下数组定义语句中,错误的是
满足下列条件乏_的年份是闰年:1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份,下面判断闰年的正确表达式是
窗体上有1仑名称为Text1的文本框;1个名称为Timerl的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timerl的事件过程如下:PrivateSubTimerl_Timer()StaticflagAs
若要清除列表框控件中的所有列表项,应该使用的方法是
某二叉树共有7个结点,其中叶子结点只有1个,则该二叉树的深度为(假设根结点在第1层)
随机试题
行政组织结构的灵魂和核心是()
A.Aα纤维B.Aβ纤维C.Aδ纤维D.C纤维传导慢痛的外周神经纤维丰要是
目前诊断应为患者的血红蛋白降低
某经产妇,29岁。足月顺产后第2日,出现轻微下腹部阵痛。脐下3指可触及宫底,无压痛,阴道流血不多,无恶心、呕吐。恰当处理措施应为
马斯洛的“需要层次论”认为人有五种基本需要,按需要等级从高到低排列,最低级的需要是()
学生刚学英语时,对26个字母的记忆往往两头容易、中间难。可以解释这一现象的理论是()。
教师运用一些醒目的文字、符号、色彩对比等对学生行为进行的强化是()。
释迦牟尼(北京大学2003年世界古代史真题)
甲和乙公司签订一份汽车买卖合同,约定由乙公司在6月底将一辆行驶3万公里的卡车交付给甲,价款为3万元,甲交付定金5000元,交车后15日内余款付清。合同还约定,乙公司晚交车1天,扣除车款50元,甲晚交款1天,应多交车款50元;一方有其他违约情况,应向对方支
设(I),α1,α2,α3,α4为四元非齐次线性方程组BX=b的四个解,其中α1=.求方程组(Ⅰ)的基础解系;
最新回复
(
0
)