首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生20个0—1000范围内的整数,然后放入一个数组中,然后输出这20个整数中大于500的所有整数之和。程序运行后,单击命令按钮(名称为Command1,标题
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生20个0—1000范围内的整数,然后放入一个数组中,然后输出这20个整数中大于500的所有整数之和。程序运行后,单击命令按钮(名称为Command1,标题
admin
2019-06-20
41
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生20个0—1000范围内的整数,然后放入一个数组中,然后输出这20个整数中大于500的所有整数之和。程序运行后,单击命令按钮(名称为Command1,标题为“输出大于500的整数之和”),即可求出这些整数的和,并显示在窗体上(如图所示)。这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjf4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一一个命令按钮。程序运行后,单击命令按钮,即可计算出0~100范围内不能被7整除的所有整数的和,并显示在文本框中。在窗体的代码窗口中,已给出部分程序,其中在通用过程Fun中实现计算不能被7整除的整数的和的操作,请编写该过程代码。
要求:请勿改动程序中的任何内容,只在Function Fun()和End Function之间填人编写的若干语句。最后将修改后的文件按原文件名存盘。
选项
答案
(1)【操作步骤】 步骤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 或500
0 Then s = s + i End If Next i Fun = s End Function 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/DrUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,并编写如下程序:OptionBase1PrivateSubCommand1_Click()Dima(4,4)Fori=1To4Forj=1To4a(i,j)=(i-1)*3+j
编写如下程序:PrivateSubCommand1_Click()DimmAsInteger,nAsIntegerm=1:n=0DoWhilem<20n=m+n:m=3*m+1LoopPrintm,nEndSub程序
命令按钮Command1的单击事件过程如下:PrivateSubCommand1_Click()Dima(10,10)AsIntegerx=0Fori=1To3Forj=1To3a(i,j)=i*2ModjIfx<a
设窗体上有一个Text1文本框和一个HScroll1水平滚动条,并有下面的事件过程:PrivateSubHScroll1_Change()Text1=HScroll1EndSub在程序运行时,当把滚动框移动到最左边时,文本框中显示的是100;
窗体的MouseUp事件过程如下:PrivateSubForm_MouseUp(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)……EndSub关于以上定义,以下叙述中错误
以下关于键盘事件的叙述中,错误的是
窗体上有一个名称为VScroll1的垂直滚动条,要求程序运行时,滚动块的初始位置在最下端,应该使VScroll1.Value的值等于
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上建立一个名称为Opl的单选按钮数组,含三个单选按钮,它们的标题依次为“选择1”、“选择2”、“选择3”,其下标分别为0、1、2,初始状态
(1)在考生文件夹下有一个工程文件sjt3.vbp,其窗体上有一个名称为Labell的控件数组,含三个标签,标题分别是“开始时间”、“结束时间”和“通话费用”;有一个名称为Text1的控件数组,含三个初始值为空的文本框:此外还有两个名称分别为Cmdl和Cm
下列关于线性链表的描述中,正确的是()。I、只含有一个指针域来存放下一个元素地址II、指针域中的指针用于指向该结点的前一个或后一个结点(即前件或后件)III、结点由两部分组成:数据域和指针域。
随机试题
常用的配穴方法是
酮体包括三种酸性有机小分子,是脂肪酸分解的特殊中间产物,溶于水,分子小,能通过肌肉毛细血管壁和血脑屏障,是肝脏输出能源的一种形式,是易于被肌肉和脑组织利用的能源物质。下列不属于酮体的化合物是
某企业破产清算时,其房地产评估价值为2500万元,其中以评估价值1500万元的房地产抵偿债务,将价值1000万元的房地产进行拍卖,拍卖收入1200万元。债权人获得房地产后,与他人进行房屋交换,取得额外补偿500万元。当事人各方合计应缴纳契税()万
在性格结构中具有核心意义的是()
OldHenryandhiswifePhoebelovedoneanother.Theyweresimple【C1】_________.Theirworldwastheirfruittrees,cornfieldsand
一、注意事项1.申论考试是对考生阅读理解能力、综合分析能力、提出和解决问题能力以及文字表达能力的测试。2.作答参考时限:阅读资料40分钟,作答110分钟。3.仔细阅读给定资料,按照后面提出的“申论要求”依次作答。二、给定资料
60名员工投票从甲、乙、丙j人中评选最佳员工,选举时每人只能投票选举一人,得票最多的人当选。开票中途累计,前30张选票巾,甲得15票,乙得10票,丙得5票。在尚未统计的选票中,甲至少再得__________票就一定当选。
以下程序的输出的结果是()。#includevoidmain(){inta,b,c,d(5);c=2,c+=10;a=b=10:a*=2:b/=2:C%=
造成计算机中存储数据丢失的原因主要是()。
FoulshamHouseis______.Thesentence"Itslibraryhasagoodviewovertheparkandthefiver."means______.
最新回复
(
0
)