首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下事件过程: 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
16
问题
设有如下事件过程:
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://jikaoti.com/ti/GsJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定在窗体上建立一个通用对话框,其名称为CommonDialog1,用下面的语句可以建立一个对话框:CommonDialog1.Action=4与该语句等价的语句是()。
执行以下程序段后,x的值为()。DimxAsInteger,iAsIntegerx=0Fori=20To0Step-2 x=x+i\5Nexti
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() DimaAsInteger,sAsInteger a=8 s=1 Do
从键盘上输入一个实数nu,利用字符串函数对该数进行处理,如果输出的内容不是字符End,则程序输出的内容是()。nu=InputBox("nu=")n$=Str$(nu)p=InStr(n$,".")ifp>0Th
在窗体上添加一命令按钮,其名为Command1,然后编写代码如下:privateSubCommand1_Click()Dimarr(5)AsInteger,arr1(5)ASInteger n=3 Fori=
面程序的功能是找出能够被13、23、43除余数分别为1、2、3的最小的两位正整数。请填空。PrivateSubForm_Click() DimiAsInteger,jAsInteger j=0 j=43
定时器的Interval属性以()为单位指定Timer事件之间的时间间隔。
设窗体上有Text1文本框和Commandl命令按钮,并有以下程序:PrivateSubCommandlClick()tempS:“”Fork=1ToLen(Text1)ch$=
设a=5,b=6,c=7,d=8,执行下列语句后,x的值为()。x=Ilf((a>b)And(c>d),10,20)
下列关于控件焦点的叙述中正确的是()。
随机试题
劳动定额在质量上的要求就是使定额水平()
废用性萎缩的原因为
张某向侦查人员说,他和李某在喝酒时.李某曾经无意中提起其曾经强奸过一个女孩的经过。张某向侦查机关提供的证据,属于证据分类中的哪一种?( )
不符合银行本票相关规定的是()。
需要预测某宗房地产2007年、2008年的价格。通过市场调研,获得该类房地产2002~2006年的价格并计算其逐年上涨额如表2—8所示。预测该宗房地产2008年的价格为()元/m2。
从()上看,素质教育是为了全面提高学生的素质也就是为了全面提高国民的素质,它反映了现代的、先进的教育思想。
病原体侵入人体后,临床上不显示出任何症状、体征,但可产生特异性免疫,被称为()。
注意(苏州大学2014、2011研)
下列关于宪法发展历程的说法,正确的是()
WindowsNTServer内置的网络协议有______。Ⅰ.TCP/IPⅡ.MWLinkⅢ.NetBEUIⅣ.数据链路控制协议
最新回复
(
0
)