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

admin2020-04-18 49

问题在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command 1 Click()
      d=0：c=10：x=Array(10，12，2 1，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/XvTp777K

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

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

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

二级VB

NCRE全国计算机二级

设有如下通用过程：PublicSubFun(a()AsInteger,xAsInteger)Fori=1To4x=x*a(i)NextEndSub在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，

窗体上有一个名称为Cbl的组合框，程序运行后，为了输出选中的列表项，应使用的语句是()。

设有如下一段程序：PrivateSubCommandl—Click()StaticaAsVarianta=Array(“one”，“two”，“three”，“four”，“five”)Printa(3)

能够存放组合框的所有项目内容的属性是(　　)。

以下关于VB文件的叙述中，错误的是(　　)。

为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为(　　)。

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

在文本框中，要设置显示的文本颜色，应该设置()属性。

窗体上有1个名称为Text1的文本框；1个名称为Timerl的计时器控件，其Interval属性值为5000，Enabled属性值是True。Timer1的事件过程如下：PrivateSubTimer1_Timer()Static

女性，28岁，低热2个月，伴腹胀、腹痛1个月。腹平，触诊有柔韧感，肝脾肋下未及，腹水征阳性。腹水检查提示为渗出液，ADA76U／mI。下列治疗不恰当的是

中性粒细胞碱性磷酸酶活性明显增高见于

下列项目中不属于项目决策阶段影响工程造价因素的是（）。

安全生产管理具有权威、强制性和()。

下列关于地基质量验收要求叙述正确的是()。

商业银行开展个人理财业务应经()批准同意，并接受其监督管理。

下列不属于初级市场活动内容的是()。

以下关于防火墙功能特性的说法中，错误的是_____________。

能从任意一个节点开始没有重复地扫描到所有节点的数据结构是()

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

二级VB

NCRE全国计算机二级

设有如下通用过程：PublicSubFun(a()AsInteger,xAsInteger)Fori=1To4x=x*a(i)NextEndSub在窗体上画一个名称为Textl的文本框和一个名称为Commandl的命令按钮，

窗体上有一个名称为Cbl的组合框，程序运行后，为了输出选中的列表项，应使用的语句是()。

设有如下一段程序：PrivateSubCommandl—Click()StaticaAsVarianta=Array(“one”，“two”，“three”，“four”，“five”)Printa(3)

能够存放组合框的所有项目内容的属性是( )。

以下关于VB文件的叙述中，错误的是( )。

为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为( )。

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

在文本框中，要设置显示的文本颜色，应该设置()属性。

窗体上有1个名称为Text1的文本框；1个名称为Timerl的计时器控件，其Interval属性值为5000，Enabled属性值是True。Timer1的事件过程如下：PrivateSubTimer1_Timer()Static

女性，28岁，低热2个月，伴腹胀、腹痛1个月。腹平，触诊有柔韧感，肝脾肋下未及，腹水征阳性。腹水检查提示为渗出液，ADA76U／mI。下列治疗不恰当的是

中性粒细胞碱性磷酸酶活性明显增高见于

下列项目中不属于项目决策阶段影响工程造价因素的是（）。

安全生产管理具有权威、强制性和()。

下列关于地基质量验收要求叙述正确的是()。

商业银行开展个人理财业务应经()批准同意，并接受其监督管理。

下列不属于初级市场活动内容的是()。

以下关于防火墙功能特性的说法中，错误的是_____________。

能从任意一个节点开始没有重复地扫描到所有节点的数据结构是()

能够存放组合框的所有项目内容的属性是(　　)。

以下关于VB文件的叙述中，错误的是(　　)。

为了使窗体的大小可以改变，必须把它的BorderStyle属性设置为(　　)。

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