首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm。在名为Forml的窗体上有5个Label控件和2个命令按钮,数据文件inl3.dat存放学生的编号、姓名、性别和体重,如图13—5所示。 程序运行后,按“Begin”按钮后,能从考生
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm。在名为Forml的窗体上有5个Label控件和2个命令按钮,数据文件inl3.dat存放学生的编号、姓名、性别和体重,如图13—5所示。 程序运行后,按“Begin”按钮后,能从考生
admin
2009-03-26
23
问题
在考生文件夹下有工程文件sj5.vbp及窗体文件sj5.frm。在名为Forml的窗体上有5个Label控件和2个命令按钮,数据文件inl3.dat存放学生的编号、姓名、性别和体重,如图13—5所示。
程序运行后,按“Begin”按钮后,能从考生文件夹下的inl3.dat中读出数据并把体重大于平均体重的学生的所有数据写入考生文件夹下的outl3.dat文件中。执行完毕,“Begin”按钮变成“完成”按钮,且无效。
注意:该程序不完整,请在有问号“?”的地方填入正确内容,然后删除问号“?”及所有注释符“’”,但不能修改其他部分。存盘时不得改变文件名和文件夹,相应的数据文件也保存到考生文件夹下,否则没有成绩。
选项
答案
根据题目 1.打开题目所给工程文件。 2.打开代码窗口输入如下代码: Private Sub Cmdl Click() Dim i As Integer Dim total As Integer Dim aver As Single Dim num(10),namstring(10),sexstring(10),wages(10) MyFile=App.Path&"\"&"inl3.dat" MyFile2=App.Path&"\"&"outl3.dat" Open MyFilel For Input As#1 Open MyFile2 For Output As#2 For i=1 To 10 Input#l,num(i),namstring(i),sexstring(i),wages(i) total=total+wages(i) Next i aver=total/10 For i=1 To 10 If wages(i)>aver Then Write#2,num(i),namstring(i),sexstring(i), wages(i) Next i Cmdl.Caption="完成" Cmd1.Enabled=False End Sub 3.按要求保存文件即完成本题。
解析
转载请注明原文地址:https://jikaoti.com/ti/bEq0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
【】布局管理器能够帮助用户处理两个以至更多的成员共享同一显示空间。
下列关于线程调度的叙述中,错误的是()。
数据库管理系统是位于【】之间的软件系统。
算法的时间复杂度是指()
下列常见的系统定义的异常中,______是输入、输出异常。
设有n元关系R及m元关系S,则关系R与S经笛卡儿积后所得新关系是一个()元关系。
若有以下定义inta[]={1,2,3,4,5,6,7};charc1=’b’,c2=’2’;则数值不为2的表达式是()。
赋值表达式是由位于赋值运算符左边的变量和右边的【】组成。
int类型的取值范围为()。
char类型数据的取值范围是( )。
随机试题
测定粮食中粗纤维含量时,经酸液和碱液处理后,洗涤时所用试剂的顺序是()。
蛛网膜下腔出血,CT扫描最适宜的时间为
某金属制品抛光车间,地上6层,建筑高度24m,每层建筑面积均为6000m2。该厂房已按现行有关国家工程建设消防技术标准的规定设置了消防设施。消防救援机构对其进行消防监督检查时,获取的下列信息中不正确的是()。
根据物权法律制度的规定,以下列权利出质的,质权自交付权利凭证时设立的有()。
《幼儿园教师专业标准(试行)》的基本内容包括()专业知识及专业能力三大维度的内容。
刑事执法办案过程中,遇下列情形应当进行补充鉴定的是:
公安机关对于报案、控告、举报,( )。
阿尔迪、里德尔等德国超市折扣连锁店在全球食品涨价潮中逆市走俏。德国模式的折扣连锁店经营方式不同于普通超市、家庭店铺或法国特色的农民市场。它的店面一般仅有两三百平方米,过道狭窄,商品包装简单,80%以上的商品都是食品和饮料,其价格一般要比普通超市低30%到5
目前江西生态示范区的面积占全省国土面积的57.3%,全省森林覆盖率达60.05%,位居全国第2位,依托丰富的森林生态资源,建有99个公园,其中国家级35个,居全国第1位,拥有自然保护区156个,其中国家级8个,列全国第2位,得天独厚的良好生态优势成为江西低
PassageTwoAccordingtoRoyF.Baumeister’sfinding,what’sthebadeffectofheavypraise?
最新回复
(
0
)