首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名为Commandl的命令按钮,然后编写如下代码: Option Base 1 Private Sub Commandl Click() Dim a a=Array(1,2,3,4):j=1 For i=4 To 1 Step一1 S=S+a
在窗体上画一个名为Commandl的命令按钮,然后编写如下代码: Option Base 1 Private Sub Commandl Click() Dim a a=Array(1,2,3,4):j=1 For i=4 To 1 Step一1 S=S+a
admin
2019-04-29
31
问题
在窗体上画一个名为Commandl的命令按钮,然后编写如下代码:
Option Base 1
Private Sub Commandl Click()
Dim a
a=Array(1,2,3,4):j=1
For i=4 To 1 Step一1
S=S+a(i)*j:j=j*10
Next i
Print s
End Sub
运行上面的程序,其输出结果是
选项
A、1234
B、12
C、34
D、4321
答案
A
解析
本题考查的考点是有关循环的。本题也很简单,首先取得数组的最后一个元素加到累加变量中,然后取倒数第二个元素,乘10后加到累加变量中,然后取倒数第三个元素,乘100后加到累加变量中,以此类推,最后结果为1234。
转载请注明原文地址:https://kaotiyun.com/show/Z1Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于滚动条的叙述中,错误的是
要使标签中的文本靠右显示,应将其Aligment属性设置为
窗体上有一个名称为Textl的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:PrivateTypexaAsInteger:bAsIntegerEndTypePrivateSubCommand1Click()Di
设有如下通用过程:PublicFunctionFun(xStrAsString)AsStringDimtStrAsString.strLAsIntegertStr="strL=Len(xStr)i=1DoWhilei
窗体上有一个名称为VScrolll的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是
设Labell、Commandl、Textl、Checkl分别为标签、命令按钮、文本框、复选框的名称,则以下属性设置语句中,运行时不会出错的是
下列排序方法中,最坏情况下比较次数最少的是
在考生文件夹下有一个工程文件sjt4.vbp。窗体上有一个名称为List1的列表框,名称为Timer1的计时器,名称为Label1的标签,如图3-66所示。请通过属性窗口向列表框添加四个项目,分别是“第一项”、“第二项”、“第三项”、“第四项”。程序运行后
在考生文件夹中有一个工程文件sjt4.vbp。窗体上已有控件,如图3-128所示。请在属性窗口中将List1设置为可以多项选择(允许使用Shift键或Ctrl键进行选择)列表项。要求:双击List1中的某一项时,该项目被添加到List2中,同时在List1
随机试题
以下属于软件危机典型表现的是________________。
Studentsorteacherscanparticipateinexcursionstolovelybeachesaroundtheislandatregular______.
在一起共同犯罪案件中,犯罪嫌疑人王某被公安机关依法取保候审,犯罪嫌疑人张某被公安机关依法监视居住。对王某和张某来说,他们都应当遵守的规定包括()。
高度为18m的中庭大堂内,采用下面()的空调布置方式合理。
管理人在集合计划运作期间投资所发生的交易手续费、印花税等有关税费,作为管理费直接扣除。()
检验费用昂贵的产品所适用的检验方法是________。
本次神舟六号载人飞船______的极地考察国旗,是我国极地科考队今年2月份从南极极点带回来的,它曾在极点冉冉升起。填入划横线部分最恰当的一项是()。
Timewas,oldpeopleknewtheirplace.Scepterswerepassedtosonsanddaughters,crownsplacedonyoungerheads.Notanymore.
【F1】GE,alargeAmericanconglomerate,isnowproposingtomakeultrasoundtransducersby"additive"manufacturing—orthree-dimen
Ifyourearrangetheletters"BARBIT",youwouldhavethenameofa(n):
最新回复
(
0
)