首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码: Option Base j Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=l
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码: Option Base j Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=l
admin
2018-09-19
52
问题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码:
Option Base j
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4)
j=l
For i=4 To 1 Step一1
s=s+a(i)*j
j=j*10
Next i
Print s
End Sub
程序运行后,单击命令按钮,其输出结果是( )。
选项
A、4321
B、1234
C、34
D、12
答案
B
解析
Array函数用来为数组元素赋值,即把一个数据集读入某个数组。其格式为:数组变量名=Array(数组元素值)。Dim a语句没有变量类型名,则a默认为Variant类型,这里它作为数组变量使用。现在已知数组a中元素的值依次为1、2、3、4,则For循环中各变量值变化如下:
i=4时,s=s+a(4)*j=0+4*1=4,j=1*10=10
i=3时,s=s+a(3)*j=4+3*10=4+30=34,j=10*10=100
i=2时,s=s+a(2)*j=34+2*100=34+200=234,j=100*10=1000
i=1时,s=s+a(1)*j=234+1*1000=234+1000=1234。循环结束。s的值为1234。
转载请注明原文地址:https://kaotiyun.com/show/ZBFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于变量作用域的叙述中错误的是( )。
以下关于数组的叙述中,错误的是
设在当前目录下有一个名为"file.txt"的文本文件,其中有若干行文本。编写如下程序:PrivateSubCommand1_Click() Dimch$,asciiAsInteger Open"file.txt"ForInpu
设有如下事件过程:PrivateSubCommand1_Click() Dima a=Array(3,5,6,3,2,6,5,3,5,4,3,9,4,5,6,3,5) x=0 n=UBound(a)
对于计时器控件,下列叙述错误的是
在设计阶段,为了设置某控件的Left属性,可使用的方法是
如果把程序的启动对象设置为:SubMain,则SubMain过程
假定在图片框Picture1中装入了一个图片,在程序运行中,为了清除该图片(注意,清除图片,而不是删除图片框),应采用的正确方法是( )。
为了验证一个正整数n(n>3)是否为素数,最直观的方法是,看在2~n/2范围内能否找到一个整数m将n整除,若m存在,则n不是素数;若找不到m,则n为素数。在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有1个名称为Text1的文本框。请根据上面的算法
算法的空间复杂度是指()。
随机试题
一般来说,高层领导者的职责是【】
固定资产处置的净损失应计入的科目是()。
阅读《石崇与王恺争豪》全文,回答文后问题。石崇与王恺争豪,并穷绮丽以饰舆服。武帝,恺之甥也,每助恺。尝以一珊瑚树高二尺许赐恺,枝柯扶疏,世军其比。恺以示崇,崇视讫,以铁如意击之,应手而碎。恺既惋惜,又以为疾己之宝,声色甚厉。崇曰:“不足恨,今还卿
下列诗歌中,根据民间祭歌加工而成的是()
男性,38岁,3年前诊断为腰椎间盘突出症,腰腿痛反复发作,行卧床、牵引等保守治疗可缓解。查体:外踝及足外侧痛觉、触觉减退、趾及足跖屈肌力减弱,跟腱反射减弱。(2010年)若诊断仍为椎间盘突出症,最适宜的处理方法是
A.37~74MBqB.37~148MBqC.74~222MBqD.74~370MBqE.370~740MBq99mTc-植酸钠进行淋巴显像时的常用剂量为
下列关于腹膜透析的护理中不妥的是
某燃煤火力发电厂,单机容量200Mw,该发电厂火灾自动报警系统的下列设计方案中,正确的是()。
纳税人办理纳税申报时应如实填写《车辆购置税纳税申报表》,同时提供以下()资料的原件和复印件。
Theworkersprotestedwhentheboardofdirectorsannouncedthatabovetwo-fifthsoftheemployeeswouldbe______.
最新回复
(
0
)