首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有下面程序代码: 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
2019-03-14
69
问题
设有下面程序代码:
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://kaotiyun.com/show/8KFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个Text1文本框和一个Command1命令按钮。程序的功能是在文本框中输入密码后单击命令按钮则进行密码确认,若密码正确,弹出信息框显示"密码正确",若密码错误,弹出信息框显示"密码错误,请重新输入",但最多允许输出3次,若还不正确,则弹出信息框
在窗体上画一个名称为List1的列表框,然后编写如下程序:PrivateSubForm_Click()Fori=1To10Item="Item"&iList1.AddItemItem
下列符号常量的声明中不合法的是
构成计算机软件的是
以下叙述中正确的是( )。
将数据项"Student"添加到名称为List1的列表框中,并使其成为列表框第一项的语句为( )。
窗体上有1个名称为Commandl的命令按钮,事件过程如下:PrivateSubCommandl_Click()DimhumAsInteger,xAsIntegernum:Val(InputBox(“请输入一个正整数”))Selec
以下可以判断是否在文本框(名称为Textl)内按下了回车键的事件过程是
在考生文件夹下有一个工程文件sjt4.vbp。窗体上有名称为Label1的标签和名称为Timer1的计时器控件。该程序的功能是在名称为Label1的标签中循环显示不同的字符串。程序开始运行,在标签中显示“第一项”(如图3-114所示),且每隔1秒钟依次显示
某二树有5个度为2的结点,则该二叉树中的叶子结点数是()。
随机试题
症见胁肋瘀肿,痛不可忍,宜选用
滥用代理权与无权代理[武大2013年研]
民用建筑工程设计等级I级、Ⅱ级工程方案设计阶段的工作量比例是()
投资组合理论体现在()阶段。
某肥皂厂从建厂以来一直专注于开发肥皂产品,因其质量卓越、价格公道而广受市场好评,有自己稳定的消费群体。为了扩大经营规模,企业决定增加洗衣粉的生产。根据市场预测,可知这种洗衣粉市场状况的概率是畅销为0.3,一般为0.5,畅销为0.2。洗衣粉产品生产采取大、中
幼儿发展评价是否科学、恰当主要取决于()。
利用几何级数求末项的公式推算若干年后的总人数,这是人口总数预测方法中的()。
ExpertspredictthatChina’shealthcaremarketwillhaveanannualgrowthof6to8percentinthenextfewyears,makingiton
上周日我去姐姐家玩儿,她一开门,我就笑了,她的鼻子上、耳朵上都是面,眼镜上也有,她告诉我她正在厨房里做蛋糕呢。他姐姐:
A、OutstandingteacherslikeProfessorJohnsonarerare.B、ProfessorJohnsonhaswonamilliondollarsasanaward.C、ProfessorJ
最新回复
(
0
)