首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件央下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框
在考生文件央下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框
admin
2015-10-23
44
问题
在考生文件央下有一个工程文件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://kaotiyun.com/show/sULp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹中有一个工程文件execise28.vbp,相应的窗体文件为execise28.frm。在名为Form1的窗体上有一个名称为Cmd1,标题为“最小值”的命令按钮。其功能是产生30个0~1000的随机整数,放入一个数组中,然后输出其中的最小值。
在考生文件夹中有一个工程文件execise47.vbp及窗体文件execise47.frm。如下图所示,窗体中有一个名为Text1的文本框,初始内容为0;有一个标签;有一个计时器:有一个有两个元素的单选按钮数组,名称为Opt1,标题依次为“1秒”和“3秒”
在窗体Form1上绘制3个命令按钮,其名称分别为Cmd1、Cmd2和Cmd3,标题分别为“读数”、“计算”和“存盘”,如下图所示。程序运行后,如果单击“读数”按钮,则读入in511.tx
在窗体Form1上绘制3个命令按钮,其名称分别为Cmd1、Cmd2和Cmd3,标题分别为“读数”、“计算”和“存盘”,如下图所示。程序运行后,如果单击“读数”按钮,则调用题目所提供的R
窗体上有一个名称为List1的列表框,一个名称为Picture1的图片框。FormLoad事件过程的作用是,把Data1.txt文件中的物品名称添加到列表框中。运行程序,当双击列表框中的物品名称时,可以把该物品对应的图片显示在图片框中,如图所示,以下是类
下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果,例如:若str=”ABCDABCD”,ch=”B”,则函数的返回值为:”ACDACD”Functiondelchar(strAsString,chAsSt
声明一个变量为局部变量应该用()。
下列叙述中,不符合良好程序设计风格要求的是
下列程序的功能是:弹出一个对话框询问用户是否输出,如果是,则输出;否则结束。请填空。SubPrintOut()DimaAsIntegera=MsgBox("输出结果?",vblnformation+vbYesNo,"提
随机试题
根据图所示可编程控制器的梯形图,画出其对应的逻辑图。
试述政府公共关系的意义。
银制茶叶罐()
甲、乙、丙开办一普通合伙企业,后甲与丁约定将合伙企业中甲的财产份额全部转让给丁。下列说法正确的是()。
运输公司信息管理系统吐哈油田运输公司信息管理系统是天启软件股份有限公司历时一年潜心研制的企业级信息应用软件,本着高标准、高起点的理念,造就了高品质的吐哈运输公司管理信息系统。根据用户的实际要求,天启软件有限公司独创动态报表引擎设计,内置天启软件公
医生查房工作的步骤有()。
关于板块构造学说的叙述,错误的是()。
结合材料回答问题材料1我们这个国家有几千年封建社会的历史,缺乏社会主义的民主和社会主义的法制。现在我们要认真建立社会主义的民主和社会主义的法制。只有这样,才能解决问题。摘自《邓小平文选》材料2依法治国是社会
在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是______。
HowmuchdidthecontributionsfromaroundtheUStotalearlyWednesday?
最新回复
(
0
)