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

admin2020-04-18 51

问题在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Commandl_Ciek()
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+21+32－32=23。

转载请注明原文地址:https://www.kaotiyun.com/show/zSTp777K

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

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

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

二级VB

NCRE全国计算机二级

在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()　　DimI，Num　　Randomize　　Do　　　　ForI＝1To1000　　　　　　Num＝Int(Rnd*

下列关于窗体的描述中，错误的是()。

下列关于通用对话框CommonDialog1的叙述中，错误的是(　　)。

下面关于数组声明：Dimarr()AsInteger的叙述中正确的是

假定已在窗体上画了多个控件，其中有一个被选中，为了在属性窗口中设置窗体的属性，预先应执行的操作是(　　)。

如果改变驱动器列表框的Drive属性，则将触发的事件是(　　)。

窗体上有名称为Commandl的命令按钮，名称分别为Listl、List2的列表框，其中Listl的MuhiSelect属性设置为1(Simple)，并有如-F事件过程：PrivateSubCommandl＿Click()

下列叙述中有错误的是()。

当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的()。

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

[]=ex—ln(1+ex)+C．另解，令ex=t，则x=lnt，dx=[][*]

性联鱼鳞病的基因定位于

患者，女性，25岁。淋雨后打喷嚏、咳嗽、鼻塞、流涕，开始为清水样，3天后变稠，伴有咽痛，轻度畏寒、头痛。该患者最可能的诊断是

物业服务企业资质申报时需提供的资料包括()等。

负有先履行债务的贷款人在贷款合同签订后，有确切证据证明借款人出现下列哪些情形之一时，贷款人可以行使先履行抗辩权(或称不安抗辩权)，中止交付约定款项，并要求借款人提供适当担保?()

两家银行USD／CNY报价分别为：A银行6．1500～6．2100，B银行6．1600～6．2150，小明为出国留学准备购汇2万美元，他至少需要人民币()。

多元智力理论认为：每个学生都在不同程度上拥有九种基本智力，智力之间的不同组合表现出个体间的智力差异。提出这个理论的是()。

人民警察受处分期间，不能享受正常的晋升职务、级别，其中受()以上行政处分的，不得晋升工资档次。

下图所示的网络拓扑中配置了RIP协议，且RIP协议已更新完成，下表所示为AR2路由器上查看到的路由信息。从查看到的路由信息可以判断(65)，造成故障的原因是(66)。

A、Printmaterialsforvisitors.B、Studyreferentialreports.C、AskSallytomakearrangements.D、Applytothechiefexecutive.B

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

二级VB

NCRE全国计算机二级

在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click() DimI，Num Randomize Do ForI＝1To1000 Num＝Int(Rnd*

下列关于窗体的描述中，错误的是()。

下列关于通用对话框CommonDialog1的叙述中，错误的是( )。

下面关于数组声明：Dimarr()AsInteger的叙述中正确的是

假定已在窗体上画了多个控件，其中有一个被选中，为了在属性窗口中设置窗体的属性，预先应执行的操作是( )。

如果改变驱动器列表框的Drive属性，则将触发的事件是( )。

窗体上有名称为Commandl的命令按钮，名称分别为Listl、List2的列表框，其中Listl的MuhiSelect属性设置为1(Simple)，并有如-F事件过程：PrivateSubCommandl＿Click()

下列叙述中有错误的是()。

当窗体大小改变时，要使其中的控件也按比例发生变化，应使用窗体的()。

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

[*]=ex—ln(1+ex)+C．另解，令ex=t，则x=lnt，dx=[*][*]

性联鱼鳞病的基因定位于

患者，女性，25岁。淋雨后打喷嚏、咳嗽、鼻塞、流涕，开始为清水样，3天后变稠，伴有咽痛，轻度畏寒、头痛。该患者最可能的诊断是

物业服务企业资质申报时需提供的资料包括()等。

负有先履行债务的贷款人在贷款合同签订后，有确切证据证明借款人出现下列哪些情形之一时，贷款人可以行使先履行抗辩权(或称不安抗辩权)，中止交付约定款项，并要求借款人提供适当担保?()

两家银行USD／CNY报价分别为：A银行6．1500～6．2100，B银行6．1600～6．2150，小明为出国留学准备购汇2万美元，他至少需要人民币()。

多元智力理论认为：每个学生都在不同程度上拥有九种基本智力，智力之间的不同组合表现出个体间的智力差异。提出这个理论的是()。

人民警察受处分期间，不能享受正常的晋升职务、级别，其中受()以上行政处分的，不得晋升工资档次。

下图所示的网络拓扑中配置了RIP协议，且RIP协议已更新完成，下表所示为AR2路由器上查看到的路由信息。从查看到的路由信息可以判断(65)________________，造成故障的原因是(66)________________。

A、Printmaterialsforvisitors.B、Studyreferentialreports.C、AskSallytomakearrangements.D、Applytothechiefexecutive.B

在窗体上画一个命令按钮，然后编写如下事件过程：PrivateSubCommand1_Click()　　DimI，Num　　Randomize　　Do　　　　ForI＝1To1000　　　　　　Num＝Int(Rnd*

下列关于通用对话框CommonDialog1的叙述中，错误的是(　　)。

假定已在窗体上画了多个控件，其中有一个被选中，为了在属性窗口中设置窗体的属性，预先应执行的操作是(　　)。

如果改变驱动器列表框的Drive属性，则将触发的事件是(　　)。

[]=ex—ln(1+ex)+C．另解，令ex=t，则x=lnt，dx=[][*]

下图所示的网络拓扑中配置了RIP协议，且RIP协议已更新完成，下表所示为AR2路由器上查看到的路由信息。从查看到的路由信息可以判断(65)，造成故障的原因是(66)。