首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并在文本框Text1中输出该数组中各元素的最小值。请填空。 Option Base 1 Private Sub Commandl Click() Dim arrl
下面程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并在文本框Text1中输出该数组中各元素的最小值。请填空。 Option Base 1 Private Sub Commandl Click() Dim arrl
admin
2013-01-07
110
问题
下面程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并在文本框Text1中输出该数组中各元素的最小值。请填空。
Option Base 1
Private Sub Commandl Click()
Dim arrl()
Dim Min As Integer,i As Integer
arr1=Array(12,-24,435,76,866,78,43,54)
Min=________
For i=2 To 8
If art1(i)<Min Then______
Next i
Textl=Min
End Sub
选项
答案
arrl(1) Min=arrl(i)
解析
本题中,需要把数组元素依次与最小值比较,如果比之前的最小值还小,则让这个数组元素成为新的最小值,然后继续比较,直至数组元素都比较完为止。由于比较的循环从2开始,预先设置最小值为数组的第一个元素即arr(1),在比较循环内部如果符合条件语句的条件,则让这个数组元素成为新的最小值,即Min=arr1(i)。
转载请注明原文地址:https://kaotiyun.com/show/u3up777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
请打开考生文件夹下的解决方案文件proj3,其中声明IntSet是一个用于表示正整数集合的类。IntSet的成员函数Intersection的功能是求当前集合与另一个集合的交集。请完成成员函数Intersection。在main函数中给出了一组测试数据,此
下列运算符只能重载为成员函数的一组是
有如下语句序列:charstr[10];cin>>str;当从键盘输入“Ilovethisgame”时,str中的字符串是()。
建立一个类对象时,系统自动调用
在下列关键字中,不能用来表示继承方式的是()。
设c1和c2是类MyClass的对象,若将运算符"+"和"*"作为类MyClass的成员函数重载,则表达式c1+c2*c1等价于
使用VC6打开考生文件夹下的源程序文件modil.cpp,该程序运行时有错误,请补充程序中的丢失部分,使得程序运行。可以在修改处增加或者删除一条语句。本程序完成以下功能:(1)获得输入的两个数字x1,x2(例如x1=4,x2=2);
在满足实体完整性约束的条件下( )。
软件设计中模块划分应遵循的准则是( )。
在长度为n的有序线性表中进行二分查找,最坏的情况下,需要的比较次数为______。
随机试题
用水蒸气在列管换热器中加热某盐溶液,水蒸气走壳程。为强化传热,下列措施中最为经济有效的是()。
患者刘某,住院第二天,主管护士查房时刘某说:“感觉不舒适,难以入睡”。护士给其提供护理时首先应()。
A.泪腺神经B.眼神经C.额神经D.上颌神经E.鼻睫状神经三叉神经最小的分支是
善于上助心阳、中温脾阳、下补肾阳的药物是
石菖蒲来源于()
A县药品稽查人员在该县的一村卫生室进行监督检查,现场查获标示为B省的大众生物科技有限公司生产的金银花百合片和乌梢蛇桔梗胶囊等8种产品,共计6000盒,这些产品所含成分与国家药品标准规定的成分不符。A县公安局经立案侦查发现,B省的大众生物科技有限公司是两年
(2016年)陈某转让一辆中巴车给王某但未办过户。王某为了运营,与明星汽运公司签订合同,明确挂靠该公司,王某每月向该公司交纳500元,该公司为王某代交规费、代办各种运营手续、保险等。明星汽运公司依约代王某向鸿运保险公司支付了该车的交强险费用。
甲公司因2006年4月1日的资产置换业务而换入的固定资产的入账价值为()元。2006年度甲公司因对丙公司的长期股权投资使公司的税前利润增加()元。
针对性强,适宜少数尖端客户,能为客户提供需要的个性化服务的营销策略是()。
根据最新数据,目前英国每年新增约1.3万名恶性黑色素瘤患者,而1975年时这一数字仅为1800人。从患病率上看,如今每万名英国人中有17人罹患此病,40年前的患病率则是万分之三。恶性黑色素瘤每年在英国造成2000多人死亡,是第五大癌症杀手。英国癌症研究会认
最新回复
(
0
)