首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,将其放入一个数组中,然后输出其中的最大值。程序运行后,单击命令按钮(名称为Commandl,标题为“输出最大值”,如图所示),即可求出
在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,将其放入一个数组中,然后输出其中的最大值。程序运行后,单击命令按钮(名称为Commandl,标题为“输出最大值”,如图所示),即可求出
admin
2018-12-20
46
问题
在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,将其放入一个数组中,然后输出其中的最大值。程序运行后,单击命令按钮(名称为Commandl,标题为“输出最大值”,如图所示),即可求出其最大值,并显示在窗体上。这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
选项
答案
步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Option Base 1 Private Sub Commandl_Click() Dim arrN(30)As Integer Dim Max As Integer Randomize For i=1 To 30 ’arrN(i)=Int(Rnd*?) Next i ’?=arrN(1) For i=2 To 30 ’If?Then Max=arrN(i) End If Next i Print Max End Sub 程序结束 第1个?处填入:1000 第2个?处填入:Max 第3个?处填入:arrN(i)>Max或Max<arrN(i) 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
Rnd()函数用于产生一个小于1但大于或等于0的随机数。
本题程序用变量Max记录最大数,最初把数组的第一个元素的值赋给Max,然后通过For循环语句将其后的元素依次与之比较,如果其值大于Max则将其赋值给Max,依次类推,最终Max的值就是数组各元素中的最大值。
转载请注明原文地址:https://kaotiyun.com/show/CwFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
标准模块中有如下程序代码:PublicxAsInteger,yAsIntegerSubvar_pub() x=10∶y=20EndSub在窗体上有1个命令按钮,并有如下事件过程:PrivateSubCommand1_Clic
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load() Show Text1.Text="" Text2.Text="" Text1.SetFocusEndS
下面不属于软件设计阶段任务的是
能够存放组合框的所有项目内容的属性是( )。
下面正确使用动态数组的是( )。
如果要在语句:a=Array(1,2,3,4,5)的前面声明变量a,则正确的声明是
在窗体模块的声明部分声明变量时,不能使用的关键字是
设变量x的值是845,则下面语句的输出是Printx\100+(xMod100)\10+xMod10
假定通过复制、粘贴操作建立了一个命令按钮数组Command1,以下说法中错误的是( )。
将文本框的ScrollBar设置为2,文本框中却没有垂直滚动条,其原因可能是
随机试题
Gary:Hi,Mike,we’rehavingapartytonight,wannacomejoinus?Youcanbringyourgirlfriend.Mike:Well…【D8】________Gary:W
治疗痰阻心窍所致的癫痫抽搐、惊风发狂者,应选用( )
患者,男性,40岁,两周前在家捕鼠时,被鼠咬伤,3天前出现高热、全身疼痛、乏力,遂来院就诊,确诊为流行性出血热。对该患者的消毒隔离措施错误的是
关于速效避孕药,下列哪项正确
A.乙酰唑胺B.多沙唑嗪C.非那雄胺D.十一酸睾酮E.西地那非引起女性男性化、男性乳房胀痛的药物是
《危险废物填埋污染控制标准》规定填埋场距飞机场、军事基地的距离应在( )m以上。
某企业从银行借款1000万元,年利息120万元,手续费等筹资费用30万元,企业所得税率25%,该项借款的资金成本率为()。
某企业生产能力为2000台,1999年实际生产并销售1000台。年末核算是:原料及主要材料费为460000元;辅助材料为120000元;燃料及动力费为54000元;生产工人计件工资为120000元;提取福利基金为18000元;生产车间费用为5600元;企业
现行《企业所得税法》规定的企业所得税的税收优惠方式包括()。
Heworkstenhoursaday,makesmorethanUS$98000ayear,doesn’t【C1】______totakeholidays,dresses【C2】______hepleases.He’
最新回复
(
0
)