首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,将其放入一个数组中,然后输出其中的最大值。程序运行后,单击命令按钮(名称为Command1,标题为“输出最大值”,如图所示),即
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生30个0~1000的整数,将其放入一个数组中,然后输出其中的最大值。程序运行后,单击命令按钮(名称为Command1,标题为“输出最大值”,如图所示),即
admin
2018-12-20
38
问题
(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全国计算机二级
相关试题推荐
VisualBasic中的"启动对象"是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic"启动对象"的描述中,错误的是( )。
以下打开VisualBasic菜单编辑器的操作中,错误的是( )。
窗体上有一个名称为Option1的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程:PrivateSubOption1_Click(IndexAsInteger) …EndSub下面关于此过程的参数Index的叙
下列叙述中正确的是( )。
以下关于事件、事件驱动的叙述中,错误的是( )。
设有下面程序代码:PrivateSubCommand1_Click()DimstrAsString,chAsStringstr="VisualBasicProgramming"ch="a"
某二叉树有5个度为2的结点,则该二叉树中的叶子结点数是( )。
在某个事件过程中定义的变量是( )。
语句DimArr(-2To4)AsInteger所定义的数组的元素个数为( )。
下列运算符中,优先级别最低的是()。
随机试题
Hewasinhospitalforsixmonths.Hefeltasifhewas________fromtheoutsideworld.
Mr.Wangisgettingtoooldforfootball.Hedecidesto______tennisinstead.
A.A群链球菌B.B群链球菌C.D群链球菌D.α一溶血性链球菌E.β一溶血性链球菌CAMP试验阳性,可分解马尿酸钠的是
下列属于我国常用火灾风险评估方法的有()。
证券市场的基本功能包括()。
人民警察应该牢固树立严格依法办事的法律意识。()
一篇优秀的文献综述其实就是一幅学术谱系图。写文献综述不仅是为了陈述以往的相关研究,也不仅仅是为了表示对前辈、同行或知识产权的尊重,更是为了“认祖归宗”,对自己的研究进行定位。有时候只有把一篇文献放到学术史的脉络、学术传统中去,我们才能真正理解这
1973年,以美元为中心的资本主义世界货币体系崩溃,反映出()。①国际金融领域内美元地位衰落②美国由债权国变为债务国③资本主义国家实力的对比发生了新的变化④美国的世界经济地位严重动摇
以下程序的运行结果是【】。X=1.5DOCASECASEx>2y=2CASEx>1y=1ENDCASE?y
EightEssentialLifeSkillsThatSchoolsCanTeachOurKidsIlearnedatanearlyagefrommymotherthattherewasmoreto
最新回复
(
0
)