首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() d:0 c=10 X=Array(10,12,21,32,24
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command1_Click() d:0 c=10 X=Array(10,12,21,32,24
admin
2020-06-30
63
问题
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
Option Base 1
Private Sub Command1_Click()
d:0
c=10
X=Array(10,12,21,32,24)
For i=1 To 5
If x(i)>c Then
d=d+x(i)
c=x(i)
Else
d=d—c
End If
Next i
Print d
End Sub
程序运行后,如果单击命令按钮,则在窗体上输出的内容为( )。
选项
A、89
B、99
C、23
D、77
答案
C
解析
程序中Option Base 1语句指定数组下标下限从1开始。程序通过赋初值定义变量x为含有5个元素的数组,元素值依次为10,12,21,32,24。For循环的功能是把这5个元素中大于10且大于前一个元素的值累加到变量d中,如果小于等于10或前一个元素则从变量d减去10或前一个元素的值。因此d=0一10+12+21+32—32=23。
转载请注明原文地址:https://kaotiyun.com/show/7nHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有1个名称为L,istl的列表框,其中有若干列表项,并有下面程序代码:…P—rivateSubListl—DblClick()ExchangeListl.Listl.ListIndexEndSubPrivateSubExc
鼠标拖放控件要触发两个事件,这两个事件是( )。
为计算an的值,某人编写了函数power如下:PrivateFunctionpower(aAsInteger,nAsInteger)AsLong DimsAsLong p=a Fork=1Ton p=p*a Next
程序调试的任务是( )。
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=2Text1.Text=p2(p1(
下列程序执行后,变量a的值为()。Dima,b,c,dAsSinglea=10:b=20:c=40Ifb>aThend=a:a=b:b=dEndIfIfc>aThend=a:a=c:c=dEndIfIfc>bThe
设有如下函数:FunctionDelSpace(chAsString)AsInteger Dimn%,st$,c$ st="" n=0 Fork=1ToLen(ch) c=Mid(ch,k,1) I
下列程序段的输出结果是x=5Printx+1;x+1
随机试题
D值
组织生命力强弱的重要标志是()
麻醉期间出现心动过速,其原因有
槟榔肝的形成原因是
女性,21岁,近1个月午后低热,乏力,食欲不振,咳嗽,少量白痰。查体:听诊肩胛间区可闻及少量湿性啰音。为便于发现病变首选的检查是
内部控制的内容更加丰富,要求更加严格,实施更加有效,但范围缩小了。()
位于县城的某白酒生产企业为增值税一般纳税人,2016年8月生产经营业务如下:(1)进口仪器设备一台,国外买价64000元,运抵我国入关前支付的运费4200元、保险费3800元;入关后运抵企业所在地,取得运输公司开具的增值税专用发票,注明运费
随着装备信息化程度的提升,有别于当初的盲目技术堆砌,目前为航母加装相控阵雷达似乎已成为一种必要的“复古之风”。但与英俄将相控阵雷达部署在舰桥之上不同,无论是美国最初的“企业”号还是最新的“福特”级航母,他们都将相控阵雷达布置在了舰桥之下,从而保证了舰桥具有
______resultsin"Acidrain"?______costs30%lessthancoal-firedpowerinFrance?
"WearenotabouttoentertheInformationAge,butinsteadareratherwellintoit."Presentpredictionsarethatby1990,abou
最新回复
(
0
)