首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有下面程序代码: Private Sub Command1_Click() Dim a As Variant a = Array(22, 43, 23, 56, 87, 45, 67, 12, 98, 98, 56, 34, 23, 75
设有下面程序代码: Private Sub Command1_Click() Dim a As Variant a = Array(22, 43, 23, 56, 87, 45, 67, 12, 98, 98, 56, 34, 23, 75
admin
2015-08-28
56
问题
设有下面程序代码:
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
解析
n和m都获得数组元素a(0)的值。在For循环中,k=1时,a(k)=a(1)=43,If条件满足,n=a(0),m=a(1)。Else If判断的相同值的条件,只有在大于n并且不等于m的时候才赋值给n。因此n中存储的数永远比m小。而m中的值是数组中最大的值。因此选C)。
转载请注明原文地址:https://www.kaotiyun.com/show/PzLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
启动窗体在【】对话框中指定。
为了定义自己的鼠标光标,首先应把MousePointer属性设置为【】,然后把【】属性设置为一个图标文件。
设a=5,b=6,c=7,d=8,则执行下列语句后,x的值为______。x=IIF((a>B)And(c<D),10,20)
以下叙述中错误的是______。
下列这个Sub过程的功能是:统计字符串中“a”的个数,请在空白处填上合适的代码,将程序补充完整。PrivateSubnumCount()DimnumAsIntegers$="softwareAndhardware"num=Len(s$
语句DimArt(3To5,-2To2)定义的数组的元素个数是()。
在数据库的3级模式结构中,内模式有______个。
为了使模块尽可能独立,要求______。
某二叉树中度为2的结点有18个,则该二叉树中有______个叶子结点。
有下列二叉树,对此二叉树中序遍历的结果为()。
随机试题
患者女性,30岁,孕29周,半夜睡醒突然发现自己睡在血泊之中,到达医院时已接近休克状态。此患者最可能的诊断是
体表血络扩张,纵横丛集形成的肿瘤是
王女士,44岁。体质指数为27.1kg/m2,她意识到自己体重超重,打算通过运动控制体重,但总是觉得没有适合自己的运动方式,迟迟没有开始行动。按照行为改变阶段理论划分,王女士处于行为改变的
财务报告是企业财务信息对外报告的重要形式之一。下列做法不符合《企业内部控制应用指引第14号——财务报告》要求的有()。
一个完整的计算机系统包括()。
一个民族的追求与向往、历史与传承往往通过节日_______出来。传统节日期间的各种带有仪式性的活动甚至饮食,都能_______人们强烈的情感波澜,使人们深深感觉到自己是这个民族的一分子。因此,传统节日_______了民族身份认同,是区分不同民族、不同文化的
在UNIX操作系统中,若用户键入的命令参数的个数为1时,执行cat $1命令;若用户键入的命令参数的个数为2时,执行cat>>$2<$1命令。请将下面所示的Shell程序的空缺部分补齐。 case(1)in 1)cat $1;;
Therearefewplacesinthiscountry______wheatcan’tgrowwell.
Nikeisoneoftheworld’sbest-knownsportsshoeandclothescompanies.Itearnsover$1billionayear.Itmarketsrunningsho
July11Ileftonmytriptoday.Havingbeenoverseasbefore,Ifeltsomewhatateasewiththeideaoftraveling【B1】______.
最新回复
(
0
)