首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件央下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框
在考生文件央下有一个工程文件sjt5.vbp,窗体如图所示。运行程序时,从考生文件夹数据文件中读取学生的成绩(均为整数)。要求编写程序,统计总人数,同时统计不及格、60~69、70~79、80~89及90~100各分数段的人数,将统计结果显示在相应的文本框
admin
2015-10-23
90
问题
在考生文件央下有一个工程文件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全国计算机二级
相关试题推荐
在考生文件夹中有一个工程文件execise47.vbp及窗体文件execise47.frm。如下图所示,窗体中有一个名为Text1的文本框,初始内容为0;有一个标签;有一个计时器:有一个有两个元素的单选按钮数组,名称为Opt1,标题依次为“1秒”和“3秒”
在窗体(名称为Form1,KeyPreview属性为Tree)上绘制一个列表框(名称为List1)和一个文本框(名称为Text1)。编写窗体的KeyDown事件过程。程序运行后,如果按A键,则从键盘上输入要添加到列表框中的项目(内容任意,不少于3个):
在考生文件夹中有一个工程文件execise6.vbp及其窗体文件execise6.frm。在名为Form1的窗体上有一个名为Pic1的图片框:一个单选按钮数组,含3个单选按钮,标题分别为“正方形”、“三角形”和“圆形”:还有一个标题为“显示”的命令按钮。程
在考生文件夹中有一个工程文件execise26.vbp,相应的窗体文件为execise26.frm。在名为Form1的窗体上有一个名称为Cmd1、标题为“计算”的命令按钮:两个水平滚动条,名称分别为HSI和HS2,其Max属性均为100,Min属性均为1:
设a=5,b=6,c=7,d=8,执行语句x=IIf((a>b)And(c>d),10,20)后,x的值是()。
要从自定义对话框Form2中退出,可以在该对话框的“退出”按钮Click事件过程使用()语句。
表达式x=Sqr(a^2-5)+sqr(b^2-5)的类型是
一元二次方程ax2+bx+c=0有实根的条件是a≠0,并且b2-4ac≥O,表示该条件的布尔表达式是______。
某二叉树中度为2的节点有18个,则该二叉树中有______个叶子节点。
下列语句的输出结果为()。PrintFormat$(5689.36,"000,000.000")
随机试题
双胍类降糖药的作用机制是非磺尿类降糖药的作用机制是
A.二尖瓣脱垂综合征B.三尖瓣关闭不全C.左心室功能衰竭D.肺动脉高压E.三尖瓣狭窄心尖部收缩期喀喇音见于
一般情况下X线片上不显示,在病理状态下才能见到的影像是
(2009年)七段显示器的各段符号如图8-49所示,那么,字母“E”的共阴极七段显示器的显示码abcdefg詹应该是()。
根据《水利工程设计概(估)算编制规定》,直接工程费由()组成。
(2009年考试真题)A公司为2004年在上海交易所上市的上市公司,其公司章程中明确规定:公司可对外提供担保,金额在100万元以上1000万元以下的担保,应当经公司董事会决议批准,甲为A公司的董事长,未持有A公司股票。2006年12月,A公司的股价跌人低谷
第一次来华的英国人杰克,在中国境内无住所,2019年度在中国居住的时间为1月1日~6月30日,该年度杰克应计征个人所得税的项目包括()。
发行人申请公开发行股票、可转换为股票的公司债券,依法采取承销方式的,或者公开发行法律、行政法规规定实行保荐制度的其他证券的,应当聘请具有保荐资格的机构担任保荐人。()
Wewere________bythenewsofhissuccess.
StringBuffer类提供【】字符串对象的表示。
最新回复
(
0
)