首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面事件过程: Private Sub Command1_Click() Dim a(20)As Integer,n(5)As Integer Dim m As Integer,Bum As Integer Randomi
有下面事件过程: Private Sub Command1_Click() Dim a(20)As Integer,n(5)As Integer Dim m As Integer,Bum As Integer Randomi
admin
2017-07-28
26
问题
有下面事件过程:
Private Sub Command1_Click()
Dim a(20)As Integer,n(5)As Integer
Dim m As Integer,Bum As Integer
Randomize
For k=1 To 20
a(k)=Int(Rnd*5)+1
Print a(k);
n(a(k))=n(a(k))+1
Next k
Print
m=n(1)
num=1
For k=2 To 5
If n(k)>m Fhen
m=n(k)
num=k
End If
Next k
Print m.num
End Sub
此事件过程运行时会出现2行输出,如果第一行输出是:
4 2 4 1 4 1 4 5 3 2 5 5 1 4 2 3 4 3 4 2
则第2行的输出是( )。
选项
A、5 3
B、7 4
C、3 5
D、4 7
答案
B
解析
在程序过程中定义了两个数组a和n,同时定义了两个整型变量m和num,程序中Randomize的功能是可以消除一个应用程序不断重复使用随机数时,同一序列的随机数会重复出现的情况。程序进入第一个For循环中,将会产生20个[1,5]区间的整数,并将产生的随机数存放到数组a中,语句“n(a(k))=n(a(k))+1”的功能是对产生的[1,5]区间的每个数进行计数统计,并将个数存储到数组n中,接下来的第二个For循环的功能是对区间[1,5]中的每个整数的个数求最大值,并将个数最多的整数进行输出。题目中产生的20个[1,5]区间的整数的个数依次为n(1)=3;n(2)=4;n(3)=3;n(4)=7;n(5)=3,可以得知整数4生成的次数最多,为7次。故程序最终输出7和4,B选项正确。本题选择B选项。
转载请注明原文地址:https://kaotiyun.com/show/KxGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Text1.Text="Visual"Me.Text1=
窗体的MouseDown事件过程Form_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)有4千参数,关于这些参数,正确的描述是______。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:optionBase1PrivateSubCommand1_Click()Dimaa=Array(1,2,3,4,5)
以下叙述错误的是______。
关键字ASC和DESC分别表示【】的含义。
符合结构化原则的三种基本控制结构是:选择结构、循环结构和【】。
在面向对象方法中,类之间共享属性和操作的机制称为【】。
如果准备读文件,打开顺序文件"text.dat"的正确语句是
符号%是声明______类型变量的类型定义符。
在结构化方法中,软件功能分解属于软件开发中的______阶段。
随机试题
在任何一次测量中,看测量结果能否达到预期的目的,主要取决于所应用的___________。
求积分
患者,女性,18岁。突然剧烈头痛伴呕吐,查体:颈项强直,克氏征阳性,布氏征阳性,体温37.0℃,既往体健。CT示双侧裂池及纵裂池内等密度影。患者每日尿量必须保证超过
总产程超过多长时间为滞产
某小型微利企业2016年当年应纳税所得26万元,弥补上年亏损后尚余5.1万元,该企业本年度应纳所得税税额为()万元。
某初中班主任夏某在学校晨读期间让本班陈同学到校外为自己买早点,陈同学过马路时,不幸遭遇车祸受伤。请问责任应由()。
关于《聊斋志异》的说法不正确的是:
某一研究者需要收集近年来国家教育事业发展的有关数据,最可靠的信息来源是()。
个人电脑属于()。
她在小花园里一个人看书喜欢坐
最新回复
(
0
)