首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生20个0~1000的整数,放入一个数组中,然后输出这20个整数中小于500的所有整数之和。程序运行后,单击命令按钮(名称为Command1,标题为“输出小于50
在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生20个0~1000的整数,放入一个数组中,然后输出这20个整数中小于500的所有整数之和。程序运行后,单击命令按钮(名称为Command1,标题为“输出小于50
admin
2020-08-10
60
问题
在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生20个0~1000的整数,放入一个数组中,然后输出这20个整数中小于500的所有整数之和。程序运行后,单击命令按钮(名称为Command1,标题为“输出小于500的整数之和”),即可求出这些整数的和,并显示在窗体上(如图所示)。这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的?改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
选项
答案
本题要产生随机整数,须使用Rnd函数和Int函数。 Int函数是将参数转换成整数。 Rnd函数返回小于1,但大于或等于0的值,为了生成某个范围内的随机整数,可使用以下公式: Int( ( upperbound_lowerbound+1) * Rnd+lowerbound ) 这里,upperbound是随机数范围的上限,lowerbound月握随机数范围的下限。 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Option Base 1 Private Sub Command1_Click( ) Dim arrN(20)As Integer Dim Sum As Integer Randomize For i=1 To 20 ‘arrN(i)=Int(Rnd*?) Next i ‘Sum=? For i=1 To 20 ‘if?Then ‘Sum=? End If Next i Print Sum End Sub 程序结束 第1个?处填入:1000 第2个?处填入:0 第3个?处填入:arrN(i)<500 第4个?处填入:Sum+arrN(j) 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/ySHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮和一个标签,其名称分别为Commandl和Labell,然后编写如下事件过程:PrivateSubCommandl_Click()Dimarr(10)Fori=6To10arr(i)=i一5NextiLa
窗体上有名称为Commandl的命令按钮和名称为Textl的文本框PrivateSubCommand1_Click()Textl.Text=”程序设计”Text1.SetFocus
在窗体上画一个名称为List1的列表框,然后编写如下程序:PrivateSubForm_Click0Fori=1To10Item=”Item”&i:Listl.Addltem
在VB中,函数过程与子程序过程的区别之一是
设窗体上有1个名称为List1的列表框,程序运行时,如果选中了第3个列表项(最上面的列表项为第0个列表项),则下面不成立的是
在窗体上画一个通用对话框,程序运行中用ShowOpen方法显示“打开"对话框时,希望在该对话框的“文件类型”栏中只显示扩展名为DOC的文件,则在设计阶段应把通用对话框的Filter属性设置为
窗体上有1个名称为Text1、内容为空的文本框。编写如下事件过程:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger)PrintText1.Text;EndSub运行程序,并在
设有下面程序代码:PrivateSubCommand1_Click()DimstrAsString,chAsStringstr="VisualBasicProgramming"ch="a"n=fun(ch,st)Prints
随机试题
电子束焊枪,为减小金属蒸汽和离子对电子枪工作稳定性的影响,可以设置()个聚焦线圈,并在电子束通道上设置小直径光阑。
李某被县公安局以涉嫌盗窃为由刑事拘留,后被释放。李某向县公安局申请国家赔偿,遭到拒绝,经复议后,向市中级法院赔偿委员会申请作出赔偿决定。下列哪一说法是正确的?
可调价格合同中对一周内因非承包人原因停水、停电、停气造成停工累计超过()小时可调整合同价款。
根据《民法通则》规定,()周岁以下的未成年人是无民事行为能力人。
工商行政管理的主体是()。
生产、销售有毒、有害食品罪是指在生产、销售的食品中掺人有毒、有害的非食品原料的,或者销售明知掺有有毒、有害的非食品原料的食品的行为。根据上述定义,下列构成生产、销售有毒、有害食品罪的是()。
当x≠0时,函数f(x)满足f(x3)+2f()=3x,则f’(1)=_________.
甲男与乙女通过网聊恋爱,后乙提出分手遭甲威胁,乙无奈遂与甲办理了结婚登记。婚后乙得知,甲婚前就患有医学上不应当结婚的疾病且久治不愈,乙向法院起诉离婚。下列说法正确的是
人民币(RenminbiorRMB)是中国大陆地区的法定货币。中国人民银行(thePeople’sBankofChina)是国家管理人民币的主要机构,负责人民币的设计、印制和发行。从1948年开始,人民币一共发行了五套。目前市场上流通的主要是第
Theincreaseinglobaltrademeansthatinternationalcompaniescannotaffordtomakecostlyadvertisingmistakesiftheywantt
最新回复
(
0
)