首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,按照要求完成以下操作: 在名称为Form1的窗体上添加两个命令按钮,其名称分别为C1和C2,标题分别为“读入数据”和“计算”(如图所示)。程序运行后,如果单击“读入数据”按钮,则调用题目所提供的ReadData
在考生文件夹下有一个工程文件sjt5.vbp,按照要求完成以下操作: 在名称为Form1的窗体上添加两个命令按钮,其名称分别为C1和C2,标题分别为“读入数据”和“计算”(如图所示)。程序运行后,如果单击“读入数据”按钮,则调用题目所提供的ReadData
admin
2020-02-27
64
问题
在考生文件夹下有一个工程文件sjt5.vbp,按照要求完成以下操作:
在名称为Form1的窗体上添加两个命令按钮,其名称分别为C1和C2,标题分别为“读入数据”和“计算”(如图所示)。程序运行后,如果单击“读入数据”按钮,则调用题目所提供的ReadData1和ReadData2过程读入datain1.txt和datain2.txt文件中的各20个整数,分别放入Atr1和Art2两个数组中;如果单击“计算”按钮,则把两个数组中对应下标的元素相减,其结果放人第三个数组中(第1个数组的第n个元素减去第2个数组的第n个元素,其结果作为第3个数组的第n个元素。这里的n为1、2…20),最后计算第3个数组各元素之和,把所求得的和在窗体上显示出来;并调用题目中给出的WriteData过程将所求得的和存入考生文件夹下的dataout.txt文件中。
注意:考生不得修改窗体文件中已经存在的程序,日.必须执行一次,最后将修改后的文件以原来的文什名存盘。
选项
答案
步骤1:打开本题工程文件,按照题日要求建立命令按钮控件并设置命令按钮的相应属性,程序中用到的控件及属性见表3.23。 [*] 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 Private Sub C1 Click() Cal 1 ReadData1’调用过程ReadData1. Call ReadData2’调用过程ReadData2 End Sub Private Sub C2 Click() Dim Arr3(1 To 20)As工nteger Dim sum As Integer sum=0 For i=1 To 20’将Arrl中对应于Arr2中的数相减,结果存入Arr3中 Arr3(i) =Arrl(i) -Arr2(i) sum=sum+Arr3(i)’将Arr3中的元素累加 Next i Print"sum=";sum’在窗体打印sum WriteData"da’taout.txt",sum End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
本题源程序已给出读文件中的数据和向文件中写数据的三个过程,只需适时调用它们,即在“读入数据”和保存过程中调用;要把数组Arr1和Arr2中对应下标的元素相减并把结果存入第3个数组中,需利用For。循环逐一取出Arr1和Arr2对应元素;由于数组Arr1、Arr2及俘储第3个数组和的变量要跨过程使用,因此需定义成窗体级变量;调用过程WriteData时需传递两个参数,分别是存人数据的文件名和存储第3个数组和的变量;语句Option Base 1用于限定数组下标的下限,默认为1。
转载请注明原文地址:https://kaotiyun.com/show/eVTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件sjt5.vbp.相应的窗体文件为sjt5.frm,此外还有一个名为datain.txl的文本文件,其内容如下:3243765828129857314253647586
在考生文件夹下有一个工程文件sjt5.vbp,在其窗体中有一个实心圆。程序运行时,当用鼠标左键单击窗体任何空白位置时,实心圆则向单击位置直线移动;若用鼠标右键单击窗体,则实心圆停止移动。窗体文件中已经给出了全部控件。但程序不完整。要求:请去掉程序
(1)在考生文件夹下有一个工程文件sjl3.vbp。其窗体文件上有一个标题为“得分”的框架,在框架中有一个名称为Text1的文本框数组,含6个文本框控件;文本框Text2用来输入难度系数。程序运行时,在左边的6个文本框中输入6个得分,输入难度系数后,单击“
以下关于VB的叙述中,错误的是()。
满足下列条件之一的年份是闰年:1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份,下面判断闰年的正确表达式是()。
设整型变量a、b已赋值(b>0,a>b),下面不能正确计算a除以b的余数的表达式是
如图5所示,在列表框Listl中已经有若干人的简单信息,运行时在Textl文本框(即”查找对象”右边的文本框)中输入一个姓或姓名,单击”查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹
表达式12/2\4的值是( )。
窗体上有名称为Command1的命令按钮和名称为Text1的文本框PrivateSubCommand1_Click()Text1.Text="程序设计"Text1.SetFocusEndSubPrivateSubText1_GotF
以下()不属于对象的基本特征。
随机试题
(2013年4月,2007年4月)人力资源管理的前提与主要职能是_______。
Manypeoplethinkofcrisisasbeing【B1】______onlywithunhappyorunpleasantevents.Thisisnotthe【B2】______.Crisiscanoccu
能治疗牙痛病证的药物是
该患者最大可能为最合适的处理方式为
下面关于胃食管反流病的说法正确的是
患者,女,22岁。用大黄通便长达1个月,导致次月的月经量过多,经期过长。上述症状属于()
对于持续持有期少于30日的投资人,基金管理人可以在基金合同中约定收取不低于赎回金额0.75%的赎回费。()
下列项目中,属于其他业务成本核算内容的有()。
如何评价软件的质量一直是软件技术人员所关心的问题,目前已有多种软件质量模型来描述软件的质量特性。ISO/IEC 9126是国际标准化组织在1991年提出的软件质量标准。它由三个层次组成,第一层是质量特性,第二层是质量子特性,第三层是度量指标。6个质量特性是
Isuggestedheshould____________(学会适应新的环境).
最新回复
(
0
)