首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有下面程序代码: Private 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
设有下面程序代码: Private 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
admin
2020-04-18
26
问题
设有下面程序代码:
Private 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)
If a(k)>m Then
n=m:m=a(k)
ElseIf a(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/fSTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
结构化程序所要求的基本结构不包括( )。
已知变量x、y为整数型,且x=4,y=12,s为字符串型,且s=a,LblOk为标签控件,下列赋值语句不合法的是()。
现有如下程序:PrivateSubCommandl_Click()S=0Fori=lTo5S=S+f(5+i)NextPrint
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的代码如下:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=Val(InputBox("输入
以下叙述中错误的是( )。
为了使命令按钮显示为图形形式,要设置一些属性,下列与这些属性无关的是
当窗体大小改变时,要使其中的控件也按比例发生变化,应使用窗体的()。
下列叙述中正确的是( )。
窗体上有名称为Commandl的命令按钮,名称分别为Listl、List2的列表框,其中Listl的MuhiSelect属性设置为1(Simple),并有如-F事件过程:PrivateSubCommandl_Click()
随机试题
人类生活中最基本、最重要的一种群体形式是()
关于恒牙髓腔的叙述错误的是()
根据城市规模人数、房屋数、()等,可以确定给水工程的设计规模。
受国家政策扶持,3D打印产业及市场呈现爆发式增长。智创三维有限公司是国内一家3D打印设备制造商,该公司通过仿造国外同类产品,制造用来打印珠宝、齿科产品等中小型产品的3D打印设备。但是,受技术水平的制约,其产品质量欠佳,故障率明显高于国外同类产品。根据SWO
抽样的方法包括()。
某位新教师非常关注领导和同事对自己的评价,关注自己是否被学生喜欢,属于教师成长过程中的()。
禽流感流俗地说,就是禽类的病毒性流行性感冒,是由A型流感病毒引起禽类的一种从呼吸系统到严重全身败血症等多种症状的传染病,禽类感染后死亡率很高。其传染源主要是鸡、鸭,人类在直接接触受H5N1病毒感染的家禽及其粪便或直接接触H5N1病毒后也可能会受到感染。此外
在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框,其名称分别为Drive1、Dir1和File1。当改变目录列表框的内容时,要求文件列表框中显示当前选中的文件夹中的内容,则在Dir1_change事件过程中应使用的语句是:______。
Onecanunderstandothersmuchbetterbynotingtheimmediateandfleetingreactionsoftheireyesand______toexpressedthoug
A、We’llthinkofablackelephantmovingathighspeed.B、We’llcreateapurpleelephantinourimagination.C、We’lldrawanele
最新回复
(
0
)