阅读程序： Option Base 1 Private Sub Form_Click() 　　Dim art,Sum 　　Sum=0 　　art=Array(1,3,5,7,9,11,13,15,17,19) 　　For

admin2012-03-22 18

问题阅读程序： Option Base 1 Private Sub Form_Click() 　　Dim art,Sum 　　Sum=0 　　art=Array(1,3,5,7,9,11,13,15,17,19) 　　For i=1 To 10 　　If arr(i)/3=arr(i)\3 Then 　　Sum=Sum+art(i) 　　End If 　　Next i 　　Pdnt Sum End Sub 程序运行后，单击窗体，输出结果为( )。

选项 A、13
B、14
C、27
D、15

答案C

解析

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

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

二级VB

NCRE全国计算机二级

相关试题推荐

如果要将形状控件的内部设置为水平线，应将Fillstyle属性设置为【】。
在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：OptionBase1PrivateSubCommand1_Click()Dima(3，3)Fori=1To3
有如下程序：　　PrivateSubCommand1Click()　　　　DimaAsSingle　　　　DimbAsSingle　　　　a=5：b=4　　　　CallS(a，B)EndSub　　SubS(xAsSingle，y
单击命令按钮时，下列程序的执行结果是　　PrivateSubBook(xAsInteger)　　　　x=x*2+l　　　　Ifx＜6Then　　　　　　CallBook(x)　　　　EndIf　　　　X=X*2+1　　　　P
单击命令按钮时，下列程序的执行结果为　　PrivateSubCommand1_Click()　　　DimaAsInteger，bAsInteger，cAsInteger　　　a=2：b=3：C=4　　　PrintP2(c，b，A)End
下列说法不正确的是
排序是计算机程序设计中的一种重要操作，常见的排序方法有插入排序、【】和选择排序等。
如果一个变量未经定义就直接使用，则该变量的默认类型为
下述关于数据库系统的叙述中正确的是
在程序设计语言中，重复结构对应两类循环语句，对先执行循环体后判断的称为【】循环结构。

随机试题

目前我国公务员年休假的时间一般最长不超过
Do"LuckyNumbers"ReallyBringGoodLuck?
真虚假实，治宜真寒假热，治宜
甲公司是一家享有良好声誉和很高知名度的互联网软件开发商和增值服务提供商。2005年9月15日，甲公司正式推出了雅虎助手软件，2006年8月，甲公司又推出了雅虎Widget软件。甲公司通过此软件，获得了用户的广泛认可和大量使用，树立了在上网辅助功能服务和搜索
【背景资料】某施工单位承接了2km的山区二级公路工程项目，其中包含一座长260m的双车道隧道。隧道进口洞顶覆盖层较薄，出口段的路堑地段受落石和塌方危害，隧道进出口段均设置12m的拱式明洞。其中进口段的路堑对明洞有偏压，路床有软基处理，出口段的路堑对
在编制年度利润表时，为检查报表编制和账簿记录的正确性，应将年报中的“净利润”数字与“本年利润”科目结转到()科目的数字相核对
会计科目与账户的本质区别是()。
根据我国“十三五”现代农业发展目标要求，到2020年农产品质量安全例行监测总体合格率要大于()。
某企业2012年12月31日的资产负债表(简表)如下：该企业2012年的销售收入为6000万元，销售净利率为10％，净利润的50％分配给投资者。预计2013年销售收入比上年增长25％，为此需要增加固定资产200万元，增加无形资产100万元，根据有关情况
Studentswhosepreviouseducationalexperiencewas______oftenfindithardtobecomeindependentlearners.【37】

最新回复(0)

阅读程序： Option Base 1 Private Sub Form_Click() Dim art,Sum Sum=0 art=Array(1,3,5,7,9,11,13,15,17,19) For

二级VB

NCRE全国计算机二级

如果要将形状控件的内部设置为水平线，应将Fillstyle属性设置为【】。

在窗体上画一个名称为Commandl的命令按钮，然后编写如下程序：OptionBase1PrivateSubCommand1_Click()Dima(3，3)Fori=1To3

有如下程序： PrivateSubCommand1Click() DimaAsSingle DimbAsSingle a=5：b=4 CallS(a，B)EndSub SubS(xAsSingle，y

单击命令按钮时，下列程序的执行结果是 PrivateSubBook(xAsInteger) x=x*2+l Ifx＜6Then CallBook(x) EndIf X=X*2+1 P

单击命令按钮时，下列程序的执行结果为 PrivateSubCommand1_Click() DimaAsInteger，bAsInteger，cAsInteger a=2：b=3：C=4 PrintP2(c，b，A)End

下列说法不正确的是

排序是计算机程序设计中的一种重要操作，常见的排序方法有插入排序、【】和选择排序等。

如果一个变量未经定义就直接使用，则该变量的默认类型为

下述关于数据库系统的叙述中正确的是

在程序设计语言中，重复结构对应两类循环语句，对先执行循环体后判断的称为【】循环结构。

目前我国公务员年休假的时间一般最长不超过

Do"LuckyNumbers"ReallyBringGoodLuck?

真虚假实，治宜真寒假热，治宜

在编制年度利润表时，为检查报表编制和账簿记录的正确性，应将年报中的“净利润”数字与“本年利润”科目结转到()科目的数字相核对

会计科目与账户的本质区别是()。

根据我国“十三五”现代农业发展目标要求，到2020年农产品质量安全例行监测总体合格率要大于()。

Studentswhosepreviouseducationalexperiencewas______oftenfindithardtobecomeindependentlearners.【37】

阅读程序： Option Base 1 Private Sub Form_Click() 　　Dim art,Sum 　　Sum=0 　　art=Array(1,3,5,7,9,11,13,15,17,19) 　　For

有如下程序：　　PrivateSubCommand1Click()　　　　DimaAsSingle　　　　DimbAsSingle　　　　a=5：b=4　　　　CallS(a，B)EndSub　　SubS(xAsSingle，y

单击命令按钮时，下列程序的执行结果是　　PrivateSubBook(xAsInteger)　　　　x=x2+l　　　　Ifx＜6Then　　　　　　CallBook(x)　　　　EndIf　　　　X=X2+1　　　　P

单击命令按钮时，下列程序的执行结果为　　PrivateSubCommand1_Click()　　　DimaAsInteger，bAsInteger，cAsInteger　　　a=2：b=3：C=4　　　PrintP2(c，b，A)End