首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: 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
88
问题
有下面程序代码:
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全国计算机二级
相关试题推荐
设有数组声明语句:OptionBase1DimA(2,-1To1)以上语句所定义的数组A为______维数组,共有______个元素,第一维下标从______到______,第二维下标从______到______。下列选项
在窗体上画一个名称为Text1的文本框,要求文本框只能接收大写字母的输入。以下能实现该操作的事件过程是()。
已知数组A(4,4),各个元素在运行程序时被赋值并打印,形成四除非方阵。请在________和________处填所需的内容,使其产生一个转置矩阵(即行列互换),仍放在数组A中,并打印出来。例如:1234123
VisualBasic是一种面向对象的程序设计语言,构成对象的三要素是()。
设窗体上有一个名为Text1的文本框,并编写如下程序:PrivateSubForm_Load()ShowText1.Text=""Text1.SetFocusEndSubPrivateSubForm
以下关于窗体的叙述中,错误的是
下列叙述中,正确的是()。
下列有关过程的叙述中错误的是()。
下列控件属性中,属性值的类型不相同的一项是()。
设已经在窗体上添加了一个通用对话框控件CommonDialog1,以下语句正确的是()。
随机试题
患者,女性,69岁。慢性咳嗽伴喘45年,平素生活规律,注意耐寒锻炼,晨起坚持散步。2天前因受凉咳嗽、咳白痰、流涕,伴咽痛。4小时前突然出现左胸疼痛,伴进行性气短加重。最佳处理原则是
A.无对称性的四肢大关节游走痛B.有对称性的多关节慢性炎症C.近端指间关节,腕、足、膝、踝等关节炎症常对称分布D.有对称性、无游走性的关节痛E.膝、髋、踝关节,多为不对称
A.抑制细菌蛋白质合成B.抑制细菌细胞壁合成C.影响细菌细胞膜通透性D.干扰细菌叶酸代谢E.抑制细菌DNA螺旋酶氨基糖苷类药物的抗菌机制是
收益性物业的经营费用不包括()。
根据海关有关管理规定,目前可以向海关办理报关注册登记手续的企业有()。
人类基因组测序完成后,生物学家便一直在绘制碱基上的小差异,即单核苷酸多态性,这些小差异成为2007年10余个研究项目的关键内容。在这些被称为广泛关联基因组研究中,研究人员对数千名患病或无病个体的DNA进行了对比,以确定哪些小的基因差异会给人类带来疾病风险。
AnewstudypublishedinthejournalProceedingsoftheRoyalSocietyBbytheteamsofDr.GregoryWestandDr.VeroniqueBohbo
给你的好友张龙发送一封主题为“购书清单”的邮件,邮件内容为:“附件中为购书清单,请查收。”,同时把附件:“购书清单.docx”一起发送给对方,张龙的邮箱地址为zhanglong@126.com。
WhichofthefollowingstatementsaboutthetelephoneofthefutureisNOTtrue?
【B1】【B17】
最新回复
(
0
)