首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有下面程序代码: Pfivme Sub Command1_Click() Dim a As Variant a=Array(22,43,23,56,87,45,67,12,98,98,56,34,23,75,64)
设有下面程序代码: Pfivme Sub Command1_Click() Dim a As Variant a=Array(22,43,23,56,87,45,67,12,98,98,56,34,23,75,64)
admin
2019-03-08
28
问题
设有下面程序代码:
Pfivme Sub Command1_Click()
Dim a As Variant
a=Array(22,43,23,56,87,45,67,12,98,98,56,34,23,75,64)
m=a(0)n=m
For k=1 To UBound(a)
Ifa(k)>mThen
n=m:m=a(k)
Elselfa(k)>n And a(k)<>m Then
n=a(k)
End If
Next k
Print n
End Sub
程序运行时的输出是
选项
A、数组中最大的数(即98)
B、数组中最小的数(即12)
C、数组中第2大的数(即87)
D、数组中第1个数(即22)
答案
C
解析
本题显然是求取数组最大值的,先取得数组的第一个元素作为最大值,然后用m保存最大值;在循环中如果发现了有比m还大的数组元素,则将该元素作为新的最大值,原来的最大值m赋值给n;如果元素不比m大就去比较元素是否大于n,若大于n则将元素赋值给n,所以循环结束后n中的值是数组中第2大的数。
转载请注明原文地址:https://kaotiyun.com/show/DYFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerDimsAsStrings="2013-
有如下程序段:x=5Fori=1To20Step2x=x+i\5Nexti执行上面的程序段后,x的值为
有如下程序代码:PrivateSubForm_Click()DimiAsInteger,nAsIntegerFori=0To30i=i+3n=n+1
设有数组声明:Dims(2,3),下面错误的程序段是
下面关于列表框控件的叙述中错误的是
下列叙述中正确的是
如果希望向一个顺序文件写入数据,但又要保留文件中的原有内容,应采取的文件打开方式是
为了用形状控件画出不同的图形,应设置的属性是
在设计阶段,如果双击窗体上的一个文本框控件,则在代码窗口中显示该控件的事件过程所对应的事件是
随机试题
中国共产党的全国代表大会的职权包括()
男,31岁,右上前牙外伤折断半小时,检查:近中切缘斜折,缺损范围约为冠1/5,牙本质暴露,未见露髓孔,探诊敏感,无松动,X线片示:牙根无异常。检查该患牙牙髓活力的时间应在外伤后多长时间进行
以下哪部著作论述了儿科望指纹的应用
体外无抗肿瘤活性,在肝脏转化后发挥作用的药物是
根据材料回答以下问题刘先生是一位教师,他向银行申请了20年期20万元贷款,利率为5.508%。若刘先生采用等额本息还款法来还贷,则他的每月还款额为()元。
直复营销的特征是()。
下列各句没有语病的一项是( )。
最早有牙再植术记载的是()。
Solittle______aboutmathematicsthatthelecturewascompletelybeyondme.
"Ithurtsmemorethanyou",and"Thisisforyourowngood."Thesearethe【C1】______mymotherusedtomakeyearsagowhenIhad
最新回复
(
0
)