首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下事件过程: Private Sub Command1_Click()Dim a a=Array(3,5,6,3,2,6,5,3,5,4,3,9,4,5,6,3,5) x=0 n=UBound(a) For i=0To n m=0 For j=0To
设有如下事件过程: Private Sub Command1_Click()Dim a a=Array(3,5,6,3,2,6,5,3,5,4,3,9,4,5,6,3,5) x=0 n=UBound(a) For i=0To n m=0 For j=0To
admin
2016-09-19
59
问题
设有如下事件过程:
Private Sub Command1_Click()Dim a
a=Array(3,5,6,3,2,6,5,3,5,4,3,9,4,5,6,3,5)
x=0 n=UBound(a)
For i=0To n
m=0
For j=0To n
If a(i)=a(j) Then
m=m+1
End If
Next i
Ifm>x Then
x=m:b=a(i)
End If
Next i
Print b
End Sub
运行程序,输出是
选项
A、2
B、3
C、5
D、9
答案
B
解析
本题是一个二重循环,外循环从0循环到n,也就是遍历整个数组:在内循环中统计数组中和a(i)相同的数组元素的个数放到m中,内循环结束后判断m是不是比x大,如果比x大的话让m成为新的x,并且把当前数组元素放到b中,其本质是求出重复次数最多的数字,x保存重复次数,b保存该数字。
转载请注明原文地址:https://kaotiyun.com/show/CdLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
从键盘上输入一个实数nu,利用字符串函数对该数进行处理,如果输出的内容不是字符End,则程序输出的内容是()。nu=InputBox("nu=")n$=Str$(nu)p=InStr(n$,".")ifp>0Th
在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Text1、Label1和Command1,然后编写如下两个事件过程:PrivateSubCommand1_Click()S$=InputBox("请输入一个字符串")T
确定复选框是否选中,可访问的属性是
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指
在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程:PrivateSubForm_Load() List1.AddItem"Item1" List1.AddItem"It
在窗体上画一个名称为“Command1”的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() DimaAsString a="123456789" Fori=1To5
要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目,则应把该列表框的MultiSelect属性设置为()。
在程序运行时,下面的叙述中正确的是()。
下列控件属性中,属性值的类型不相同的一项是()。
随机试题
肌梭传入纤维的神经冲动可
急进性肾小球肾炎主要的病理改变为
A、硝酸银试剂B、三苯四氮唑盐试剂C、苯胺-邻苯二甲酸试剂D、3,5-二羟基甲苯-盐酸试剂E、过碘酸加联苯胺使还原糖显棕黑色的显色剂是()。
建设工程档案移交应符合的要求包括( )。
发生铁路建设工程质量事故,建设、施工、监理单位应在事故发生后()小时内,向地区铁路监督管理局报告。
据虎门路东耗二村村民小组村民陈先生介绍,两年前,因修建广深沿江高速,包括他在内的26户村民近40亩土地(责任田和自留地)被征用。征用后,广深沿江高速以每亩15.2万元给予了社区补偿款,共600多万元。村小组的小组长多次表示,土地补偿款是集体所有,村小组将用
某中学在新生入学后,做了一项学生课余爱好调查,了解学生兴趣爱好,并依据学校教学计划,组建国学、器乐、生物、物理、航模等兴趣小组。其主要目的是()。
发展性评价的主要功能是()
假设你今天上午和朋友一起参观了一座现代化高中,该校示意图和你们的参观路线(图中的箭头所示)如下:请你写一篇日记,记述你们的参观过程。注意:词数100词左右。
WhichofthefollowingisNOTmentionedasanareainthebilateraltradebetweenChinaandArgentina?
最新回复
(
0
)