首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4) j=1 For i=4 To 1
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码: Option Base 1 Private Sub Command1_Click() Dim a a=Array(1, 2, 3, 4) j=1 For i=4 To 1
admin
2019-06-20
52
问题
在窗体上画一个命令按钮,其名称为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=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*10=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/bfUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为计算1+2+22+23+24+…+210的值,并把结果显示在文本框Text1中,若编写如下事件过程:PrivateSubCommand1_Click()Dima%,b%,i%s=1:a=2Fori=2To
某二叉树中度为2的结点有10个,则该二叉树中有()个叶子结点。
当窗体大小改变时,要使其中的控件也按比例发生变化,应使用窗体的()。
已知a=6,b=15,c=23,则语句PrintSgn(a+bMod6-c\a)&a+b的输出结果为
要计算x的平方根并放入变量y,正确的语句是
VisualBasic控件一般都规定一个默认属性,在引用这样的属性时,只写对象名而不必给出属性名。默认属性为Caption的控件是
在考生文件夹下有一个数据库文件“samp2.accdb”,里面已经设计好了一个关联的表对象“tStud”、“tScore”、“tCourse”和一个空表“tTemp”,请按以下要求完成设计。(1)创建一个查询,查找并显示年龄在18~20岁之间(包
循环队列的存储空间为Q(1:100),初始状态为front=rear=100。经过一系列正常的人队与退队操作后,front=rear=99,则循环队列中的元素个数为()。
检查软件产品是否符合需求定义的过程称为()。
检查软件产品是否符合需求定义的过程称为()。
随机试题
Inthecomingyears,thereareabout10,000squarekilometersofthedesignatedsearchareastill________bysonarequipmenttow
下列对个人独资企业表述正确的有()。
药物的生物转化部位主要在
儿科用药中,对新生儿或婴儿最常用的给药途径是()。
要使索赔得到公平合理的解决,工程师在索赔管理中遵循的原则是( )。
基金的认购费和申购费可以在基金份额发售或者申购时收取,也可以在赎回时从赎回金额中扣除,但费率不得超过认购和申购金额的( )。
《合同法》规定的违约责任只有在证明行为人在主观上存在过错的情况下才承担违约责任。()
BedwettingMillionsofkidsandteenagersfromeverypartoftheworldwetthebedeverysinglenight.It’ssocommonthatt
(2013下项管)信息资源管理包括数据资源管理和信息处理管理,组织内部人员访问角色管理______。
Ⅰ.Urbanproblems1)problemstobothdevelopedanddevelopingcountries,like【1】______etc.2)problemspeculiartodevelopin
最新回复
(
0
)