首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生20个0—1000范围内的整数,放入一个数组中,然后输出这20个整数中小于500的所有整数之和。程序运行后,单击命令按钮(名称为Commandl,标题为“
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生20个0—1000范围内的整数,放入一个数组中,然后输出这20个整数中小于500的所有整数之和。程序运行后,单击命令按钮(名称为Commandl,标题为“
admin
2015-06-30
33
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生20个0—1000范围内的整数,放入一个数组中,然后输出这20个整数中小于500的所有整数之和。程序运行后,单击命令按钮(名称为Commandl,标题为“输出小于500的整数之和”),即可求出这些整数的和,并显示在窗体上(如图所示)。这个程序不完整,请把它补充完整,并能正确运行。
要求:去掉程序中的注释符,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。当程序运行后,单击命令按钮,即可计算出0一100范围内所有偶数的平方和,并显示在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算偶数平方和的操作在通用过程Fun中实现,请编写该过程的代码。
要求:请勿改动程序中的任何内容,只在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 第4个?处填入:Sum+arrN(i) 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Sub SaveData() Open App.Path & "\" & "outtxt.txt" For Output As #1 Print #1, Text1.Text Close #1 End Sub Function Fun() End Function Private Sub Command1_Click() d = Fun() Text1.Text = d SaveData End Sub 程序结束 参考答案 Function Fun() Dim s As Long, i As Integer s = 0 For i = 0 To 100 If i Mod 2 = 0 Then s = s + i ^ 2 End If Next i Fun = s End Function 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://jikaoti.com/ti/A260FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上面两个名称分别为Command1和Command2、标题分别为“初始化”和“求和”的命令按钮。程序运行后,如果单击“初始化”命令按钮,则对数组a的各元素赋值;如果单击“求和”命令按钮,则求出数组a的各元素之和,并在文本框中显示出来,如图所示。请填空
设有语句Open"c:\Test.Dat"ForOutputAs#1"则以下叙述错误的是
在E盘当前目录文件夹下建立一个名为“Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
窗体上有两个文本框Text1、Text2以及一个命令按钮Command1,编写下列程序:DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=2
在窗体上画一个名称为“Command1”,标题为“计算”的命令按钮,再画7个标签,其中5个标签组成.名称为Labell的控件数组;名称为Label2的标签用于显示计算结果,其Caption属性的初始值为空:标签Label3的标题为“计算结果”。运行程序时会
在窗体上画一个名称为Text1的文本框,然后画3个单选按钮,并用这3个单选按钮建立一个控件数组,名称为Option1,程序运行后,如果单击某个单选按钮,则文本框中的字体将根据所选择的单选按钮切换,请选择空白处合适的语句()。PrivateSu
下列选项中不属于结构化程序设计方法的是()。
线性表进行二分法检索,其前提条件是()。
以下正确的叙述是______。
随机试题
患者,女性,43岁。突发右上腹剧痛并阵发性加剧3天,寒战高热,恶心呕吐。体检:全身黄染,体温39℃,脉搏120次/分,血压80/60mmHg,谵妄,神志不清,剑突偏左,腹肌紧张,肝肋下2cm,白细胞15×109/L,中性80%,血清总胆红素50μmol/
唾液缓冲能力中起主要作用的是
患者,女,25岁。右上后牙龈肿痛1周,口服消炎药治疗无效。检查:右上6牙体颊侧牙周脓肿形成,叩痛(+),冷测反应同对照牙,牙周袋8mm,应急处理应是
某分部工程有3个施工过程,各分为4个流水节拍相等的施工段,各施工过程的流水节拍分别为6天、6天、4天。如果组织加快的成倍节拍流水施工,则流水步距和流水施工工期分别为( )天。
所有者权益是指企业投资人对企业资产的所有权。()
在运用国内市场价格倒扣法审定进口货物完税价格时,应该用进口货物的相同或类似货物在国内市场的批发价格,减去(),才能作为进口货物的完税价格依据。
甲公司2012年有关资料如下:(1)本期商品销售收入100000元;应收账款期初余额40000元,期末余额60000元;本期预收的货款10000元。(2)本期用银行存款支付购买原材料货款50000元;用银行存款支付工程用物资货款8500
下列剧种不属于河南的是()。
有关宏操作,以下叙述错误的是()。
A、Trytoretainasmanynewwordsaspossible.B、Practicewordsatappropriateintervals.C、Learndifficultwordswiththehighe
最新回复
(
0
)