首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Private Sub Command1_Click() a=Array(1,2,3,4,5,6,7,8,9,10):n=UBound(a) For k=0 To UBound(a)/2 Print a(k)*a(n);:n=n-1 Ne
有下面程序代码: Private Sub Command1_Click() a=Array(1,2,3,4,5,6,7,8,9,10):n=UBound(a) For k=0 To UBound(a)/2 Print a(k)*a(n);:n=n-1 Ne
admin
2016-09-19
38
问题
有下面程序代码:
Private Sub Command1_Click()
a=Array(1,2,3,4,5,6,7,8,9,10):n=UBound(a)
For k=0 To UBound(a)/2
Print a(k)*a(n);:n=n-1
Next k
End Sub
程序运行后,单击命令按钮Commandl,输出结果是
选项
A、2 612 20 30
B、2 12 20 56 90
C、30 28 2 418 10
D、10 18 24 28 30
答案
D
解析
使用Array函数建立的数组其下标下界为0,n的值是数组的上界即9;在循环中k从0循环到数组长度的一半,每次输出a(k)*a(n)的值然后令n-1,故此容易得到每次输出的是数组两端值之积,依次向数组中间移动,即1*10、2*9、3*8、4*7、5*6。
转载请注明原文地址:https://kaotiyun.com/show/vpLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序运行时,单击窗体后,窗体上显示的结果是()。PrivateSubForm_Click()DimIAsIntegerDimsumAsLongsum=0ForI=10To16
已知数组A(4,4),各个元素在运行程序时被赋值并打印,形成四除非方阵。请在________和________处填所需的内容,使其产生一个转置矩阵(即行列互换),仍放在数组A中,并打印出来。例如:1234123
对于图书管理数据库,将图书表中“人民邮电出版社”的图书的单价涨价5%。请对下面的SQL语句填空:UPDATE图书______WHERE出版单位="人民邮电出版社"
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:PrivateSubCommand1_Click()DimxAsIntegerStaticyAsIntegerClsx=x+5
窗体上有List1、List2两个列表框,程序运行时,在两个列表框中分别选中1个项目,如图a所示,单击名称为Commandl的“交换”按钮,则把选中的项目互换,互换后的位置不限,如图b所示。下面的程序可实现这一功能,请填空。Privat
常见的软件工程方法有结构化方法和面向对象方法,类?继承以及多态性等概念属于【】。
窗体上有文本框Text1和一个菜单,菜单标题、名称见表,结构如图。要求程序执行时单击“保存”菜单项,则把其标题显示在Text1文本框中,下面可实现此功能的事件过程是()。
关于变量作用域,下列叙述中正确的是()。
下列关于通用对话框CDI的叙述中,错误的是()。
在Form1的窗体上绘制一个名为Lab1的标签框,设置相关属性,使标签有框架。然后建立一个主菜单,标题为“操作”,名为vbOp,该菜单有两个菜单项,其标题分别为“显示”和“隐藏”,名称分别为vbDis和vbHide。编写适当的事件过程,程序运行后,若单击“
随机试题
油气的流动是各种能量同时作用的结果,在油田的不同开发阶段各自发挥的作用大小相同。()
下列哪项不是浅龋的临床表现
球后穴位于眶下缘的
定金合同是当事人双方为了保证债务的履行,按照合同规定向对方预先给付一定数额的货币,定金的数额由当事人约定,但不得超过主合同标的额的()。
某办公大楼在保修期间出现外墙裂缝,经查是由于设计缺陷造成,原施工单位进行了维修,之后应向( )主张维修费用。
计算机内处理的是汉字的交换码。()
法律制裁是实现法律责任的方式,其内容包括制裁、补偿和强制。其电,制裁是最主要的实现法律责任的方式。 ( )
用人单位与劳动者发生劳动争议,当事人可以依法申请调解、仲裁、提起诉讼,也可以协商解决。()
中国抗日战争全面爆发的标志是九一八事变。()
Ifyouwanttoimproveyourchild’sresultsatschool,【T1】______thattheydoplentyofexercise.Scientistshavealreadyshownt
最新回复
(
0
)