首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command14的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() d=0 c=10 X=Array(10,12,21,32,2
在窗体上画一个名称为Command14的命令按钮,然后编写如下程序: Option Base 1 Private Sub Commandl_Click() d=0 c=10 X=Array(10,12,21,32,2
admin
2020-07-22
38
问题
在窗体上画一个名称为Command14的命令按钮,然后编写如下程序:
Option Base 1
Private Sub Commandl_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/mtHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面程序代码:PrivateSubCommand1_Click()Fork=5To1Step-1x=k+x*10NextkPrintxEndSub程序运行后,单击命令按钮Command1,输出结果是()。
在窗体上画一个命令按钮和两个标签,其名称分别为Command1、Label1和Label2,然后编写如下事件过程:PrivateSubCommand1_Click()a=0Fori=1To10a=a+1:b
下列选项中不属于面向对象程序设计特征的是
已知:x=-6y=39则表达式“y\x*Sgn(x)”的值为
在窗体上画1个文本框,名称为Textl,然后编写如下程序:PrivateSubFormLoad()Open”C:\dat.txt”ForOutputAs#1Textl.Text=””
要想使列表框只允许单选列表项,应设置的属性为( )。
有如下数据定义语句:Dima,bAsIntegerDimx%,yasInteger执行上述语句后,不是整型变量的是
在考生文件夹中有一个工程文件sjt4.vbp。该程序的功能是将文件in4.txt中的文本读出并在文本框Text1中显示。输入一个英文字母到文本框Text2中,然后单击“统计”命令按钮,统计该字母(大小写被认为是不同的字母)在文本中出现的次数,统计结果在标签
命令按钮Command1的MouseUp事件过程结构如下:PrivateSubCommand1_MouseUp(ButtonAsInteger,ShiftAsInteger,
下列数据结构中,能用二分法进行查找的是
随机试题
我国设施园艺技术总体水平主要表现为________。
左旋多巴为什么对抗精神病药如吩噻嗪类引起的锥体外系反应无效?
在中央凹的中心,对光的感受分辨力高的一个重要原因是()。
关于承诺的表述中,正确的有()。
2016年版《幼儿园工作规程》中提出的幼儿园保育和教育的主要目标不包括()
关于流媒体的描述中,正确的是()
PoliceinthepopularresortcityVirginiaBeachrecentlybeganoperatingvideosurveillancecameraswithcontroversialfacerec
Itisthenaturalandperhapsunderstandabletendencyofnewspaperstoconcentrateonbadnewsandbydoingsotocontributeto
A)AfederalappealscourtonWednesdayforthefirsttimeemployedalandmarkSupremeCourtdecisiontodeclarethatthefundame
OnJudgingPeoplebyTheirAppearancesForthispart,youareallowed30minutestowriteashortessay.Youshouldstartyo
最新回复
(
0
)