首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上面一个名为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
46
问题
在窗体上面一个名为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://kaotiyun.com/show/slLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果要在程序代码中为图片框动态加载和清除图像,可以利用()函数。
设有程序:OptionBase1PrivateSubCommand1_Click()Dimarr1,MaxasIntegerarr1=Array(12,435,76,24,78,54,866,43)
在窗体上有一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色),此时如果在文本框中输入字符,则命令按钮Command1变为可用。请填空。PfivateSubForm_Load()
在Visual:Basic的立即窗口内输入以下语句:X=65<CR>PrintChr$(x)<CR>在窗口中显示的结果是
在一个窗体上有一个命令按钮CmdMax。单击CmdMax时,窗体上显示“字体由小变大”,字号每次增加2。请填空。PrivateSubForm_Load() Form1.Caption="字体变化示范" CmdMax.Captio
在窗体上画一个命令按钮,名称为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0。能够正确实现上述
下列叙述不正确的是()。
以下程序的功能是将多维数组a(1Tom,1Ton)中的元素转移到一个名为b(1Ton*m)的一维数组中,完成该程序。OptionBase1PrivateSubCommand1_Click(IndexAsInteger)
在关系模型中,若属性A是关系R的主码,属性A的取值不能为空,称为____________约束。
随机试题
描述中国古代官吏被降职并远调的词是()。
性激素对下丘脑一垂体的反馈,正确的是
药用部位就是指动植物药可以作为药材使用的部位,可以是植物的根、根茎、叶、花、果实、种子或动物的皮、骨、甲片、角等。药用部位为根和根茎的药材有
定期存款是个人事先约定有偿还期的存款,其利率视期限长短而定,通常期限越长利率越高。如果储户在存款到期前要求提前支取,会遭受一定的利息损失。()
简述主板市场与创业板市场的主要区别。
再贴现政策是主动权能够完全掌握在中央银行手中的货币政策工具。()
设A为m阶实对称阵且正定,B为m×n实矩阵,BT为B的转置矩阵.试证:BTAB为正定矩阵的充分必要条件是B的秩r(B)=n.
小王作为项目经理正在带领项目团队实施一个新的信息系统集成项目。项目团队已经共同工作了相当一段时间,正处于项目团队建设的发挥阶段,此时一个新成员加入了该团队,则()。
在数据管理技术发展的三个阶段中,数据共享最好的是()。
Oliviavisitstheofficetolearnhowtouseheridentificationcard.
最新回复
(
0
)