首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为Forml的窗体上画三个命令按钮,其名称分别为Cl、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-155所示)。程序运行后,如果单击“读入数据”按
在考生文件夹下有一个工程文件sjt5.vbp,请先装入该工程文件,然后完成以下操作:在名称为Forml的窗体上画三个命令按钮,其名称分别为Cl、C2和C3,标题分别为“读入数据”、“计算”和“存盘”(如图1-155所示)。程序运行后,如果单击“读入数据”按
admin
2010-09-02
60
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
复选框通过【】来监听ItemEvent事件。
下列关于基本数据类型的说法中,不正确的是( )。
串的长度是( )。
Java源文件中最多只能有一个______类,其他类的个数不限。
下列语句中所使用的布局管理器,当改变容器大小,组件大小不会随着一起改变的是
Java中方法的参数传递是______调用,方法不能改变参数值,但可以改变变量值,两个对象之间的参数字段不能相互交换。
在Java源文件中,什么类最多只能有一个,而其他类的个数不限?
下列程序实现对ZIP文件file.zip的检索,在横线处填入正确的语句packagetest;importjava.io.*;importjava.util.*;importjava.util.zip.*;p
随机试题
下列关于市盈率的论述,正确的有()。J.不能用于不同行业之间的比较Ⅱ.市盈率低的公司没有投资价值Ⅲ.一般情况下,市盈率越高的公司未来的成长潜力越大Ⅳ.市盈率的高低受市价的影响
A.PaCO2B.BBC.SaO2D.ABEE.A-aDO2肺泡动脉氧分压差的英文缩写为
郎格汉斯细胞的特征中,哪项是错误的()。
某女,40岁,近1年出现带下量多,带下量多,色黄,质黏,有臭气,外阴瘙痒,小腹作痛,口苦口腻,胸闷纳呆,小便短赤,舌红,苔黄腻,脉滑数。在治疗白带过多时,对于患者健康指导正确的是
资产负债表的下列项目中,只需要根据1个总分类账账户就能填列的项目是()。
社会工作者王艳专门负责对流浪儿童的救助、孤儿弃儿的机构养育等开展服务工作,这属于儿童社会工作中的()
一位身穿警服的人从某公安局走出来。根据这一陈述,可作出的断定是()
我国生产婴幼儿配方奶粉的企业有130多家,而美国只有4家企业,相比之下美国吃配方奶粉的婴幼儿数量则远高于我国。“设想一下,如果只有4家企业生产配方奶粉,企业会倍加珍惜自己的品牌价值,不断加强食品安全意识。任何可能的食品安全风险都是企业自身无法容忍的,发生三
已知一组数据x1,x2,x3,x4,x5的平均数是2,方差为,那么另一组数据3x1一2,3x2—2,3x3一2,3x4一2,3x5一2的平均数和方差分别是().
Yourpricesexceedthepricesofthiskindofequipmentontheworldmarket.
最新回复
(
0
)