首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为Forml的窗体上画三个命令按钮,其名称分别为C1、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-200所示)。程序运行后,如果单击“读入数据”按
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为Forml的窗体上画三个命令按钮,其名称分别为C1、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-200所示)。程序运行后,如果单击“读入数据”按
admin
2010-09-02
46
问题
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为Forml的窗体上画三个命令按钮,其名称分别为C1、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-200所示)。程序运行后,如果单击“读入数据”按钮,则调用题目已提供的ReadDatal和ReadData2过程读入datainl.txt和datain2.txt文件中的各20个整数,分别放入Arrl和Art2两个数组中;如果单击“计算”按钮,则把两个数组中对应下标的元素相除并截尾取整后,结果放入三个数组中(即把第一个数组的第n个元素除以第二个数组的第n个元素,结果截尾取整后作为第三个数组的第n个元素。这里的月为1,2,…,20),最后计算第三个数组各元素之和,并把所求得的和在窗体上显示出来;如果单击“存盘”按钮,则调用题目中给出的WriteData过程将所求得的和存入考生文件夹下的dataout.txt文件中。
注意:考生不得修改窗体文件中已经存在的程序,必须把求得的结果单击“存盘”按钮存入考生文件夹下的dataout.txt文件中,否则没有成绩。最后把修改后的文件以原来的文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件中的本题工程文件sjt5.vbp,在窗体中如表2-115画出控件,并设置其属性。 [*] 步骤2:在代码编辑窗口编写以下事件过程。 参考代码: Dim Sum As Integer Private Sub Cl_Click() ReadDatal ReadData2 End Sub Private Sub C2_Click() 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和WriteData自定义过程。
程序设计思路:在“读入数据”按钮的Click事件过程中,通过调用ReadDatal和ReadData2过程将数据从文件datainl.txt和datain2.txt中读入到数组Arrl和Arr2(窗体变量)中;在“计算”按钮的Click事件过程中,利用For循环语句(循环变量i的初值为1,终值为20)依次将数组Artl和Art2同下标的元素相除并截尾取整放入第三个数组中并累加到变量Sum,循环结束后将Sum的值显示在窗体上。在“保存”按钮的Click事件过程中,通过调用WriteData过程将Sum的值写入数据文件dataout.txt。
注意:调用WriteData过程时需传递参数dataout.txt和Sum,变量Sum应声明为窗体变量。
转载请注明原文地址:https://kaotiyun.com/show/mUmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列不是事件处理机制角色的是( )。
下面不属于软件设计原则的是( )。
用HTML文件显示APPLET时,下面属于必不可少的属性的是
下面程序段:booleana=false;booleanb=true;booleanc=(a||b)&&(b);booleanresult=(a|b)&(b);执行完后,正确的结果是
在结构化分析方法中,用于描述系统中所用到的全部数据和文件的文档称为______。
执行下列程序时,会产生什么异常publicclassTest{publicstaticvoidmain(Stringargs[]){intd=101;intb=220;longa
下列关系运算中,能使经运算后得到的新关系中属性个数多于原来关系中属性个数的是
将一个容器panell放到容器framel中的方法是()。
通常使用哪一个方法来注册事件监听器______。
数据独立性分为逻辑独立性与物理独立性。当数据的存储结构改变时,其逻辑结构可以不变,所以,基于逻辑结构的应用程序不必修改,称为______。
随机试题
车削钢料蜗杆的粗车刀应磨有()纵向前角。
右冠状动脉
子宫内膜异位症囊性病灶在
下列()工作适用于《公路水运工程试验检测等级管理要求》。
下面有关行政复议代理人的叙述,其中说法有误的一项为()。
以下属于业主所遇到的风险是()。
根据《社会救助暂行办法》,对符合条件的救助申请不予批准的,由()责令改正。
NowandagainIhavehadhorribledreams,butnotenoughofthemtomakemelosemydelightindreams.Tobeginwith,Ilikethe
国家赔偿以()为主要方式。
A、Exchangewithotherparents.B、Buyusedclothes.C、Buyclothesonsale.D、Askfriendsforclothes.A观点题。访谈最后主持人说孩子很快就长大了,衣服就穿不
最新回复
(
0
)