首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Private Sub Command 1 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 Command 1 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
2020-04-18
75
问题
有下面程序代码:
Private Sub Command 1 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
程序运行后,单击命令按钮Command1,输出结果是
选项
A、2 6 12 20 30
B、2 12 20 56 90
C、30 28 24 18 10
D、10 18 24 28 30
答案
D
解析
使用Array函数建立的数组其下标下界为0,n的值是数组的上界即9:在循环中k从0循环到数组长度的一半,每次输出a(k)*a的值然后令n-1,故此容易得到每次输出的是数组两端值之积,依次向数组中间移动,即1*10、2*9、3*8、4*7、5*6。
转载请注明原文地址:https://www.kaotiyun.com/show/glTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮执行以下程序,则输出结果为()。PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=14:y=48:CallProc(x,y)
为达到把a、b中的值交换后输出的目的,某人编程如下:PrivateSubCommand1_Click()a%=10:b%=20Callswap(a,b)Printa,bEndSubPr
数据结构中,与所使用的计算机无关的是数据的()。
设x=4,y=6,则以下不能在窗体上显示出“A=10”的语句是
以下关于过程及过程参数的描述中,错误的是
设有下面的程序段:x=InputBox(”请输入一个整数”)ReDima(x)Fork=xTo0Step一1a(k)=kNextk一般,在这段程序之前应先进行数组a的定义。下面
设有如下变量声明语句:Dima,bAsBolean则下面叙述中正确的是
表达式Sgn(0.25)的值是
关于KevPress事件,以下叙述中正确的是
窗体上有一个名称为Timer1的计时器控件,一个名称为Shapel的形状控件,其Shape属性值为3(Circle)。编写程序如下:PrivateSubForm_Load()Shapel.Top=0:Timerl.Interval=100
随机试题
重复挤压井时,要先将井筒内的压井液放掉一部分,然后再进行压井作业。()
在进行安全需求分析时需要建立风险意识、权衡意识、相对意识和()
标准化分销渠道
论述复发性口疮的诊断与鉴别诊断。
对于结核性腹膜炎腹痛的特征,下述哪个不符合
患者女性,20岁,主因G1P0,妊娠30周,活动后觉心悸、胸闷3日来院就诊。患者3日前上两层楼梯后觉心悸、胸闷、气短,休息后缓解,无夜间睡眠后呼吸困难。查体:BP:110/60mmlHg,HR:100次/分,R:25次/分,SPO2:97%,胸骨左侧第3~
()是指执行基金管理人的投资指令,办理基金名义的资金来往的结算账户。
廉洁奉公这一道德规范,具体要求公务员做到()。
设f(x)在[1,2]上连续,在(1,2)内可导,且f′(x)≠0,证明:存在ξ,η,ζ∈(1,2),使得
In1963,formerSenatorGaylordNelsonbegantoworryaboutourplanet.SenatorNelsonknewthatourworldwasgetting【S1】______
最新回复
(
0
)