首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作: 在名称为Forml的窗体上画两个命令按钮,其名称分别为Cl和C2,标题分别为”读入数据”和”计算”(如图2-133所示)。程序运行后,如果单击”读入数据”按钮,则调用题目
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作: 在名称为Forml的窗体上画两个命令按钮,其名称分别为Cl和C2,标题分别为”读入数据”和”计算”(如图2-133所示)。程序运行后,如果单击”读入数据”按钮,则调用题目
admin
2013-10-18
45
问题
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:
在名称为Forml的窗体上画两个命令按钮,其名称分别为Cl和C2,标题分别为”读入数据”和”计算”(如图2-133所示)。程序运行后,如果单击”读入数据”按钮,则调用题目所提供的ReadDatal和ReadData2过程读入datainl.txt和datain2.txt文件中的各20个整数,分别放入Arrl和Arr2两个数组中;如果单击”计算”按钮,则把两个数组中对应下标的元素相减,其结果放入第三个数组中(即第一个数组的第n个元素减去第二个数组的第,n个元素,其结果作为第三个数组的第n个元素。这里的n为1,2,…,20),最后计算第三个数组各元素之和,把所求得的和在窗体上显示出来;并调用题目中给出的WfiteData过程将所求得的和存入考生文件夹下的DataOut.txt文件中。
注意:考生不得修改窗体文件中已经存在的程序,且必须执行此程序一次,最后把修改后的文件以原来的文件名存盘。
选项
答案
步骤1:打开考生文件中的本题工程文件sjt5.vbp,在窗体中如表3-74画出控件,并设置其属性。 [*] 步骤2:在代码编辑窗口编写以下事件过程。 参考代码: Dim Sum As Inteqer Private Sub C1_Click( ) ReadData1 ReadData2 End Sub Private sub C2_ClicK( ) Dim Arr3(20) As Integer Dim Sum As Integer Sum=0 For i=1 To 20 Arr3(i) =Arrl(i) -Arr2(i) Sum=Sum+Arr3(i) Next i Print”Sum=“;Sum WriteData”dataout.txt”,Sum End Sub 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按<F5>键运行程序,先单击”读入数据”按钮,然后单击”计算”按钮。
解析
转载请注明原文地址:https://kaotiyun.com/show/8HQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了在运行时把d:\pic文件夹下的图形文件a.JPg装入图片框Picturel,所使用的语句为【】。
以下关于过程及过程参数的描述中,错误的是
执行下列语句s~Input=InputBox(”请输入字符串”,”字符串对话框”,”字符串”)将显示输入对话框。此时如果直接单击“确定”按钮,则变量strInput的内容是
在数据管理技术发展的三个阶段中,数据共享最好的是
在考生文件夹下有一个工程文件sj5.vbp,在Form1的窗体中有一个标签,3个命令按钮和一个计时器。程序的功能是:运行时,单击“开始计数”按钮,就开始计数,每隔1秒,标签中的数加l,且该按钮不可用,“倒数计数”按钮可用;单击“倒数计数”按钮时,则倒数计数
以下叙述中错误的是______。
以下叙述中错误的是
在软件开发中,下面任务不属于设计阶段的是
不在VisualBasic6启动时的基本控件集中的是______。
下列哪项是窗体对象的方法而不是属性______。
随机试题
计算∫01dx.
与痛经治疗无关的是
具有雌激素样作用的药物是
施工现场的给排水条件属于影响施工质量环境因素中的()。
属于矩阵组织结构横向工作部门的是()。
阅读下列短文。回答23~26题。据《星期日商报》报道,2月4日,英国航空航天部在对包括通讯卫星在内的一切通讯情报设施进行检测中,忽然发现军用卫星“天网”系统的一颗卫星不是拒绝接受信号,就是反应迟钝。当天,英国航空航天部组织专家研讨,就在这时,忽然
在本届运动会上.所有参加自由泳比赛的运动员都参加了蛙泳比赛。再加入以下哪项陈述,可以推出“有些参加蝶泳比赛的运动员没有参加自由泳比赛”?
赫克歇尔一俄林模型
AsvideogamegiantslikeSonyandMicrosofttoutedtheirnewgizmosattheTokyoGameShowthisweek,industryexecutiveshadm
Whatisthereasonforteenstodothesameastheirpeers?
最新回复
(
0
)