首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=1 For
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=1 For
admin
2016-08-24
84
问题
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码:
Option Base 1
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4)
j=1
For i=4 To 1 Step一1
s=8+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/2iLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果在C盘当前文件下已存在名称为studata.dat的顺序文件,那么执行语句Open"c:studata.dat"ForAppendAs#1之后,将
下面的过程定义语句中合法的是()。
语句Print"Int(-13.2)=";Int(-13.2)的输出结果为______。
当用户建立窗体文件时,都会产生______。
设A="123456",则表达式Val(Left(A,4)+Mid(A,4,2))的值为
下列说法中正确的是()。
以下程序的功能是:将一维数组A中的100个元素分别赋给二维数组B的每个元素并打印出来,要求把A(1)到A(10)依次赋给B(1,1)到B(1,10),把A(11)到A(20)依次赋给B(2,1)到B(2,10),……,把A(91)到A(100)依次赋给B(
控件数组的名字由Name属性指定,而数组中的每个元素由______属性指定。
以下关于菜单设计的叙述中错误的是
软件工程研究的内容主要包括:软件开发技术和______________。
随机试题
妨碍铁剂在肠道吸收的物质是
下列不属于房地产广告特点的是()。
水泥混凝土面层组成材料中,碎石最大公称粒径不应大于()mm。
国内企业甲与外国投资者乙拟共同投资设立中外合资经营企业,投资总额为1200万美元。根据中外合资经营企业法律制度的规定,该企业注册资本至少应为()万美元。
(1)表明身份(2)制作当场处罚决定书(3)听取陈述、申辩(4)说明处罚理由(5)制作笔录
一条街上,一个骑车人与一个步行人同向而行,骑车人的速度是步行人速度的3倍,每隔10分钟有一辆公共汽车超过行人,每隔20分钟有一辆公共汽车超过骑车人。如果公共汽车从始发站每次间隔同样的时间发一辆车,那么间隔()分发一辆公共汽车。
【祆教】
Fromthepassagewecansee,theauthorisquite______withtheprospectoftheAsiaPacificEconomicCooperationforum.
•Lookatthenotesbelow.•Youwillhearawomantelephoningaboutarecruitmentdrive.•star?neededduetogrowthin(9)...
•Readthefollowingletter.•Choosethebestwordtofilleachgap.•Foreachquestion(19-33),markoneletter(A,B,CorD)
最新回复
(
0
)