首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命今按钮,其名称为Command1,然后编写如下代码: Option Base1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=1 For i=4To1Step-1 s=s+a(i
在窗体上画一个命今按钮,其名称为Command1,然后编写如下代码: Option Base1 Private Sub Command1_Click() Dim a a=Array(1,2,3,4) j=1 For i=4To1Step-1 s=s+a(i
admin
2016-09-19
40
问题
在窗体上画一个命今按钮,其名称为Command1,然后编写如下代码:
Option Base1
Private Sub Command1_Click()
Dim a
a=Array(1,2,3,4)
j=1
For i=4To1Step-1
s=s+a(i)*j
j=j*10
Next i
Print s
End Sub
程序运行后,单击命令按钮,其输出结果是
选项
A、4321
B、1234
C、34
D、12
答案
B
解析
本题考查的考点是有关循环的。在本题的循环中,首先取得数组的最后一个元素并乘1后放入s;然后取得第3个元素并乘10后加到s里面,然后取得第2个元素并乘100后加到s里面,最后取得第1个元素并乘1000后加到s里面,所以s的最终值为1234。
转载请注明原文地址:https://kaotiyun.com/show/wdLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮时,下列程序代码的执行结果为()。PrivateFunctionFirProc(xAsInteger,yAsInteger,zAsInteger) FirProc=2*x+y+3*zEndF
设在窗体上有一个名称为Command1的命令按钮,并有以下事件过程:PrivateSubCommand1_Click() StaticbAsVariant b=Array(1,3,5,7,9)EndSub
下面程序的运行结果是______。程序的功能是_______。PublicFunctionmyfun(m,n)Dowhilem>n Dowhilem>n:m=m-n:Loop DoWhilen
下列叙述中,不符合良好程序设计风格要求的是
下列程序运行时,若输入123,输入对话框的提示信息是______。PrivateSubCommand1_Click()X1=InputBox("请输入") MsgBox(X1)EndSub
当用户()时,会引发焦点所在控件的KeyPress事件。
定时器的Interval属性以()为单位指定Timer事件之间的时间间隔。
设有分段函数:以下表示上述分段函数的语句序列中错误的是
下面定义窗体级变量a的语句中错误的是
下列叙述中正确的是
随机试题
A.轻度慢性肝炎B.急性重型肝炎C.亚急性重型肝炎D.急性轻型肝炎桥接坏死及亚大片坏死
27岁农民,左侧上下肢体运动障碍,伴有语言发音困难1周,无头痛,无意识障碍或精神异常,左侧上下肢肌力重度,左侧鼻唇沟较右侧浅,仲舌偏右侧,未发现腹膜刺激征,巴氏征(+),血象WBC15.4×109/L,核左移,患者1个月前曾发热,肌肉痛6天,最可能的诊断
阻断Ach对虫体肌肉的兴奋性并使虫体松弛麻痹
《药品管理法实施条例》规定,在销售或进口前应当按规定进行检验或者审批的是《药品管理法》规定,管理办法由国务院制定的是
(2006年考试真题)甲企业2005年度利润总额为200万元,其中包括本年收到的国债利息收入50万元。该企业适用的所得税税率为33%。甲企业当年按税法核定的全年计税工资为200万元,全年实发工资为180万元;当年的营业外支出中,有10万元为税款滞纳金支出。
小胡和小涂,计算甲、乙两个两位数的乘积,小胡看错了甲数的个位数字,计算结果为1274。小涂看错了甲数的十位数字,计算结果为819,甲数是:
一批产品的合格率为95%,而合格率中一等品占60%,其余为二等品,现从中任取一件检验,这件产品是二等品的概率为().
Itisreportedthatbagsaregettingbiggerallthetime,andthattherearemorebagsperpersononthestreettodaythanatan
A、That’sapity.B、I’llmissyou,too.C、You’rewelcome.A
CambridgeassumedaleadingroleintheVictorianera,especiallyinreligiouscontroversy.
最新回复
(
0
)