首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有下面程序代码: Private Sub Commandl 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
设有下面程序代码: Private Sub Commandl 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
admin
2019-04-29
26
问题
设有下面程序代码:
Private Sub Commandl 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)>m Then
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/UFUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件sjt4.vbp,其中的窗体中有一个组合框和一个命令按钮(如图3-196所示)。程序的功能是在运行时,如果在组合框中输入一个项目并单击“添加”按钮,则搜索组合框中的项目,如果没有此项,则把此项添加到列表中;如果有此项,则弹出提示
在窗体上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下事件过程:PrivateSubCommandlClick()x=0doWhilex
以下能正确定义数据类型Systemlnfo的代码是()。
窗体上有两个名称分别为Textl、Text2的文本框,一个名称为Commandl的命令按钮。设有如下的类型声明:TypePersonnameAsString*8majorAsString*20EndType
在考生目录下有一个工程文件sjt5.vbp,其窗体上有一个文本框,名称为Textl;还有两个命令按钮,名称分别为C1、C2,标题分别为“计算”、“存盘”,如图3-20所示。并有一个函数过程isprime(a)可以在程序中直接调用,其功能是判断参数a是否为素
软件设计中模块划分应遵循的准则是
在名称为Form1的窗体上添加一个名称为Label1、标题为“添加项目”的标签;添加一个名称为Text1的文本框,初始内容为空;添加一个名称为Combo1的下拉式组合框,并通过属性窗口输入若干项目(不少于3个,内容任意);再添加两个命令按钮,名称分别为Co
为了验证一个正整数n(n>3)是否为素数,最直观的方法是,看在2~n/2范围内能否找到一个整数m将n整除,若m存在,则n不是素数;若找不到m,则n为素数。在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有1个名称为Text1的文本框。请根据上面的算法
下列运算符中,优先级别最高的是
随机试题
A.DNApolαB.DNApolβC.DNApolγD.DNApolδ真核生物线粒体DNA复制的酶
A.1日常用量B.2日常用量C.3日常用量D.7日常用量E.15日常用量为门(急)诊癌症疼痛患者和中、重度慢性疼痛患者开具的麻醉药第一类精神药品注射剂,每张处方不得超过
艾滋病患者肺部最常见的机会性感染的病原体是()
下列关于可续保定期寿险的叙述错误的是( )。
吠陀
巴布教徒起义
A、 B、 C、 D、 B
下列哪一个不是NetWare操作系统提供的4组安全保密机制
一个模块被多个模块调用,调用这个模块的模块个数称为【】。
ThechangesingloballyaveragedtemperaturethathaveoccurredattheEarth’ssurfaceoverthepastcenturyaresimilarinsize
最新回复
(
0
)