首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为Forml的窗体上画三个命令按钮,其名称分别为Cl、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-155所示)。程序运行后,如果单击“读入数据”按
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为Forml的窗体上画三个命令按钮,其名称分别为Cl、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-155所示)。程序运行后,如果单击“读入数据”按
admin
2010-09-02
57
问题
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为Forml的窗体上画三个命令按钮,其名称分别为Cl、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-155所示)。程序运行后,如果单击“读入数据”按钮,则调用题目已提供的ReadDatal和ReadData2过程读入datainl.txt和datain2.txt文件中的各20个整数,分别放入Arrl和Arr2两个数组中;如果单击“计算”按钮,则把两个数组中对应下标的元素相整除。其结果放入第三个数组中(即第一个数组的第n个元素整除第二个数组的第n个元素,其结果作为第三个数组的第n个元素。这里的n为1,2,…,20),然后计算第三个数组各元素之和,并把所求得的和在窗体上显示出来:如果单击“存盘”按钮,则调用题目中给出的WriteData过程将所求得的和存入考生文件夹下的dataout.txt文件中。
注意:考生不得修改窗体文件中已经存在的程序,必须把求得的结果单击“存盘”按钮存入考生文件夹下的dataout.txt文件中,否则没有成绩。最后把修改后的文件以原来的文件名存盘。
选项
答案
【操作步骤】 步骤l:打开考生文件中的本题工程文件sit5.vbp,在窗体中如表2-87画出控件,并设置其属性。 [*] 步骤2:在代码编辑窗口编写以下事件过程。 参考代码: Dim Sum As Integer Private Sub C1_Click() ReadDatal ReadData2 End Sub Private Sub C2_C1ick() Dim Arr3(20)As Integer Sum=0 For i=1 To 20 Arr3(i)=Int(Arrl(i)/Arr2(i)) Sum=Sum+Arr3(i) Next i Print"Sum=";Sum End Sub Private Sub C3_Click() WriteData"Dataout.txt",Sum End Sub 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按
键运行程序,先单击“读入数据”按钮,然后单击“计算”按钮,最后单击“存盘”按钮。
解析
本题原程序已提供用于读数的ReadDatal、ReadData2和用于写盘的writeData几个自定义过程,只需编写“读入数据”、“计算”和“存盘”命令按钮的单击事件过程,并在事件过程中调用ReadDatal、ReadData2和Wnt0Dam自定义过程。
程序设计思路:在“读入数据”按钮的Click事件过程中,通过调用ReadDatal和ReadDam2过程将数据从文件datainl.txt和datain2.txt中读入到数组Awl和Arr2(窗体变量)中;在“计算”按钮的Click事件过程中,利用For循环语句(循环变量i的初值为l,终值为20)依次将数组Awl和An2同下标的元素相整除放入第三个数组中并累加到变量Sum,循环结束后将Sum的值显示在窗体上。在“保存”按钮的Click事件过程中,通过调用WriteData过程将Sum的值写入数据文件dataout.txt。
注意:调用WfiteData过程时需传递参数dataout.txt和Sum,变量Sum应声明为窗体变量。
转载请注明原文地址:https://kaotiyun.com/show/AFmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列选项中不属于结构化程序设计方法的是( )。
在Java语言中的实数,如数字后没有任何字母,计算机默认其为【】类型。
在文件类提供的方法中,用于创建目录的方法是( )。
创建一个10行40列的文本区域tal的正确语句是______。
下列不是事件处理机制角色的是( )。
多线程是Java语言的______机制,只能够处理同步共享数据和各种不同的事件。
在模块化程序设计中,按功能划分模块的原则是
阅读下列代码后publicclassPerson{intarr[]=newint[10];publicstaticvoidmain(Stringargs[]){System.out.pr
在文件类提供的方法中,用于创建目录的方法是.
随机试题
对国务院部门或者省、自治区、直辖市人民政府的具体行政行为不服的,向作出该具体行政行为的国务院部门或者省、自治区、直辖市人民政府申请行政________。对此决定不服的,可以向人民法院提起行政________:也可以向国务院申请________。填
高某诉乙县林业局案高某系A省甲县个体工商户,其持有的工商营业执照载明经营范围是林产品加工,经营方式是加工、收购、销售。高某向甲县工商局缴纳了松香运销管理费后,将自己加工的松香运往A省乙县出售。当高某进入乙县时,被乙县林业局执法人员拦截。乙县林业局以高某未
有创动脉血压监测常用的位置有()、()、(),首选()。
女性。26岁。发冷发热,轻度黄疸,脾肋下2cm,血红蛋白76g/L,白细胞12×109/L,血小板150×109/L。Coombs试验直接阳性。Ham试验阴性。应诊断为
下列各项存货中,其可变现净值为零的有()。
中医针灸是中国特有的治疗疾病的方法,下列关于中医针灸的说法错误的一项是()。
2019年6月,全国发行地方政府债券8996亿元,同比增长68.37%,环比增长195.63%。其中,发行一般债券3178亿元,同比减少28.33%,环比增长117.08%,发行专项债券5818亿元,同比增长540.04%,环比增长268.46%;按用途划
【《水经注》】北京师范大学2002年中国史学史真题;北京师范大学2004年历史学综合真题;湖南大学2018年中国史真题;暨南大学2018年中国史真题
宣告建立分支机构AnnouncingtheEstablishmentofaNewBranch尊敬的先生/女士,因在贵国的贸易额大量增加,我们决定在这里开设一家分支机构,由王海先生任经理。新的分支机构将于3月1日开业,今后所有的
Thedirectorrequiredthateverymemberinhisdepartment(refer)______tothisreport.
最新回复
(
0
)