首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command 1 Click() d=0:c=10:x=Array(10,12,2 1,32,24
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: Option Base 1 Private Sub Command 1 Click() d=0:c=10:x=Array(10,12,2 1,32,24
admin
2020-04-18
48
问题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:
Option Base 1
Private Sub Command 1 Click()
d=0:c=10:x=Array(10,12,2 1,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/XvTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下通用过程:PublicSubFun(a()AsInteger,xAsInteger)Fori=1To4x=x*a(i)NextEndSub在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮,
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:OptionBase1PrivateSubCommand1_Click()Dima(3,3)AsIntegerDimiAsInteger,jAs
以下关于通用对话框的叙述中,错误的是
下面有关标准模块的叙述中,错误的是()。
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是( )。
窗体上有1个名称为Text1的文本框,1个名称为Timer1的计时器,且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是,单击窗体,则每隔2秒钟在Text1中显示一次当前时间。Priva
下列各声明语句中错误的是
设变量x中的值是395,则下面语句的输出是Printx\100+((xMod100)\10)*10+(xMod10)*100
随机试题
求过点(1,2,-5)且与直线平行的直线方程.
下列哪种疾病与输血无关
治血淋,小便不利,尿道涩痛,首选
土工合成材料施工质量检验基本要求,正确的有()。
某青年志愿者服务小组经过一周培训后,计划到敬老院举行敬老献爱心的表演活动。社会工作者跟他们一起讨论这个计划。有的组员们争着表达自己的意见,甚至有两个组因为意见不同而吵得面红耳赤,有的组员则一言不发,有的组员提出种种质疑。此时,社会工作者应该运用()
阅读材料,回答问题。早在13、14世纪,连接欧亚非地区的世界贸易网已经形成,欧洲在其中一直处于边缘地位。这不仅因为欧洲的经济总量远远无法与亚洲的中国、印度相比,还由于欧洲人在从亚洲输入香料、丝绸、瓷器、棉制品等商品时,能向亚洲销售的产品极少,多数情况一F
①然而,它们却不仅没有患上糖尿病或者高血压等代谢疾病②反而可以在缺水乏食、昼夜温差极大的沙漠中生存下来,成为“沙漠之舟”③它们生存在环境最恶劣的沙漠和半沙漠地区,每餐食用大量食盐.并摄取大量脂肪④在古老的丝绸之路上,双峰骆驼曾是中西贸易文化交流的使者
古代一位国王和他的张、王、李、赵、钱五位将军一同出外打猎,各人的箭上都刻有自己的姓氏。打猎中,一只鹿中箭倒下,但不知是何人所射。张说:“或者是我射中的,或者是李将军射中的。”王说:“不是钱将军射中的。”李说:“如果不是赵将军射中的,那么一定是王将军射中的。
HumanintelligenceandtheIQscalesusedtomeasureitonceagainarebecomingthefocusoffierydebate.Asargumentrages
Itispredictedthattherewillbefivescientificbreakthroughsinthe21stcentury.We’llknowwherewecamefrom.Whydoe
最新回复
(
0
)