首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,其名称为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
2018-07-11
23
问题
在窗体上画一个命令按钮,其名称为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
8=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://jikaoti.com/ti/QZm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体上有2个文本框Text1和Text2,并有下面的事件过程:DimnPrivateSubText1_KeyPress(KeyAsciiAsInteger)If"A"
将窗体的KeyPreview属性设为True,然后编写如下程序:PrivateSubFormKeyDown(KeyCode_PrivateSubForm_KeyPress(KeyAsciiAsInteger,S
设有下面程序代码:PrivateSubCommand1_Click()DimaAsVarianta=Array(22,43,23,56,87,45,67,12,98,98,56,34,23,75,64)m=a(0)n=mFo
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSubCommand1_Click()DimnOAsIntegerDima,bAsIntegera=InputBox("Enter
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:PrivateSubCommand1_Click()DimsAsDoubles=0:i=1DoWhilei
有下面程序代码:PrivateSubCommand1Click()i=1DoWhilei10Printi=i+2LoopEndSub程序运行时输出字符"*"的个数是
在考生文件夹下有一个工程文件sjt5.vbp,在窗体上给出了所有控件和不完整的程序,请去掉程序中的注释符,把程序中的?改为正确的内容。本程序的功能是:如果单击“取数”按钮,则把考生文件夹下的in5.txt文件中的15个姓名读到数组a中,并在窗体上
若实体A和B是一对多的联系,实体B和C是一对一的联系,则实体A和C的联系是
如下关于变体类型变量的叙述中,错误的是( )。
窗体上有1个名称为Text1的文本框,1个名称为Timer1的计时器,且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是,单击窗体,则每隔2秒钟在Text1中显示一次当前时间。Priva
随机试题
中国公民张先生是某民营非上市公司的员工,同时是一位作家。2020年取得的实物或现金收入如下:(1)李某每月工资为18000元;每月缴纳“三险一金”共计3500元;李某自2020年10月开始,每月均购买具有“税优识别码”的商业健康险,月支出400元。(2
男孩,10岁,发现有腹部包块1个月。查体:右上腹包块,质软。超声显示右肾严重积水,肾皮质厚度0.4cm。静脉肾盂造影显示右肾及输尿管不显影,左肾、输尿管显影正常。经超声引导右肾盂造瘘及造影显示肾盂输尿管连接部狭窄,经右肾造瘘管引流尿量每天约400ml,
下列关于焦虑症状的说法,正确的是
提高房地产经纪业效率的途径有:()。
房产税的计税依据是房产原值一次减除()后的余值。
下列关于分部分项工程成本分析的表述正确的是()。
根据企业国有资产法律制度的规定,国有股东通过证券交易系统转让所持上市公司股份时,下列情形中,应当事先报批的是()。
人本治疗模式认为,社会工作者最主要的任务是()。
行政许可的实施和结果,除涉及()之外,应当公开。
A、 B、 C、 D、 B
最新回复
(
0
)