首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名为Commandl的命令按钮,然后编写如下代码: Option Base 1 Private Sub Commandl_Click() Dim a a=Array(1,2,3,4) j=1 F
在窗体上画一个名为Commandl的命令按钮,然后编写如下代码: Option Base 1 Private Sub Commandl_Click() Dim a a=Array(1,2,3,4) j=1 F
admin
2015-10-23
23
问题
在窗体上画一个名为Commandl的命令按钮,然后编写如下代码:
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
解析
Atray函数用来为数组元素赋值,即把一个数据集读入某个数组。其格式为:数组变量名=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/TBJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在VisualBasic中,要使标签的标题居中显示,则将其Alignment属性设置为()。
如果要在任何新建的模块中自动插入OptionExplicit语句,则应采用下列()操作步骤。
下面的属性中,用于自动调整图像框中图形内容的大小的是
设A$="Hello",下列语句正确的是()。
文本框的SerollBars属性设置为非零值,却没有效果,原因是
下列语句都是在Form中定义的,其中错误的是
阅读下面的程序段:Fora=1To2Forb=1ToaForc=bTo2i=i+1NextNextNextPrinti执行上面的3重循环后,i的值为
软件开发模型包括Ⅰ、瀑布模型Ⅱ、扇形模型Ⅲ、快速原型法模型Ⅳ、螺旋模型
数据库系统中实现各种数据管理功能的核心软件是______。
如果在“立即”窗口中执行以下操作:a=8<CR>(<CR>为Enter键,下同)b=9<CR>printa>b<CR>则输出结果是()。
随机试题
肺炎中最常见的病原体是
良性肿瘤与恶性肿瘤的根本区别在于肿瘤的
男性,63岁,腹胀、腹痛半天,恶心、无呕吐,既往有慢性便秘,多次腹痛经排便后缓解病史,查体:T37.5℃,P88次/分,R22次/分,BPl40/90mmHg,腹部膨隆不对称,左上腹叩鼓音。X平片示左上腹可见马蹄形巨大双腔充气肠袢。最可能的诊断是
A.其生产、包装和储存应使用专用的、安全的设备B.必须使用独立的厂房与设施,分装室应保持相对负压C.其生产区应保持相对负压,并有独立的空气净化系统D.其加工或罐装不得同时在同一生产厂房内进行,其储存要严格分开E.必须使用专用设备和独立的空气
关于个人综合消费贷款,以个人商用房抵押的.贷款金额最高不超过抵押物价值的()。
甲公司是一家生产空调的民营企业。公司创办人经过分析后,决定进军汽车制造业。在决定是否选择该战略时,甲公司可以考虑的战略选择方法有()。
根据有关规定,下列建设工程施工合同中不可以认定为无效合同的是()。
ARMCortex—A是ARMCortex应用处理器,此系列中A5、A7、A8、A9、A12、A15和A17字长【49】位,而A50系列中的A53和A57字长为【50】位。
—Wouldyouliketoseeafilmwithusthisevening?—Iwouldliketo.ButIcan’t______thetimebecauseIhavetofinishmycom
•LookatthestatementsbelowanddescriptionofsomeoftheEurope’sfastgrowingcompaniesontheoppositepage.•Whichcompan
最新回复
(
0
)