首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读下面程序代码: 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
23
问题
阅读下面程序代码:
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全国计算机二级
相关试题推荐
编写如下事件过程:PrivateSubFormActivate()Dimscore(1To3)AsIntegerDimiAsInteger,tAsVariantFori=3To1Step-1score(
为了使一个复选框被禁用(灰色显示),应把它的Value属性设置为
编写如下程序:PrivateSubCommandl.Click()DimxAsInteger,yAsIntegerx=1:y=1Doy=x*yIfy>10ThenExitDoElsex=x+3EndIfLoopU
通用对话框Filter属性的作用是
下列叙述中正确的是
下列有语法错误的赋值语句是
设A、B、C是三角形的3条边,则以下表示“任意两边之和大于第三边”的布尔表达式是
满足下列条件乏_的年份是闰年:1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份,下面判断闰年的正确表达式是
执行以下程序段a$=”VisualBasicProgramming”:b$=“C++”c$=UCase(Left$(a$,7))&b$&RightS(a$,12)变量c$的值为
随机试题
从中央和地方关系看,如果一个国家由若干实力较近的民族组成,则行政组织体制宜采用()
关于胸骨线的描述正确的是
多个牙拔除正确的拔牙顺序是
交流同步发电机相对负载可能呈现的特性为()。
ABC公司的董事会决定在5年内不发股利,将每期利润投入一个新项目。市场分析师认为,ABC将在第6年开始支付现金股息,预计金额为$2/股。同时,市场分析师觉得,第6年之后ABC的股息增长将维持在10%。如果目前市场上投资者预期的报酬率为15%,则ABC当期股
歌颂了军民鱼水情的短篇小说《百合花》的作者是()。
15.CA是指货交承运人。它的风险与费用划分的界限是在出口国合同指定的地点货交买方指定的承运人时起。()
清朝雍正年间,市面流通的铸币,其金属构成是铜六铅四,即六成为铜,四成为铅。不少商人出以利计,纷纷融币取铜,使得市面的铸币严重匮乏,不少地方出现以物易物。但朝廷征于市民的赋税,须以铸币缴纳,不得代以实物或银子。市民只得以银子向官吏购兑铸币用以纳税,不少官吏因
Eversinceitappearedontheculturalscene,theEnlightenmenthashaditspassionatecritics.Philosophersaswellaspolitici
___________(我已得出结论)thatitwouldbeunwisetoaccepthisproposal.
最新回复
(
0
)