首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command 1的命令按钮,有程序如下: Option Base 1 Private Sub Command 1 Click() Dim a(10)As Integer‘第1个For For i=1 To 10 a(i)=In
窗体上有一个名称为Command 1的命令按钮,有程序如下: Option Base 1 Private Sub Command 1 Click() Dim a(10)As Integer‘第1个For For i=1 To 10 a(i)=In
admin
2015-05-29
41
问题
窗体上有一个名称为Command 1的命令按钮,有程序如下:
Option Base 1
Private Sub Command 1 Click()
Dim a(10)As Integer‘第1个For
For i=1 To 10
a(i)=Int(Rnd*100+100)
Print a(i);
Next
x=a(i):y=x’第2个For
For i=1 To 10
If x
Ify>a(i)Then y=a(i)
s=s+a(i)
Next
Print x,y,s
End Sub
关于上述程序的叙述中,正确的是
选项
A、程序运行出错,第1个For循环之后的x=a(i)赋值语句错
B、程序正常运行,x是10个随机数中的最大值
C、程序正常运行,s是10个随机数的和
D、程序正常运行,10个随机数的范围是100-200
答案
A
解析
随机数函数Rnd的功能是用于产生一个小于1但大于或等于0的随机数,本题中产生的整数的范围是100-199;在第一个循环结束后,循环变量i的值为不满足循环条件的值11,在紧随其后的x=a(i)语句将会执行出错,因为出现了数组越界。
转载请注明原文地址:https://jikaoti.com/ti/8f60FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
Sub过程与Function过程最根本的区别是
运行下面的程序后,输出的结果为ClsDimt(5,5)asIntegerFori=1To5:t(i,i)=1:NextFori=1To5Forj=1T
目前,有两种重要的高级语言,分别是结构化程序和【】。
定义有5个整数型元素的数组,正确的语句是
数据库设计包括两个方面的设计内容,它们是
在窗体上画一个命令按钮Command1和一个文本框Text1,然后编写如下程序:PrivateSubCommand1_Click()A=InputBox("请输入日期(1~31)")t="旅游景点:"
在面向对象方法中,()描述的是具有相似属性与操作的一组对象。
面向对象的程序设计方法是把【】封装起来作为一个对象,并为每一个对象设置所需要的【】。
在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名称分别为Label1、Label2。要求程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下面的标签中显示出来。请填空使程序完整。PrivateSub
随机试题
撰写市场研究报告应该注意的问题不包括()
Wemust______earlyinthemorningsoastocatchthefirsttrain.
稀释式自身输血是指在麻醉成功后手术开始前,采集患者一定数量的血液,同时输注一定数量的晶体和胶体溶液以补充有效循环容量且维持其正常稳定,使血液稀释,并在患者失血后回输其先前采集的血液。适用于为避免前负荷过大造成急性左心衰,在麻醉前采集患者全血的自身输血方
从投资者角度看,风险分为两类:市场风险和公司特有风险,下列属于公司特有风险的有:()。
设备制造前的进度控制内容包括( )。
某沿海城市道路改建工程4标段,道路正东西走向,全长973.5m,车行道宽度15m,两边人行道各3m,与道路中心线平行且向北,需新建DN800mm雨水管道973m。新建路面结构为150mm厚砾石砂垫层,350mm厚二灰混合料基层,80mm厚中粒式沥青混凝土,
下列文化现象是在维新变法的思想启蒙作用下发生的有()。①史学革命②诗界革命③清末小说繁荣④京剧形成
图中的“X”等于()。根据材料,以下说法正确的是()。
被告人:刘某,男,30岁。l995年6月因犯故意伤害罪被判处有期徒刑3年,1998年6月刑满释放。景某,男,25岁。1995年7月因盗窃被劳动教养3年,1998年7月解除劳动教养,2000年11月28日因本案被逮捕。20009月间,被告人刘某找到被告人
Intheearly1450’sculturalchangeinEuropefueledagrowingneedfortherapidandcheapproductionofwhitendocuments.Befo
最新回复
(
0
)