首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为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
71
问题
在窗体上画一个名称为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全国计算机二级
相关试题推荐
为计算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
程序调试的任务是( )。
有如下程序:PrivateSubForm_Click()DimsAsInteger,pAsIntegerp=1Fori=1To4 Forj=1Tois=s+j Nextj p=p*sNextiP
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体中有一个红色方框和一个计时器控件。程序运行时每隔0.5秒,方框的颜色交替变为黄色和红色(黄色值为&HFFFF&;红色值为&HFF&);若单击鼠标右键,则停止变色;若单击鼠标左键,则方框左上角移到鼠标
设有如下函数:FunctionDelSpace(chAsString)AsInteger Dimn%,st$,c$ st="" n=0 Fork=1ToLen(ch) c=Mid(ch,k,1) I
下列程序段的输出结果是x=5Printx+1;x+1
随机试题
在工业企业中,备用电源的自动投入装置一般有()两种基本形式。
外汇升水
在《张中丞传后叙》中,作者补记许远的事迹,主要采用了( )
A.尿频尿急,尿道灼痛,尿黄短少B.头痛目赤,急躁易怒,胁痛便秘C.腹部痞闷,纳呆便溏,面目发黄D.腹痛下痢,赤白粘冻,里急后重E.阴囊湿疹,瘙痒难忍,小便短赤肝胆湿热可见
患者,男,30岁。便于,便后出血并疼痛1周。检查:肛门外观可见截石位6点有一梭形裂口通向肛内,创面不深,边缘整齐。其分类应是
采用下列()方法可以增强粘结力,并增加砌体的强度和抗剪能力。
已知空间中有一平面α:2x+5y++3=0,平面外有一点A(1,—2,),则点A到平面的距离为().
下列属于处于强拍地位的和弦外音是()。
甲与乙签订了一份商品买卖合同,甲为卖方,乙为买方。同时约定,甲将该批商品发给丙,因为乙与丙签订了一份同类商品的购销合同,乙为卖方,丙为买方。但是后来甲发给丙的商品存在质量问题,为此引起纠纷。丙应该()。
根据下列文字。回答下列问题。2004年12月末,全部金融机构本外币各项存款余额为25.3万亿元,同比增长15.3%。金融机构人民币各项存款余额为24万亿元,同比增长16%。全年人民币各项存款余额增加3.3万亿元。从分部门情况看:居民户存
最新回复
(
0
)