首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() d=0:c=10:x=Array(10,12,21,32,24) Fo
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() d=0:c=10:x=Array(10,12,21,32,24) Fo
admin
2017-11-23
61
问题
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:
Option Base 1
Private Sub Commandl_Click()
d=0:c=10:x=Array(10,12,21,32,24)
For i=1 To 5
Ifx(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
解析
本题的循环中依次用数组的每个元素和c进行比较,如果比c大就将数组元素累加,并令数组元素成为新的c值;否则令累加和d减去c。在5次循环中d的累加过程为-10+12+21+32-32=23。
转载请注明原文地址:https://kaotiyun.com/show/fyGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序运行后,语句“Printi”执行的次数是()。PrivateSubForm_Click()DimiAsInteger,jAsIntegeri=0Do
在窗体上画一个文本框,名称为Text1,画一个命令按钮,名称为Command1。程序运行时,单击命令按钮,能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件test.dat中。请在空格处填上适当的内容,将程序补充完整。PrivateSu
执行下列程序后,鼠标单击窗体,输出结果为。 PrivateSubForm_Click() Print“Click”; EndSub PrivateSubForm_MouseDown(ButtonAsInteger,Shift_
如果将文本框的Locked属性设置为True,则以下说法正确的是
在窗体上画一个文本框和一个计时器控件,名称分别为Text1和Timer1,在属性窗口中把计时器的Interval属性设置为1000,Enabled属性设置为False。程序运行后,如果单击命令按钮,则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操
在窗体上有一个文本框Text1和一个标签Label1,要求运行程序时,在文本框中输入的内容立即显示在标签中(如图所示),则空白处应填入的内容是()。PrivateSubText1_____________________()
设有如下程序:PrivateSubForm_Click()Clsa$="ABCDFG"Fori=1To6PrintTab(12-i);【】NextiEndSub程序运行后,单击窗体,结果如图所示,请填空。
随机试题
在进行会计制度设计时,要尽量以最少的花费取得最佳的监督、核算效果,符合了会计制度设计原则中的()
火焰式探测器是利用()探测火灾。
快硬水泥存储时间超过()个月,应复试其各项指标,并按复试结果使用。
建筑面积为600m2的商业营业厅设置在人防工程中,若沿地面设置蓄光发电标志,其间距不宜大于()m。
某汽车制造企业属于增值税一般纳税人,生产某种品牌的小轿车,每辆不含税平均销售价格和最高销售价格均为10万元,2019年2月发生如下业务:(1)与某特约经销商签订了40辆小轿车的平销返利协议,协议规定按含税销售额的5%支付返还收入,当月收到经销商返回的30
旅游活动中,张先生通过某旅行社的安排,在一家四星级的饭店入住一夜,但由于该旅行社的失误,结果张先生没有享受合同约定的每晚200元的住宿标准,而是交纳了一晚280元的住宿费,根据有关规定,该旅行社应赔偿张先生的违约金为()。
现场实验法
双耳分听测验是用来研究()的经典范式。[中科院心理研究所2017]
BuyingOnlineWhybuyonline?It’slittlewonderthatnewbuyersquicklylearntoloveInternetshopping.Atthemoment,
Hearingthenameofanobjectappearstoinfluencewhetherornotweseeit,suggestingthathearingandvisionmightbeevenmo
最新回复
(
0
)