在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() 　　d＝0 　　c＝10 　　x＝Array(10， 12， 21， 32， 24) 　　For i＝

admin2019-03-14 30

问题在窗体上画一个名称为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/HEUp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() 　　d＝0 　　c＝10 　　x＝Array(10， 12， 21， 32， 24) 　　For i＝

二级VB

NCRE全国计算机二级

对长度为n的线性表进行顺序查找，在最坏情况下所需要的比较次数为

设有如下程序：PrivateSubFormClick(0hum=InputBox(“请输入一个实数”)：P=InStr(num，“.”)Ifp>0ThenPrintMid(num，P+1)ElsePrint“END”EndIfE

程序调试的任务是

下面描述中不属于数据库系统特点的是

由高中数学可知，对于连续函数f(x)，若f(x1)与f(x2)值的符号相反，则在x1和x2之间必存在x0，使得fix0)=0(该点称为“零点”)。设有VB函数：PrivateFunctionf(xAsSingle)AsSingle可以返回fix)

设a=10，b=4，c=5，d=7，表达式a＞bAndNotc＜d+6的值为

下列说法中，错误的是

一般情况下，当对关系R和S进行自然连接时，要求R和S含有一个或者多个共有的

下列关于键盘事件的说法中，正确的是()。

某二树有5个度为2的结点，则该二叉树中的叶子结点数是()。

Ittookdecadestoprovethatcigarettesmokingcausescancer,heartdisease,andearlydeath.Ittook【C1】________yearstoestab

会计信息系统是企业管理信息系统的一个重要子系统。()

甲企业在北京，其汇往上海80万元开立采购物资专户，则应借记“其他货币资金——外埠存款80万元”，贷记“银行存款80万元”。()

入境种子，苗木事先向检验检疫部门申请《引进种子、苗木检疫审批单》，入境后要检疫的申请隔离场。带土质的需要特许审批。

贷款和应收款项类的金融资产与持有至到期类金融资产的主要差别有()。

恒生流通精选指数系列包括(　　)。

技术突破降低了生产电脑芯片的成本。运用供求图，说明这种突破对以下市场均衡价格和数量的影响。(A．电脑市场；B．电脑软件市场)

在窗体中有一个名称为run35的命令按钮，单击该按钮从键盘接收学生成绩，如果输入的成绩不在0到100分之间，则要求重新输入；如果输入的成绩正确，则进入后续程序处理。run35命令按钮的Click的事件代码如下：PfivteSubrun35_C

下列叙述中，正确的是___________。

A、Wespendlesstimecookingtoday.B、Theychangeourwayoflife.C、Theymakeuschangeourappetite.D、Weneedtopaymorefor

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() d＝0 c＝10 x＝Array(10， 12， 21， 32， 24) For i＝

二级VB

NCRE全国计算机二级

对长度为n的线性表进行顺序查找，在最坏情况下所需要的比较次数为

设有如下程序：PrivateSubFormClick(0hum=InputBox(“请输入一个实数”)：P=InStr(num，“.”)Ifp>0ThenPrintMid(num，P+1)ElsePrint“END”EndIfE

程序调试的任务是

下面描述中不属于数据库系统特点的是

由高中数学可知，对于连续函数f(x)，若f(x1)与f(x2)值的符号相反，则在x1和x2之间必存在x0，使得fix0)=0(该点称为“零点”)。设有VB函数：PrivateFunctionf(xAsSingle)AsSingle可以返回fix)

设a=10，b=4，c=5，d=7，表达式a＞bAndNotc＜d+6的值为

下列说法中，错误的是

一般情况下，当对关系R和S进行自然连接时，要求R和S含有一个或者多个共有的

下列关于键盘事件的说法中，正确的是()。

某二树有5个度为2的结点，则该二叉树中的叶子结点数是()。

Ittookdecadestoprovethatcigarettesmokingcausescancer,heartdisease,andearlydeath.Ittook【C1】________yearstoestab

会计信息系统是企业管理信息系统的一个重要子系统。()

甲企业在北京，其汇往上海80万元开立采购物资专户，则应借记“其他货币资金——外埠存款80万元”，贷记“银行存款80万元”。()

入境种子，苗木事先向检验检疫部门申请《引进种子、苗木检疫审批单》，入境后要检疫的申请隔离场。带土质的需要特许审批。

贷款和应收款项类的金融资产与持有至到期类金融资产的主要差别有()。

恒生流通精选指数系列包括( )。

技术突破降低了生产电脑芯片的成本。运用供求图，说明这种突破对以下市场均衡价格和数量的影响。(A．电脑市场；B．电脑软件市场)

在窗体中有一个名称为run35的命令按钮，单击该按钮从键盘接收学生成绩，如果输入的成绩不在0到100分之间，则要求重新输入；如果输入的成绩正确，则进入后续程序处理。run35命令按钮的Click的事件代码如下：PfivteSubrun35_C

下列叙述中，正确的是___________。

A、Wespendlesstimecookingtoday.B、Theychangeourwayoflife.C、Theymakeuschangeourappetite.D、Weneedtopaymorefor

在窗体上画一个名称为Command1的命令按钮，然后编写如下程序： Option Base 1 Private Sub Command1_Click() 　　d＝0 　　c＝10 　　x＝Array(10， 12， 21， 32， 24) 　　For i＝

恒生流通精选指数系列包括(　　)。