首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为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
55
问题
在窗体上画一个名称为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
设有窗体的Form_MouseMove事件过程如下:PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle) If(Button
程序调试的任务是( )。
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=2Text1.Text=p2(p1(
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码:PrivateXAsIntegerPrivateSubCommand1_Click()X=5:
有如下程序:PrivateSubForm_Click()DimsAsInteger,pAsIntegerp=1Fori=1To4 Forj=1Tois=s+j Nextj p=p*sNextiP
下列程序执行后,变量a的值为()。Dima,b,c,dAsSinglea=10:b=20:c=40Ifb>aThend=a:a=b:b=dEndIfIfc>aThend=a:a=c:c=dEndIfIfc>bThe
随机试题
关于骨巨细胞瘤,下列哪项是错误的
男,53岁。因上腹部隐痛1月余就诊。查粪隐血(+),行纤维胃镜检查,见胃小弯2cm×2cm溃疡,中央凹陷有污秽苔,周围隆起且不规则,质硬易出血,蠕动少。本病最恰当的处理方法是
个人独资企业的特征包括( )。
按照我国反洗钱法律法规的有关规定,大额交易都应当报告。()(2011年)
在发生经济业务时,单式记账法只在一个账户中登记,复式记账法则在两个账户中登记。()
活动性原则要求幼儿教育以活动为主,并将活动贯穿于整个教育过程中。这种活动主要是指()
王某因不服区公安分局行政拘留10天的处罚申请复议,市公安局认为处罚过轻,遂改为行政拘留15天的处罚,王某以市公安局为被告提起行政诉讼。对王某的诉讼请求,法院应当如何处理?()
下列循环中,可以正常结束的是
Weallhaveproblemsandbarriersthatblockourprogressorpreventusfrommovingintonewareas.Whenthathappens,consider
TenTipsforReducingStressWhileinCollegeStressissomethingyoucancontrol.Followthesetentipstolearnhowtocon
最新回复
(
0
)