首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,将其放入一个数组中,然后输出其中的最大值。程序运行后,单击命令按钮(名称为Command1,标题为“输出最大值”,如图所示),即
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,将其放入一个数组中,然后输出其中的最大值。程序运行后,单击命令按钮(名称为Command1,标题为“输出最大值”,如图所示),即
admin
2018-12-20
49
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,将其放入一个数组中,然后输出其中的最大值。程序运行后,单击命令按钮(名称为Command1,标题为“输出最大值”,如图所示),即可求出其最大值,并显示在窗体上。这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。程序运行后,单击命令按钮,即可计算出1~1000范围内能被7整除或被5整除的整数的个数,并显不在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算能被7整除或能被5整除的整数的个数的操作在通用过程:Fun中实现,请编写该过程的代码。
要求:请勿改动程序中的任何内容,只在。Function.Fun()和End Function之间填入你编写的若干语句。最后将修改后的文件按原文件名存盘。
选项
答案
(1)步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Option Base 1 Private Sub Command1_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
解析
(1)Rnd()函数用于产生一个小于1但大于或等于0的随机数。
本题程序用变量Max记录最大数,最初把数组的第~个元素的值赋给Max,然后通过For循环语句将其后的元素依次与之比较,如果其值大于Max则将其赋值给Max,依次类推,最终Max的值就是数组各元素中的最大值。
(2)本题要求的是1000以内能被5或7整除的数的个数。在Visual Basic中,使用Mod运算符来判断一个数是否可以被另一个数整除,如果计算结果为0,则表示可以整除,否则不能整除。
转载请注明原文地址:https://kaotiyun.com/show/wAFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有1个名称为Text1的文本框,1个名称为Timer1的计时器,且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是,单击窗体,则每隔2秒钟在Text1中显示一次当前时间。Priva
窗体上有一个Text1文本框,一个Command1命令按钮,并有以下程序:PrivateSubcommand1_Click() Dimn IfText1.Text"123456"Then n=n+1 Print"口令输入
有以下通用过程:Functionfun(NAsInteger) s=0 Fork=1ToN s=s+k*(k+1) Nextk fun=sEndFunction该过程的功能是( )。
以下关系表达式中,其值为True的是( )。
A、自然连接B、交C、投影D、并A关系R和关系S有公共域,关系T是通过公共域的等值进行连接的结果,符合自然连接,选A。
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
若实体A和B是一对多的联系,实体B和C是一对一的联系,则实体A和C的联系是
窗体上有一个名称为Combo1的组合框,要求在其编辑区输入文本并按回车键后,编辑区中的文本被添加到列表中。下面能实现这一功能的是( )。
下面不属于软件需求分析阶段主要工作的是
数据库应用系统中的核心问题是( )。
随机试题
访问堆栈操作时,存取堆栈各单元数据的顺序是_______。
黄疸伴右上腹痛可见于
A.汉坦病毒B.肠毒素C.内毒素D.痢疾杆菌E.细胞毒素引起流脑病毒主要是()
如图5-83所示矩形截面,C为形心,阴影面积对zC轴的静矩为(SzC)A,其余部分面积对zC轴的静矩为(SzC)B,(SzC)A与(SzC)B之间的关系为()。
商业银行风险管理信息系统中的组合结果数据应包括限额的调整等在风险管理过程中所产生的操作数据。()
A公司2016年2月接受捐赠10辆小汽车并自用,经税务机关审核,国家税务总局规定的同类型应税车辆的最低计税价格为100000元/辆,小汽车的成本为80000元/辆,成本利润率为8%,小汽车的消费税税率是9%,则该公司应纳的车辆购置税税额为()元。
求助者一般资料:男性,21岁,未婚,大学生。求助者主诉:紧张,心慌,容易疲劳,记忆力减退,症状有一年多。案例介绍:求助者在高中时有时候会出现紧张、心跳加快、头晕,有时候还会影响注意力,因为那时候只是偶尔发生就没有太在意。可是一年以前自己
Whilestillinitsearlystages,welfarereformhasalreadybeenjudgedagreatsuccessinmanystatesatleastingettingpeopl
(南京航空航天2014)若净现值为负数,表明该投资项目()。
Whenwetalkabouttheconceptofculture,wefindtherearesomanyonthetopic.Tylormakestheearliestdefinitionofcultu
最新回复
(
0
)