首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件央下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框
在考生文件央下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框
admin
2015-10-23
32
问题
在考生文件央下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框中。结束程序之前,必须单击“保存”按钮,保存统计结果。
注意:不能修改程序的其他部分和控件属性。程序调试通过后,运行程序,将统计结果显示在文本框中,再按“保存”按钮,否则将没有成绩,最后将修改后的文件按原文件名进行存盘。
选项
答案
步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 For i=1 To n’循环判断分数的范围.当满足某个条件时则分别统计 If arr(i)<60 Then Text2=Val iText2)+1 ElseIf err(i)>=60 And err(i)<70 Then Text3=Val(Text3)+1 ElseIf arr(i)>=70 And arr(i)<80 Then Text4=Val(Text4)+1 ElseIf err(i)>=80 And art(i)<90 Then Text5=Val(Text5)+1 ElseIf err(i)>=90 And art(i)<=i00 Then Text6=Val(Text6)+1 End If Textl=Val(Textl)+1’显示统计入敷Next 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
在窗体装入时,通过文件操作和Do While语句从数据文件中读取学生的成绩,并把成绩的值装入数组arr(n)。单击“统计”按钮通过For循环语句遍历数组,并用If语句对数组中存储的数值进行判断,使用Val()函数完成字符向数值类型的转换。通过累加统计不及格、60~69、70~79、80~89及90~100各分数段的人数,并将各分数段的人数统计结果和总人数显示在相应的文本框中。单击“保存”按钮,将统计结果使用Pnnt方法,并通过文件操作保存在文本文件中,弹出MsgBox对话框.提示“保存成功!”。
转载请注明原文地址:https://jikaoti.com/ti/ZNJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件execise52.vbp,相应的窗体文件为execise52.frm,此外还有一个名为in52.txt的文本文件,其内容如下:13242336585816985453144252247326912
在窗体Form1上绘制3个命令按钮,其名称分别为Cmd1、Cmd2和Cmd3,标题分别为“读数”、“计算”和“存盘”,如下图所示。程序运行后,如果单击“读数”按钮,则读入in511.tx
在考生文件夹中有一个工程文件esecise61,vbp(相应的窗体文件名为exeeise61.fnn),请装入该文件,在名为Form1的窗体上绘制两个命令按钮(其名称分别为Cmd1和Cmd2,标题分别为Add和Delete),再绘制一个列表框(名称为Lis
在考生文件夹中有一个工程文件execise60.vbp,相应的窗体文件为execise60.frm。在名为Form1的窗体上有两个命令按钮,其名称分别为Cmd1和Cmd2;一个标签控件,其名称为Lab1;一个计时器控件,其名称为Timer1。程序运
有下列二叉树,对此二叉树中序遍历的结果是()。
在面向对象方法中,属性与操作相似的一组对象称为【】。
下列说法错误的是
数据库系统的核心是
如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是()。
随机试题
在面向对象方法中,不属于“对象”基本特点的是()。
自汗、盗汗并见,其病机是
下列事项中,属于财政部门对各单位实施监督的事项有()。
净资产是客户总资产减去负债总额后的余额,是客户真正拥有的财富价值,以下有关客户净资产的说法错误的是( )。
2009年初,某省统计局向全省纺织企业布置了《纺织企业统计年报》,报送报表的期限是2009年2月20H。经查,某纺织公司报表中的职工工资数据严重低于实际情况,省统计局将报表退回,要求审核后重新填报,该公司置之不理。之后,省统计局又发出了《统计报表催报通知
下列我国古代园林中,分别为皇家园林和私家园林的是()。
如果一个瓶子里的东西可以被安全地喝下,那么这个瓶子就不会被标为“毒品”,所以,既然一个瓶子没被标为“毒品”,那么它里面的东西就可以被安全地喝下。以下除了哪项外,都犯了与上述论证同样的错误?
在10Base-F以太网中,使用的传输介质是(46),传输的最大距离为(47)。
下列属于声卡中主音频处理芯片功能的是______。 Ⅰ) 实现三维音效处理的运算和加速 Ⅱ) MIDI波表合成引擎 Ⅲ) 完成数字声音的编码、解码和编辑操作 Ⅳ) 放大声音信号
Completethesentencesbelow.ChooseNOMORETHANTWOWORDSfromthepassageforeachanswer.Writeyouranswersinboxes9-13o
最新回复
(
0
)