首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下事件过程: Private Sub Command1_Click()Dima 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=0 To n m=0 For j=0 T
设有如下事件过程: Private Sub Command1_Click()Dima 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=0 To n m=0 For j=0 T
admin
2019-04-29
37
问题
设有如下事件过程:
Private Sub Command1_Click()Dima
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=0 To n
m=0
For j=0 To n
If a(i)=a(j)Then
m=m+1
End If
Next j
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/a1Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要使图像框(Image)中的图像能随着图像框的大小伸缩,应该设置的属性及值是
下列关于标签的描述中,错误的是
要使标签中的文本靠右显示,应将其Aligment属性设置为
窗体上有两个名称分别为Text1、Text2的文本框。Text1的KeyUp事件过如下:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger)c=UCase(Chr(KeyCode)):
下列不包含滚动条的控件是
如果在列表框Listl中没有选中项目,则List1.Listlndex的值为
下列排序方法中,最坏情况下比较次数最少的是
在标准模块中用Public关键字定义的变量,其作用域为
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为ComTestl。设窗体Forml标题为“MyForml”,双击控件数组中的第3个按钮,打开代码编辑器,编写如下代码:PrivaeSubComTestl——Click(Index
随机试题
太平天国后期,提出《资政新篇》这一具有资本主义色彩改革方案的是()
下列选项中,不属于改变病情的抗风湿药物是
断面沾水,即呈乳白色隆起,粉末嗅之作嚏。此药材是
大肠癌术后护理措施中错误的是
防腐蚀涂层常用的施工方法有()。防腐蚀涂层采用刷涂法的缺点是()。
“授之以渔”体现了社会工作的( )特点。
WriteacompositiononthetopicLivingAloneorLivingwithRoommates?Youshouldwriteatleast120wordsfollowingtheoutline
A、 B、 C、 D、 D
Inthefollowingarticle,somesentenceshavebeenremoved.ChoosethemostsuitableonefromthelistA—Gtofitintoeachoft
若进程P1正在运行,操作系统强行撇下P1进程所占用的CPU,让具有更高优先级的进程P2运行,这种调度方式称为(15),此时P1进程处于(16)状态。(17)将CPU的时间分成若干个时间片轮流地为各个用户服务。
最新回复
(
0
)