首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有工程文件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
42
问题
在考生文件夹下有工程文件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://kaotiyun.com/show/nN1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
Java源文件中最多只能有一个【】类,其他类的个数不限。
在一个长度为n的线性表中插入一个元素,最坏情况下需要移动的数据元素数目为()。
下列关于Applet的叙述中,错误的是()。
如果一个JavaApplet源程序文件只定义有一个类,该类的类名为MyFirstApplet,则存储该源程序的文件名必须为【】。
Java简单性首先表现在自身系统的精练,它的基本解释程序和【】占内存40KB,附加的基本标准类库和支持线程程序占175KB。
下列关于小应用程序说法错误的是()
关于集合,下列叙述错误的是______。
以下过程设计工具不属于图形工具的是()。
文件操作中,语句publicStringgetPath()的作用是()。
线程控制方法中,yield()的作用是()。
随机试题
PASSAGEFOUR(1)Thefirstintimation,apparently,waswhenthree-year-oldYvestoldhismotherthathershoesdidnotgow
A.Ⅰ度深覆盖B.Ⅱ度深覆盖C.Ⅲ度深覆盖D.Ⅰ度深覆牙合E.Ⅱ度深覆牙合下前牙切端前后距离为6mm,是指
与冲洗技术没有实际效果的管理方法是
A.印堂、攒竹、合谷B.率谷、外关、足临泣C.血海、膈俞、内关D.天柱、后溪、申脉E.太冲、内关、四神聪
下列关于发票使用的说法正确的有()。
“采购流程”是指采购方从__________(供应商)选择和购买生产、服务经营的各种原材料、零部件、设备等物料的__________。
我国政府一向关心和重视儿童的生存、保护和发展工作,制定了()等一系列相关法律以保护其合法权益。
国家正在进行“营改增”试点。为了更好地贯彻落实这一政策,要进行一次税务宣传活动,领导让你写一个宣传方案,你如何开展?
1940年前后,毛泽东发表了哪些著作,使新民主主义革命理论在多方面展开而达到成熟,形成了一个完整的理论体系()
【S1】【S10】
最新回复
(
0
)