首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有下面程序代码: Option Base 1 Private Sub Command 1_Click() Dim x(6) a=Array(4,2,5,1,6,3) b=Array(64,24,98,27,58,41) For k=1 To
设有下面程序代码: Option Base 1 Private Sub Command 1_Click() Dim x(6) a=Array(4,2,5,1,6,3) b=Array(64,24,98,27,58,41) For k=1 To
admin
2020-01-02
49
问题
设有下面程序代码:
Option Base 1
Private Sub Command 1_Click()
Dim x(6)
a=Array(4,2,5,1,6,3)
b=Array(64,24,98,27,58,41)
For k=1 To 6
x(a(k))=b(k)
Next k
For k=1 To 6
Print x(k);
Next k
End Sub
程序运行时的输出是
选项
A、27 24 41 64 98 58
B、64 24 98 27 58 41
C、24 27 41 58 64 98
D、98 64 58 41 27 24
答案
A
解析
本题是一个简单的数组赋值,只要把握好每次为哪个元素赋以什么样的值就不会出错。最后x数组中存放的数据依次是27、24、41、64、98、58。
转载请注明原文地址:https://kaotiyun.com/show/mnTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1、标题为“欢迎”的窗体上画1个名称为Labe11的标签,其标题内容为“欢迎使用本系统”,标题文字字体和字号分别为“宋体”、“三号”,标签大小能根
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1,标题为“滚动条属性设置”的窗体上画1个名称为VScroll1的垂直滚动条,设置属性,使得滚动块在最上面时,其位置值为10;滚动块在最下面时,其
在窗体上画一个命令按钮,然后编写如下时间过程()。PrintSubCommandl_Click()a=InputBox(”EntertheFirstinterger”)b=InputBox(”Ente
满足下列条件之一的年份是闰年:1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份,下面判断闰年的正确表达式是
有下面程序代码:PrivateSubCommandl_Click()DimaAsStringa=”COMPUTER”n=search(a,”T”):PrintIIf(n=0,”未找至0”,n)En
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是
以下说法中正确的是
以下关于框架的叙述中,错误的是
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:PfivateSubCommandl_Click()Open”c:\f1
对下列二叉树进行前序遍历的结果为()。
随机试题
可解蛇毒治毒蛇咬伤的药物是
关于支原体肺炎,不正确的是
结构混凝中氯离子含量系指其占()的百分比
某办公楼的一个公共男卫生间内设有蹲式大便器4个(延时自闭式冲洗阀,给水当量取6.00)、小便器4个(自动自闭式冲洗阀,给水当量取0.50)、洗手盆2个(感应水嘴,给水当量取0.50)和拖布池1个(单阀水嘴,给水当量取1.00),则该卫生间的给水设计秒流量为
煤层被开采时,煤体受到破坏或采动影响,贮存在煤体内的部分瓦斯就会离开煤体而涌人采掘空间,这种现象称为()。
对于人均建设用地指标为75~105m2的城市,到2010年其人均公共绿地面积应不少于()m2。
可供投资者分配利润的方法有:①应付优先股股利;②转作资本的普通股股利;③提取任意盈余公积金;④应付普通股股利,其正确的分配顺序是( )。
以市场价格作为内部转移价格,就等于直接将市场价格用于内部结算。()
2013年3月18日,甲机械公司与乙融资租赁公司接洽融资租赁某型号数控机床事宜。同年4月1日,乙按照甲的要求与丙精密设备公司签订了购买1台某型号数控机床的买卖合同。丁以乙的保证人身份在该买卖合同上签字,但合同中并无保证条款,丙和丁亦未另行签订保证合同。
设α1,α2,…,αn是一组n维向量,证明它们线性无关的充分必要条件是任一n维向量都可由它们线性表示。
最新回复
(
0
)