首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: 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
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序: 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
admin
2019-07-30
80
问题
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:
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+2l+32—32=23。
转载请注明原文地址:https://www.kaotiyun.com/show/EdUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为计算an的值,某人编写了函数power如下:PrivateFunctionpower(aAsInteger,nAsInteger)AsLongDimpAsLongP=aFork=1TonP=p*aNext
编写如下程序:PrivateSubCommandl_Click()DimscoreAsIntegerscore=86Ifscore>85Thenr=1ElseIfscore>60Thenr=2El
滚动条可以响应的事件是
窗体上有一个名称为Combo1的组合框,一个名称为Command1的命令按钮。要求编写程序,在组合框中输入一个字符串,当单机命令按钮时,将该字符串逐项与组合框中原有列表项进行比较,若有相同列表项,则将其删除;若没有相同列表项,则将其添加到组合框中。现有人编
若要清除列表框控件中的所有列表项,应该使用的方法是
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序:PrivateTypeRecordIDAsInteger:NameAsString*20EndTypePrivateSubCoremandlClick()
设有语句Open"c:\Test.Dat"ForOutputAs#1则以下叙述中错误的是
如果把程序的启动对象设置为:SubMain,则SubMain过程
设有如下变量声明语句:Dima,bAsBolean则下面叙述中正确的是
下面不是键盘事件的是()。
随机试题
Thousandsofyearsago,tenofourverydistantancestorswerehungry.Theywentoutandpickedberriesorduguprootstoeat.
抑制糖异生作用促进骨盐溶解
消防车道一般按单行线考虑,为便于消防车顺利通过,消防车道的净宽度和净空高度均不应小于4m,消防车道的坡度不宜大于()%。
下列关于支票的表述中,不正确的是()。
根据证券法律制度的规定,关于公司债券的非公开发行与交易中的信息披露,下列表述不正确的是()。
票据记载事项是指依法在票据上记载票据相关内容的行为,下列关于票据记载事项的表述中,正确的是()。
外国企业在中国境内设立的机构,场所,向其总机构支付的同本机构,场所生产,经营有关的合理的管理费,应当(),准予在税前列支。
隋代画家_______的传世作品《游春图》是我国现存最早的山水画卷。
1970年,U国汽车保险业的赔付总额中,只有10%用于赔付汽车事故造成的人身伤害。而2000年,这部分赔付金所占的比例上升到50%,尽管这30年来U国的汽车事故率呈逐年下降的趋势。以下哪项为真,最有助于解释上述看来矛盾的现象?
10件产品中4件为次品,6件为正品,现抽取2件产品.逐个抽取,求第二件为正品的概率.
最新回复
(
0
)