首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件央下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框
在考生文件央下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框
admin
2015-10-23
87
问题
在考生文件央下有一个工程文件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全国计算机二级
相关试题推荐
在考生文件夹中有一个工程文件execise82.vbp及窗体文件exeeise82.frm。在名为Fonn1的窗体上有1个单选按钮数组,含3个单选按钮,标题分别是“小学生”、“中学生”和“大学生”;还有1个标题为“显示”的命令按钮。程序的功能是:在运行时
在窗体(名称为Form1,KeyPreview属性为Tree)上绘制一个列表框(名称为List1)和一个文本框(名称为Text1)。编写窗体的KeyDown事件过程。程序运行后,如果按A键,则从键盘上输入要添加到列表框中的项目(内容任意,不少于3个):
在考生文件夹下有工程文件execise26.vbp及窗体文件execise26.frm。在名为Form1的窗体上有3个Labe1控件和2个名称分别为Cmd1和Cmd2,标题分别为开始和End的命令按钮。编写函数ITEM(A,N),其功能是由数字A组成的不多
在窗体Form1上绘制3个命令按钮,其名称分别为Cmd1、Cmd2和Cmd3,标题分别为“读数”、“计算”和“存盘”,如下图所示。程序运行后,如果单击“读数”按钮,则调用题目所提供的R
在考生文件夹下有一个工程文件execise3.vbp及窗体文件execise3.frm。在名称为Form1的窗体上已有3个文本框Text1、Text2和Text3,以及程序。请完成以下工作:(1)在属性窗口中修改Text3的适当属性,使其在运行时不显示,
以下说法中错误的是()。
下列关于闲置循环的四个叙述中,错误的是()。
关闭当前的工程并退出VisualBasic的快捷键是
下列运算符中,优先级别最低的是
随机试题
下列哪个药物属于单环β-内酰胺类抗生素()
患者,女,42岁。近2个月来右上后牙遇冷水及吃甜酸食痛,咬硬物酸软无力,无自发痛史。检查:釉质磨损,浅黄牙本质外露,硬而光滑,探针探划时有一点酸痛难忍。该患者的主诉问题是
A.面、额部B.头侧部C.肩胛部D.腹部E.胸部
某单位的汽车喷漆车间采用二氧化碳灭火系统保护。下列关于二氧化碳灭火系统灭火机理的说法中,正确的是()。
()是工艺过程最基本的组成单位。
嘉业股份公司,在上海证券交易所上市,股本总额8亿元,净资产6亿元,2014年3月5日董事会对以下几种融资方案进行讨论:(1)发行优先股方案。具体内容如下:a.公开发行优先股3亿股,筹资4亿元;b.股息率暂定为6%,以后每年根据市场情况确定股息率;c.若每
党政机关的行文关系有()。
企业内部研究开发项目开发阶段的支出,能确认为无形资产的条件有()
PASSAGETHREEWhat’stheauthor’sattitudetowardsGDPinPara.5?
A、Byfillinginsomeonlineformsaboutlocalcrashhistory.B、Byidentifyingsomeblackspotsofthelocalcommittees.C、Byrec
最新回复
(
0
)