首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件央下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框
在考生文件央下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框
admin
2015-10-23
92
问题
在考生文件央下有一个工程文件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全国计算机二级
相关试题推荐
在考生文件夹中有一个程文件execise43.vbp和窗体文件execise43.tim。在名为Form1的窗体上已经有一个标签Lab1。请绘制一个单选按钮数组,名为Opt1,含3个单选按钮,它们的Index属性分别为0、1、2,标题依次为“汽车”、“自行
在考生文件夹中有一个工程文件execise56.vbp和窗体文件execise56.frm。请在名为Form1的窗体上绘制3个文本框,其名称分别为Text1、Text2和Text3,文本框内容分别设置为“等级考试”、“计算机”和空白。然后绘制2个单选
在考生文件夹中有一个工程文件execise28.vbp,相应的窗体文件为execise28.frm。在名为Form1的窗体上有一个名称为Cmd1,标题为“最小值”的命令按钮。其功能是产生30个0~1000的随机整数,放入一个数组中,然后输出其中的最小值。
在名为Form1的窗体上建立一个文本框,名为Text1;再建立一个命令按钮,名为Cmd1,标题为“计算”,如下图所示。要求程序运行后,单击命令按钮,则计算出1~200之间所有素数之和,并在文本框中显示结果,同时把结果存入文件out48.txt中(
通过InputBox函数可以产生输入对话框。若执行下列语句:st$=InputBox("请输入字符串","字符串对话框","字符串")运行程序,用户输入完毕并单击“确定”按钮后,st$变量的内容为()。
下列叙述中错误的是()。
在深度为5的满二叉树中,叶子结点的个数为
VisualBasic对象可以分为两类,分别为上______和用户定义对象。
已知一棵二叉树前序遍历和中序遍历分别为ABDEGCFH和DBGEACHF,则该二叉树的后序遍历为()。
随机试题
长腿石膏管型可用于下列哪种骨折的治疗
手工冲洗显影温度范围是
患者,男,58岁。突然昏仆,不省人事,口吐涎沫,喉中痰鸣,面色晦暗,苔白腻、脉滑。其辨证为
对于过小牙在做全冠修复时,牙体预备多采用90。肩台预备。()
下列关于托管人所托管合格投资者发生证券卖空时的说法,不正确的有()。
OCP运输条款是()。
教育目的与培养目标之间的关系是__________与__________的关系。
Accordingtothefirstthreeparagraphs,thenewsmediadowellin______Thephrase"Hardnews"(Line3,Paragraph3)canbepa
下列不属于无限局域网技术协议的是( )。
数据库管理系统中的加锁协议规定了事务的加锁时间、持锁时间和释放锁时间,其中【10】协议可以完全保证并发事务数据的一致性。
最新回复
(
0
)