首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,有程序如下: Option Base 1 Private Sub Command1_Click() Dim a(10) As Integer ’第1个For For i = 1 To 1
窗体上有一个名称为Command1的命令按钮,有程序如下: Option Base 1 Private Sub Command1_Click() Dim a(10) As Integer ’第1个For For i = 1 To 1
admin
2015-06-30
57
问题
窗体上有一个名称为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, s
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://jikaoti.com/ti/b160FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在设计阶段,当双击窗体上的某个控件时,所打开的窗口是
执行语句Open"TC,dat"ForRandomAs#1Len=50后,对文件TC.dat中的数据能执行的操作是()。
在使用打印直接输出信息时,下列哪个属性或方法实现了使文件结束打印()。
下列选项中不属于结构化程序设计方法的是()。
下列程序段的执行结果为______。X=5Y=-20IfNotX>0ThenX=Y-3ElseY=X+3PrintX-Y;Y-X
下列关于队列的叙述中正确的是______。
下面______机制允许对一个函数名给出多个函数定义。
设有下列二叉树:对此二叉树前序遍历的结果为
把窗体的KeyPreview属性设置为True,并编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintKeyCode;En
可以产生30一50(含30和50)之间的随机整数的表达式是
随机试题
杆细胞中含有的视色素是
A、种植体B、正畸弓丝C、焊煤为硼砂D、用于正畸锁槽及无缝冠E、用于铸造基托、冠、桥等修复体锡焊合金
用鼠标左键单击一个窗口的最小化按钮之后,将使该窗口缩小成为位于( )上的一个按钮。
不需要在现金流量表上报告的重大的非现金交易事项为
金银首饰与其他产品组成成套消费品销售的,按销售全额征收消费税。()
当代一位犹太思想家的问题困扰了罗马教廷30年:一个基督教神职人员和一个普通信徒的灵魂是否都能进天堂?一个基督徒和一个其他宗教信徒的灵魂是否都能进天堂?一个有宗教信仰的人和一个无神论者的灵魂是否都能进天堂?如果有人的灵魂不能进天堂则“上帝之爱”就不是普适的;
滚滚红尘中充满着玄机,可只要有心,就定会找到______生命的密码,看到牛活斑斓多彩的一面。切不可身陷工作压力和家庭琐事之中而______。找到属于自己的那份志趣,投入到其中去吧!填入横线部分最恰当的一项是()。
Ironically,intheUnitedStates,acountryofimmigrants,prejudiceanddiscriminationcontinuetobeseriousproblems.There
Doctorsandpsychologistsaretalkingalotaboutstressnowadays.Wekeephearingabouthowharmfulstressis--howit【C1】_____
A、Thespeakersfeelitistoocold.B、Thetemperatureistoohottoputupwith.C、Thewomandoesnotthinktheweatherishot.
最新回复
(
0
)