首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,有程序如下: Option Base 1 Private SUb Command1_Click() Dim a(10)As Integer 第1个For For i=1 To 10 a(i)=Int(Rnd*1
窗体上有一个名称为Command1的命令按钮,有程序如下: Option Base 1 Private SUb Command1_Click() Dim a(10)As Integer 第1个For For i=1 To 10 a(i)=Int(Rnd*1
admin
2020-04-18
58
问题
窗体上有一个名称为Command1的命令按钮,有程序如下:
Option Base 1
Private SUb Command1_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<a(i)Then x=a(i)
If y>a(i)Then y=a(i)
s=s+a(i)
Next
Print x,y,8
End Sub
关于上述程序的叙述中,正确的是
选项
A、程序运行出错,第1个For循环之后的x=a(i)赋值语句错
B、程序正常运行,x是10个随机数中的最大值
C、程序正常运行,S是10个随机数的和
D、程序正常运行,10个随机数的范围是100-200
答案
A
解析
第一个For循环中缺省Step,步长为1,退出循环时下标为10,第1个For循环之后的x=a(i)赋值语句下标越界,出错。选A。
转载请注明原文地址:https://www.kaotiyun.com/show/EcTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于VB的叙述中,错误的是( )。
阅读程序:OptionBase1SubP(b()AsInteger)Fori=1To4b(i)=2*iNextiEndSubPrivateSubForm_Click()
有如下程序:PrivateSubForm_Click()DimSAsStringS=InputBox("请输入一个字符串:")Fori=1ToLen(S)\2IfMid(S,
下列操作中不能向工程中添加窗体的是()。
能够容纳其他控件的控件是容器控件,框架与图片框都是容器控件。下面的叙述中正确的是()。
设a="VisualBasic",下面语句中可使b="Basic"的是()。
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。在横线处应填写()。PrivateSubCommand1_Click()DiminDataAsStrin
下列二叉树描述中,正确的是()。
表达式Abs(-5)+Len("ABCDE")的值是()。
在学校中,“班级”与“学生”两个实体集之间的联系属于()关系。
随机试题
简要说明语音的物理四要素。
潜伏期延长活跃期停滞
背景资料:某承包人承接了一座大桥工程,该桥采用Ф1.6m的桩基础,桩长约25~32m;桥位处地层均为天然砂砾,地下水位在原地面下约1.5m处。其桩基主要施工过程如下:平整场地、用水准仪进行桩位放样、埋设钢护筒、选用正循环回旋钻机作为成
常用的热轧光圆钢筋级别为I级,强度等级代号为()。
决定有价证券理论价格的因素主要有()。
A公司拟购买某公司债券作为长期投资(打算持有至到期),要求的必要收益率为6%。现有三家公司同时发行5年期、面值均为1000元的债券,其中:甲公司债券的票面利率为8%,每年付息一次,到期还本,债券发行价格为1041元;乙公司债券的票面利率为8%,单利计息,
(河北事业单位2011—22)有甲、乙两项工作,李师傅单独完成甲工作需要10天,单独完成乙工作需要12天;孙师傅单独完成甲工作需要3天,单独完成乙工作需要15天。如果两人合作完成这两项工作,最少需要()天。
马王堆一号坟墓曾出土一样纺织品()不到一两重。(武汉理工2017年研)
马克思在《路易.波拿巴的雾月十八日》一文中,对为什么路易.波拿巴这样“一个平庸而可笑的人物有可能扮演了英雄的角色”作了精辟的分析,树立了评价历史人物的典范。在阶级社会,评价历史人物应该坚持
A、HeisinterestedinEnglish.B、HeisnotinterestedinEnglish.C、Heisafriendofmine.D、Heistallandthin.D该题考查作评论性回答的能
最新回复
(
0
)