首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上面一个名为Command1的命令按钮,然后编写如下代码: Option Base 1 Private Sub Commandl_Click() Dim a a=Array(1 , 2,3,4) j=1
在窗体上面一个名为Command1的命令按钮,然后编写如下代码: Option Base 1 Private Sub Commandl_Click() Dim a a=Array(1 , 2,3,4) j=1
admin
2016-06-30
32
问题
在窗体上面一个名为Command1的命令按钮,然后编写如下代码:
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
解析
Array函数用来为数组元素赋值,即把一个数据集读入某个数组。其格式为:数组变量名:.Array(数组元素值)。Dim a语句没有变量类犁名.则a默认为Variant类型,这里它作为数组变量使用。现在已知数组a中元素的值依次为1、2、3、4,则F0r循环中各变量值变化如下:
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://jikaoti.com/ti/Z3J0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体模块的通用声明段中声明变量时,不能使用()关键字。
下列关于DO…Loop语句的叙述不正确的是()。
下列哪一项使图像(Image)控件中的图像自动适宜控件的大小
双击窗体中的对象后,VisualBasic将显示的窗口是
在窗体上画两个文本框和一个命令按钮,然后在代码窗口中编写如下事件过程:PrivateSubCommand1_Click() Text1.Text="VBProgramming" Text2.Text=Text1.Text
设有数组声明语句:OptionBase1DimA(2,-1To1)以上语句所定义的数组A为______维数组,共有______个元素,第一维下标从______到______,第二维下标从______到______。下列选项
设有如下的记录类型:TypeStudentnumberAsStringnameASStringageAsIntegerEndType则正确引用该记录类型变量的代码是()。
当文本框ScrollBars属性设置了非零值,却没有效果,原因是
下列符号()是VisualBasic中的合法变量名。
下图中,图1、图2是应用程序的部分界面。运行程序首先出现图1的对话框,要求用户输入口令,输入完毕后单击“确定”按钮。如果输入的口令正确,则显示图2的界面。如果输入的门令错误,则出现图3的信息框。单击图1中的“取消”按钮,则结束程序。PrivateSub
随机试题
请论述高晓声小说创作的思想和艺术成就。
A.神经发育假说B.多基因共同致病假说C.多巴胺(DA)假说D.谷氨酸假说E.5一羟色胺假说苯丙胺能在正常人引起与急性精神分裂症妄想型类似的症状。
()的保险利益必须在保险合同订立时存在
A公司是一家零售商,正在编制12月份的预算,有关资料如下:(1)预计的11月30日资产负债表如下:(2)销售收入预计:11月200万元,12月220万元;下年1月230万元。(3)销售收现预计:销售当月收回60%,次月收回38%,其余2%无法收回(
初唐我国诗坛上升起的四颗光辉灿烂的新星,被人们称为“初唐四杰”。下列不属于“初唐四杰”的是()。
(2005年单选2)关于资本主义法的表述,能够成立的是()。
代理关系的核心内容是()。
数据库表的字段可以定义默认值,默认值是
IfyouarebuyingapropertyinFrance,whetherforapermanentoraholidayhome,itisimportanttoopenaFrenchbankaccount
TOEFLiBTSpeaking.Inthisintegratedspeakingtask,youwillreadashortpassageaboutacampussituation,listentoaconver
最新回复
(
0
)